One somewhat convoluted solution is to open a hidden instance of Word and
take advantage of the Word application's 'Tasks' collection. The 'Name'
property of each individual task is the friendly name so you would be able
to utilize the InStr function to isolate the task containing "C:\Temp" in
its name. Once you've gotten the specific task(window), you can take
advantage of the 'Left' property and 'Top' property. There can be a bit of
a delay while Word opens and the Explorer window will open in one location
and then make an obvious jump when it changes position but you will have the
window where you want it.


Steve



"Gary''s Student" wrote in message
...
I open a folder with:

Sub folderopen()
x = Shell("Explorer.exe ""C:\Temp""", vbNormalFocus)
End Sub

Once opened, I would like to position the folder window. Neither:

ActiveWindow.Top = 0
x.Top = 0

work. Any suggestions??
--
Gary''s Student - gsnu2007xx