Related:
- Vba if first character is
- Pipe character - Guide
- Reverse text character - Guide
- Vba case like - Guide
- How to change chrome dino character - Guide
- Number to words in excel without vba - Guide
3 responses
the code for your question will look something like this.
Dim mycheck as boolean
endrange = range("A65000").end(xlUp).row
for I = 1 to endrange
mycheck = range("A" & i).value Like "1*"
if mycheck = true then
range("B" & i).value="Its a One"
end if
my2check = range("A" & i).value Like "?c*"
if my2check = true then
range("E" & i).value="Its a C"
end if
next I
Hope it helps. :)
Dim mycheck as boolean
endrange = range("A65000").end(xlUp).row
for I = 1 to endrange
mycheck = range("A" & i).value Like "1*"
if mycheck = true then
range("B" & i).value="Its a One"
end if
my2check = range("A" & i).value Like "?c*"
if my2check = true then
range("E" & i).value="Its a C"
end if
next I
Hope it helps. :)
Oct 21, 2009 at 09:51 PM