I've got an Excel worksheet where the first column contains a keyword. I want to have a
button, or an option, or whatever, that I can click so that if the first column equals a
certain word, then do not display the row containing that column.

How can I do this, please???

Thanks!

Vic

Sub Hiderows()
Dim cell as Range
for each cell in Activesheet.UsedRange.columns(1).Cells
if instr(1,cell,"TestWord",vbTextcompare) then
cell.EntireRow.Hidden = True
else
cell.EntireRow.Hidden = False
end if
Next
End Sub

--
regards,
Tom Ogilvy


"Victor" wrote:

I've got an Excel worksheet where the first column contains a keyword. I want to have a
button, or an option, or whatever, that I can click so that if the first column equals a
certain word, then do not display the row containing that column.

How can I do this, please???

Thanks!

Vic

Thank you, Tom!

Vic