Select only visible cells in a selected range

D

DataFreakFromUtah

No question here, just a procedure for the archive.
Search critera:

Select only visible cells in a selected range
manually select just the visible cells in a subset of the whole page
Prompt target to select specific specifically range and only visible cells


Sub SelectOnlyVisibleCellsInSelectedRange()

'Selects only the visible cells in a selected range.
On Error Resume Next
Dim MyRange As Range
Set MyRange = Application.InputBox( _
prompt:="Select Range of Cells to Evalute", Type:=8)
MyRange.SpecialCells(xlCellTypeVisible).Select

End Sub
 
T

Tom Ogilvy

Evalute should probably be evaluate or something more meaningful since no
evaluation seems to be included in the code.
 
Top