![]() |
|
|
|
#1
|
|||
|
|||
|
Perhaps you can glean something from this
Code:
Sub First_VisRowOfTable()
Dim Tbl As Excel.ListObject
Dim cel As Range
Set Tbl = ActiveSheet.ListObjects(1) 'first table on sheet
With Tbl
For Each cel In Tbl.ListColumns(1).DataBodyRange.SpecialCells(xlCellTypeVisible)
MsgBox cel.Row
Exit For
Next
End With
End Sub
|
|
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
VBA Table – Search All Tables - Find & Replace Text in Table Cell With Specific Background Color
|
jc491 | Word VBA | 8 | 09-30-2015 06:10 AM |
| find 2 values i a table to find the right prise | Vibov | Excel | 1 | 01-11-2015 07:25 AM |
programmatically inserting hidden text into a Word 2010 table
|
epid011 | Word VBA | 16 | 12-30-2013 11:29 AM |
Hidden text in table
|
Angel9520 | Word Tables | 1 | 05-02-2012 01:00 AM |
Hidden style applied over already-hidden text.
|
christie | Word | 1 | 08-17-2011 09:10 AM |