Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
checking celles by vb excel2000
if the 4 right celles from the pointer containe something
then ___ else ____ for example if the activecell is h10 and the range h10:L10 containes something then do ___ else do ___ what is the macro thank you rozent |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
checking celles by vb excel2000
Hi Rozent,
Try something like: '============= Public Sub Tester001() If Application.CountA(ActiveCell(1, 2).Resize(1, 4)) Then MsgBox "Some content!" Else MsgBox "Empty!" End If End Sub '<<============= --- Regards, Norman "?????" wrote in message ... if the 4 right celles from the pointer containe something then ___ else ____ for example if the activecell is h10 and the range h10:L10 containes something then do ___ else do ___ what is the macro thank you rozent |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
checking celles by vb excel2000
thank you your code helped me
rozent "Norman Jones" wrote: Hi Rozent, Try something like: '============= Public Sub Tester001() If Application.CountA(ActiveCell(1, 2).Resize(1, 4)) Then MsgBox "Some content!" Else MsgBox "Empty!" End If End Sub '<<============= --- Regards, Norman "?????" wrote in message ... if the 4 right celles from the pointer containe something then ___ else ____ for example if the activecell is h10 and the range h10:L10 containes something then do ___ else do ___ what is the macro thank you rozent |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
calculated celles according to more then 1 condition | Excel Worksheet Functions | |||
Spell Checking with checking cell notes | Excel Discussion (Misc queries) | |||
compare celles and put value into Q | Excel Programming | |||
excel2000 | Excel Programming | |||
Excel2000 | Excel Programming |