Karthi notes that he often needs to use Go To Special to select just the visible cells in a selection. This makes him wonder if there is a way that such cells can be selected in a macro.
There are numerous ways that just the visible cells can be selected without a macro, but those won't be gone into here. The assumption is that you want to select the visible cells as part of a larger macro you may be creating. For instance, you might need to select the visible cells before doing some sort of formatting or before you process the cells in some other way.
To select just the visible cells from a range of selected cells, you can use the following line of code:
Selection.SpecialCells(xlCellTypeVisible).Select
If you need to work on some other initial range of cells before selecting the visible subset of those cells, all you need to do is change the "Selection" portion of the line. For instance, you could select the visible cells in the used range of the worksheet by using this line:
ActiveSheet.UsedRange.SpecialCells(xlCellTypeVisible).Select
Similarly, you could select all the visible cells on the entire worksheet by using this line:
Cells.SpecialCells(xlCellTypeVisible).Select
Keep in mind that the techniques described so far select all the cells that are visible, even if they are off-screen. In other words, the techniques select any non-hidden cells in the worksheet. If you truly want to select only those non-hidden cells that are visible on the screen at the current time, then you can use a different technique:
Intersect(MyRange, ActiveWindow.VisibleRange).SpecialCells(xlCellTypeVisible)
The code starts by selecting only those cells where a given range (in this case "MyRange") intersects with the visible range of cells in the active window. These cells are further winnowed down by using the SpecialCells collection to make sure that only non-hidden cells are used.
Note:
ExcelTips is your source for cost-effective Microsoft Excel training. This tip (8524) applies to Microsoft Excel 2007, 2010, 2013, 2016, 2019, and Excel in Office 365. You can find a version of this tip for the older menu interface of Excel here: Selecting Visible Cells in a Macro.
Excel Smarts for Beginners! Featuring the friendly and trusted For Dummies style, this popular guide shows beginners how to get up and running with Excel while also helping more experienced users get comfortable with the newest features. Check out Excel 2013 For Dummies today!
It is often helpful to get user input within a macro. Here's a quick way to present some options and get the user's response.
Discover MoreNeed to know how to generate a full month name based on a date? It's easy to do, as discussed in this tip.
Discover MoreWhen you open multiple workbooks, the way in which Excel sizes them is not the best for your needs. This tip looks at a ...
Discover MoreFREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
2019-12-04 07:36:06
Hi KP
Does this work?
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, _
ByVal Target As Excel.Range)
' MsgBox Sh.Name & ":" & Target.Address
MsgBox Target.Address
End Sub
2019-12-03 23:34:12
KP
i have a requirement in my macros to identify the last visible cell on screen. For example, my codes opens a data sheet, finds a value, say in "B14" of this data sheet and places this cell as first cell to the viewer. (like visible area on screen is "B14:C34" )... Now i want the vba to identify the last visible cell, in this example "C34". There may or may not be any data in the last cell. Can i get the starting cell as B14 & last cell as C34 when a Worksheet_SelectionChange(ByVal Target As Excel.Range) is triggered ?
Thanks in advance
Krishna
Got a version of Excel that uses the ribbon interface (Excel 2007 or later)? This site is for you! If you use an earlier version of Excel, visit our ExcelTips site focusing on the menu interface.
FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2021 Sharon Parq Associates, Inc.
Comments