Thanks Matt

I've got the Save As dialog working (GetOpenFileName) However is there a way to make it a Folder name rather than a file name. At the moment I've added a couple of lines of code so after I select a file it strips out the file name leaving just the path which is what I need. That's fine for now but if the folder is empty then you can't select anything so you have to cancel.

In Excel I use

msoFileDialogFolderPicker

rather than

msoFileDialogFilePicker.

but obviously its a LOT more difficult in Outlook!

Also is there any way to set the initial folder it goes to by default. Once it's been used it remembers the last folder picked, but on inital use each session it goes to 1033 (on my computor at least).

I've tried adding various paths in this line, which is where I think it should go

OFN.lpstrInitialDir = IIf(vWindowTitle = "", CurDir, vInitialDir)

But it either crashes or makes no difference.

I'm still working on the spreadsheet. It doesn't seem to make any difference whether the sheet is the first one seen in the Book. I've added a second sheet at the start. However it's still called "Sheet1 (Sheet1)" in the editor which is why I believe it still works, it has to be the first sheet made.


Jeff