I'm getting error 1004 "select method of range failed" when I try the following:
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Sheets("OrgTable"
.Select
Columns("H:H"
.Activate
Selection.Find(What:=Range("H1"
, After:=ActiveCell, LookIn:=xlValues, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).Activate
Application.ScreenUpdating = True
ActiveCell.EntireRow.Select
End Sub
It allows me to select the another worksheet ("OrgTable"
but not to perform other actions within the other worksheet.
Is there any way round this, please.
Ted
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Sheets("OrgTable"
Columns("H:H"
Selection.Find(What:=Range("H1"
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).Activate
Application.ScreenUpdating = True
ActiveCell.EntireRow.Select
End Sub
It allows me to select the another worksheet ("OrgTable"
Is there any way round this, please.
Ted