Results 1 to 7 of 7
  1. #1
    New Lounger
    Join Date
    Aug 2002
    Posts
    2
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Side-by-Side Word Windows (Office 2000 SR-1A)

    Woody presented a simple macro for opening up side-by-side windows in MS Word awhile back (I believe in Office Watch or Mere Mortals) that replicated the old feature Word used to have. I believe it differed from tile vertically by simply creating two equally sized windows. I've hunted and pecked with no success in the archives (it appeared between Feb. 1998 and the present -- in the last year or two, I believe). The discussion included adding the macro to the toolbar. Any ideas where to find this?

  2. #2
    4 Star Lounger
    Join Date
    Oct 2001
    Location
    New York, New York, USA
    Posts
    538
    Thanks
    0
    Thanked 1 Time in 1 Post

    Re: Side-by-Side Word Windows (Office 2000 SR-1A)

    Afternoon, jimpinkham,

    Does this help? It's from ZD Journals, 12/99; in an article 'Tiling document windows vertically'. Works fine in Word97...

    I've added their explanation, which I've edited with abbreviations, but am sure you can make them out.
    ---
    If only 1 or no open doc, mac doesn't run since there aren't enough open doc windows to tile; if more than 1 doc is open, the macro changes all active doc windowsto the Normal

    Each doc that you opened should be evenly sized. The macro first defines the variables
    'that it will use to determine the size of each doc window. Next,the mac checks whether
    'there's more than 1 doc window open. If there's only 1 or no open doc, the mac stops
    'running since there aren't enough open doc windows to tile. If more than 1 doc is open,
    'the mac changes all active doc windows to the Normal window state,a necessary
    'prerequisite to resizing them. In order to resize & arrange the open doc windows so
    'that they're evenly sized & distributed across the workspace, the mac determines the
    'width of the avail workspace, then divides that figure by the number of open doc windows.
    'Next, the mac sets the ht of each doc window equal to the ht of the avail workspace.
    'Finally, the mac uses a For...Next loop to size & position each doc window by referring
    'to the variables & specifications determined earlier.

    'If running Word2000, move line ActiveWindow.WindowsState = wdWindowStateNormal
    ' into the For...Next loop following Document(wdDocWindow).Activate line
    'see Macs not created for anothe version

    Sub WindowsVertical()
    Dim lngLeft As Long
    Dim lngWidth As Long
    Dim lngHeight As Long
    Dim wDocWindow As Window
    If Documents.Count < 2 Then Exit Sub
    ActiveWindow.WindowState = wdWindowStateNormal
    lngWidth = Application.UsableWidth / Windows.Count
    lngHeight = Application.UsableHeight
    For Each wDocWindow In Windows
    Documents(wDocWindow).Activate
    With ActiveWindow
    .Top = 0
    .Left = lngLeft
    .Width = lngWidth
    .Height = lngHeight
    End With
    lngLeft = lngLeft + lngWidth
    Next wDocWindow
    End Sub

    Hope it's useful,

    Curious

  3. #3
    5 Star Lounger
    Join Date
    May 2001
    Location
    Stuttgart, Baden-W, Germany
    Posts
    931
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Side-by-Side Word Windows (Office 2000 SR-1A)

    Also (probably this is old news to you, but just in case) you can tile any windows side by side by right-clicking on the Windows task bar.

    I use that all the time, and it has the advantage that it works with any program (graphics program, mail editor, VB editor, ...).

    Minimized windows do not tile. If you have a lot of windows open, you may have to minimize some and tile again.

    <img src=/S/cheers.gif border=0 alt=cheers width=30 height=16> Klaus

  4. #4
    New Lounger
    Join Date
    Aug 2002
    Posts
    2
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Side-by-Side Word Windows (Office 2000 SR-1A)

    Thanks to both you and Curious, Klaus. Although your answer wasn't precisely what I had in mind, I'll have to admit the taskbar solution is elegant in its simplicity -- and it gets the job done.

    I appreciate the reminder!

    Jim

  5. #5
    3 Star Lounger
    Join Date
    Jan 2001
    Location
    New York
    Posts
    214
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Side-by-Side Word Windows (Office 2000 SR-1A)

    You might want to look at the thread

    Vertially Tiled Windows

  6. #6
    3 Star Lounger
    Join Date
    Nov 2001
    Location
    Upstate, South Carolina, USA
    Posts
    253
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Side-by-Side Word Windows (Office 2000 SR-1A)

    I just had an un-nerving experience using this technique with XP 5.1/W2002 with "Windows in the taskbar" enabled. I opened two Word documents, clicked on the Windows Task bar and chose Tile Windows Vertically. The windows tiled vertically but one of the windows had no toolbars and there was no way get them to appear. Even after closing the window with toolbars, the other window had no toolbars. I had to shut Word down and restart it. Is this a feature?
    Al
    "Do or do not do. There is no try." -- Yoda
    <img src=/S/flags/USA.gif border=0 alt=USA width=30 height=18>

  7. #7
    5 Star Lounger
    Join Date
    May 2001
    Location
    Stuttgart, Baden-W, Germany
    Posts
    931
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Side-by-Side Word Windows (Office 2000 SR-1A)

    I don't have Word2002 to check right now, but you can choose between SDI and MDI (single document interface and multiple document interface) in this version.

    From your description I guess you have SDI (the documents don't tile inside a big window with one set of toolbars for both)?

    Then it does sound very much like a bug -- I'll try to reproduce it next time I get on a machine with Word2002.

    <img src=/S/cheers.gif border=0 alt=cheers width=30 height=16> Klaus

Posting Permissions

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