Range of numbers equals 1 number
Closed
John906
-
Nov 18, 2010 at 09:47 AM
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 - Nov 18, 2010 at 10:36 AM
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 - Nov 18, 2010 at 10:36 AM
Related:
- Range of numbers equals 1 number
- Tentacle locker 1 - Download - Adult games
- Fnaf 1 download pc - Download - Horror
- Igi 1 download - Download - Shooters
- Fnia 1 - Download - Adult games
- Poppy playtime chapter 1 download pc - Download - Horror
1 response
TrowaD
Posts
2921
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
December 27, 2022
555
Nov 18, 2010 at 10:36 AM
Nov 18, 2010 at 10:36 AM
Hi John906,
Try this code:
First copy the code.
Then goto excel and right click on the sheets tab and click on 'view code'.
Paste the code in the big white field.
Now you're done.
Please note: you haven't given the rest of the statements. You will have to change them first before the code will work properly.
Let me know if you get stuck somewhere.
Best regards,
Trowa
Try this code:
Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("A1")) Is Nothing Then Exit Sub If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" If Range("A1") >= 11 And Range("A1") <= 20 Then Range("B1") = "32%" If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" If Range("A1") >= 1 And Range("A1") <= 10 Then Range("B1") = "45%" Else Range("B1").ClearContents End Sub
First copy the code.
Then goto excel and right click on the sheets tab and click on 'view code'.
Paste the code in the big white field.
Now you're done.
Please note: you haven't given the rest of the statements. You will have to change them first before the code will work properly.
Let me know if you get stuck somewhere.
Best regards,
Trowa