Thanks Thanks:  0
Likes Likes:  0
Results 1 to 3 of 3

Thread: Pathetic user needs Macro advice!

  1. #1
    Guest

    Default

    I have over 150 tables in a Microsoft Word '97 doc. I need to create a macro to automatically insert one more row at the end of each table. Is there any way I can do this "globally," or just by hitting a couple of keys? Thanks in advance for your help! (P.S. - need step by step info, here, sorry!)

  2. #2
    MrExcel MVP
    Join Date
    Feb 2002
    Location
    Newcastle, UK
    Posts
    1,174
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default

    Sounds to me like a Word problem :0

  3. #3
    MrExcel MVP Anne Troy's Avatar
    Join Date
    Feb 2002
    Location
    Westwood NJ
    Posts
    2,582
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default

    I'm not good with code, but this recorded/edited macro will find the next table, go to the end of it and hit tab, which creates a new row:

    Sub NewRow()
    '
    ' Macro recorded 03/06/2002 by Dreamboat
    '
    Selection.GoTo What:=wdGoToTable, Which:=wdGoToNext, Count:=1, Name:=""
    Selection.Find.ClearFormatting
    Selection.EndKey Unit:=wdColumn
    Selection.EndKey Unit:=wdRow
    Selection.MoveRight Unit:=wdCell
    End Sub

    Hope that helps. Here's the keystrokes if you don't want a macro:

    F5
    Select table from the list.
    Hit Find next (or just enter).
    Esc to close dialog.
    Alt+Page down
    Alt+End
    Tab


    ~Anne Troy

Some videos you may like

User Tag List

Like this thread? Share it with others

Like this thread? Share it with others

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •