![]() |
|
![]() |
|
Thread Tools | Display Modes |
|
#1
|
||||
|
||||
![]() Untested: Code:
If (InStr(1, UCase(Vals(rw, colm)), "X") > 0 Or InStr(1, UCase(Vals(rw, colm)), "K") > 0) Then ThisRowCount = ThisRowCount + 1 Else ThisRowCount = 0 |
#2
|
||||
|
||||
![]()
Perfect. Thank you.
|
#3
|
||||
|
||||
![]()
I am now "packaging" the form for dissemination to the ultimate users. The Form is 95% formula so I tried to lock the sheet except for the input cells $D$13:$AA$42, $D$44:$AA$73 and D$10 but the debugger led me to:
Code:
cll.Errors(xlUnlockedFormulaCells).Ignore = True Thank you. |
#4
|
||||
|
||||
![]()
What is text of the error report?
Send me your file as it stands. |
#5
|
||||
|
||||
![]()
Okay, file attached.
|
![]() |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
New learner need help - convert tables in word format to ppt slides. | sas | Word VBA | 5 | 09-21-2017 08:33 PM |
![]() |
dwirony | Word VBA | 1 | 01-03-2017 01:01 PM |
![]() |
namedujour | Excel | 1 | 05-27-2016 08:58 AM |
![]() |
teza2k06 | Excel | 1 | 08-22-2014 02:49 AM |
Conditional Formula | UICOMP | Excel | 1 | 05-18-2012 12:59 PM |