Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.word.tables
|
|||
|
|||
Insert in First Empty Cell
Thank you! It works great!
Ben Z. "Helmut Weber" wrote: Hi Ben, Sub Macro7() Dim oTbl As Table Dim oCll As Cell Set oTbl = ActiveDocument.Tables(1) With oTbl For Each oCll In .Columns(1).Cells If Len(oCll.Range) = 2 Then oCll.Range.Text = "was empty" Exit For End If Next End With End Sub -- Greetings from Bavaria, Germany Helmut Weber, MVP WordVBA Win XP, Office 2003 "red.sys" & Chr$(64) & "t-online.de" |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
insert clip art gives a empty box | Microsoft Word Help | |||
Empty Insert Object List - Word 2003 | Microsoft Word Help | |||
empty box when i insert picture? | Microsoft Word Help | |||
how to create or insert a cell in Word? | New Users | |||
How do I insert a picture into a cell of a table? | Tables |