Thread: wild card *
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Faisal... Faisal... is offline
external usenet poster
 
Posts: 27
Default wild card *

Try this:

Sub Deletedepo()

With ActiveSheet
..DisplayPageBreaks = False
StartRow = 1
EndRow = .Cells(.Rows.Count, "C").End(xlUp).Row
For Lrow = EndRow To StartRow Step -1

strVal=.Cells(Lrow, "C").Value
If LEFT(strVal,12) = "CASH DEPOSIT" Then

..Rows(Lrow).Delete
End If
Next
End With
End Sub


On Nov 9, 11:18 am, transferxxx wrote:
My macro below is not working properly:

Sub Deletedepo()

With ActiveSheet
.DisplayPageBreaks = False
StartRow = 1
EndRow = .Cells(.Rows.Count, "C").End(xlUp).Row
For Lrow = EndRow To StartRow Step -1

If .Cells(Lrow, "C").Value = "CASH DEPOSIT *" Then

.Rows(Lrow).Delete
End If
Next
End With
End Sub

I would like to delete all rows with cells in column c containing e.g
Cash deposit GBP1000
Cash deposit Euro 50
But the wild card * is not working - can someone pls correct my macro
Thxs