Thread: Find a text
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Geir[_2_] Geir[_2_] is offline
external usenet poster
 
Posts: 7
Default Find a text

Hi all
I am trying to find a text and delate a Row if the text is in the row.
But I am not sure how to do it.
Can someone help me?

Option Explicit
Sub FindText()
Dim Cell As Range
For Each Cell In ActiveSheet.UsedRange
If Cell = "Samtals hreyfing:" Then
€šthe text Samtals hreyfing sin in in the column E:E
€šIf the text Samtals hreyfing: is in the row then I want to delete the Row
End If
Next Cell
End Sub