[mso] Re: I want two MS Word doc screens on the go at the same time.
- From: "Chinell, David F \(GE Indust, Security\)" <David.Chinell@xxxxxx>
- To: <mso@xxxxxxxxxxxxx>
- Date: Sat, 23 Dec 2006 14:59:54 -0500
Roger:
Can you open two separate documents in two separate windows?
This reminds me of a change they made -- maybe between Word 97 and Word =
2000 or maybe between Word 6 and Word 7. They changed from multiple =
document interface to single document interface.
It used to be that all Word documents opened in a single workspace =
(MDI). Then they changed it so each document opened in a separate =
workspace (SDI). Instead of seeing one Word button in the task bar, we =
started seeing one button for each Word document.
Some liked it, some didn't.
If you see a separate button for each document, then you can open two =
separate windows and arrange them however you like. If you only see one =
button, then you're never going to have separate windows, no matter what =
you do. The best you can hope for is to tile them in the same window =
either horizontally or vertically.
I don't have Word 2003 running yet, so I don't know if you've got the =
option to see each document in a separate window. Hang on while I =
Google.
http://en.wikipedia.org/wiki/Multiple_document_interface
And everything I just read on the Web seems to indicate that Word 2003 =
opens documents in separate windows.
If you can't do that to start with, maybe your installation has been =
customized to override the default behavior?
And, at last, here's the MS Knowledgebase article that tells you how to =
open separate documents in separate windows -- or not.
http://support.microsoft.com/kb/291313/
I don't know if this will work in 2003, but here's a handy macro that =
positions open documents side-by-side (in separate windows).
~~~~~~~~~~
Sub SideBySide()
=20
'Tiles the open documents side-by-side
=20
Dim DocWin As Window
Dim WinWidth As Long
Dim WinLeft As Long
Dim DocCount As Long
=20
DocCount =3D Application.Documents.Count
If DocCount < 6 Then
WinWidth =3D Application.UsableWidth / DocCount
WinLeft =3D 0
For Each DocWin In Application.Windows
With DocWin
.Activate
.WindowState =3D wdWindowStateNormal
.Top =3D 0
.Left =3D WinLeft
.Height =3D Application.UsableHeight
.Width =3D WinWidth
WinLeft =3D WinLeft + WinWidth
End With
Next DocWin
End If
Set DocWin =3D Nothing
End Sub
~~~~~~~~~~
Bear
*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or
MicrosoftOffice@xxxxxxxxxxxxxxxx
To send mail to the group, simply address it to mso@xxxxxxxxxxxxx
To Unsubscribe from this group, visit the group's homepage and use the dropdown
menu at the top. This will allow you to unsubscribe your email address or
change your email settings to digest or vacation (no mail).
//www.freelists.org/webpage/mso
If you are using Outlook and you see a lot of unnecessary code in your email
messages, read these instructions that explain why and how to fix it:
http://personal-computer-tutor.com/abc3/v28/greg28.htm
*************************************************************
Other related posts:
