![]() |
|
#9
|
|||
|
|||
|
Well, the solution provided by Macropod does not bookmark the table with the content of the first cell. You are wasting a lot of other people's time by not being clear on what you want.
Code:
Sub Demo()
Dim lngIndex As Long
Dim oTbl As Table
For lngIndex = 2 To ActiveDocument.Tables.Count
Set oTbl = ActiveDocument.Tables(lngIndex)
With oTbl
.Range.Bookmarks.Add Replace(Split(.Cell(1, 1).Range.Text, vbCr)(0), " ", "_"), .Range
End With
Next lngIndex
End Sub
|
| Tags |
| bookmark, table |
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Use of named ranges based on cell content | Intruder | Excel | 12 | 02-25-2019 09:42 AM |
| save selected worksheets, named by cell value | rossmortimore | Excel | 1 | 12-27-2018 01:56 PM |
Code to find a named (bookmarked?) table, replicate a row or table, and delete a specified table.
|
kevinbradley57 | Word VBA | 9 | 09-21-2017 04:58 PM |
how do i use a named cell for each worksheet
|
cwkotch | Excel | 3 | 11-03-2015 09:04 AM |
| Can't use a zero in a named cell | TechEd | Excel | 2 | 10-16-2012 10:06 PM |