Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
The macro below runs on worksheet change and works properly.
However, I have 5 values to examine in column H. The values a Split, Payday 1, Payday 2, Payday 3, and Payday 4. Any of these choices should result in unlocking and clearing the cells in that row (first part of if statement). Otherwise, the range 'pasterage' is copied to that row and it is locked again. I can't find the proper syntax (if there is any) to say something like is possible in SQL (if ...value in ("Split","Payday 1",...)) Please advise on the best way to go about this. n = Target.Row If Me.Range("H" & n).Value = "Split" Then Me.Range("I" & n & ":W" & n).Locked = False Me.Range("I" & n & ":W" & n).ClearContents Else Me.Range("I" & n & ":W" & n).Locked = True Range("pasterange").Copy Range("I" & n).PasteSpecial Paste:=xlPasteFormulas, _ Operation:=xlNone, SkipBlanks:=False, Transpose:=False End If -- thanks for your assistance cm |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
There is no "value in ()" syntax.
You can use this: Select Case Range("H" & n).Value Case "Split", "Payday 1", "Payday2" [do something] Case "Payday 3", "Payday4" [do something else] End Select Or this: If Instr("Split Payday 1 Payday2", Range("H" & n).Value) Then |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
How do I get rid of "Top 10" and "Custom" choices Autofilter? | Excel Worksheet Functions | |||
use variable in Workbooks("book1").Worksheets("sheet1").Range("a1" | Excel Programming | |||
Multiple "Range" with "Cells" property? | Excel Programming | |||
Multiple "Range" with "Cells" property? | Excel Programming | |||
Using "Cells" to write "Range("A:A,H:H").Select" | Excel Programming |