View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Bob Phillips[_5_] Bob Phillips[_5_] is offline
external usenet poster
 
Posts: 620
Default Changing Save As Type in Save as dialog box

Phil,

If you create a new workbook based upon the template rather than opening the
template, the SaveAs will default to a normal Excel workbook.

You can add it in VBA with code like

Workbooks.Add Template:= _
"C:\Documents and Settings\Bob\Application
Data\Microsoft\Templates\Book.xlt"

--

HTH

Bob Phillips

"Phill" wrote in message
...
Hello

I was hoping anyone would be able to help me with this
situation

I require code that when it is ran the Save as Dialog Box
opens with a preset filename and the Save Type is Excel
Workbook. The problem i'm having is i have linked this
workbook to a product called GoldMine, and in order for
that to work the workbook must be saved as a template.
However when running the Save as dialog box it stays as a
template so when the user will save this, it will be a
template not a workbook. Can anyone help with this

I currently am using the code

InvoiceNumber = Worksheets("main").Range("j12").Value
Filename = "Invoice " & InvoiceNumber
Application.Dialogs(xlDialogSaveAs).Show (Filename)

So i can get the filename to pull through, i just cant, or
dont know how to change the file type

Any help would be greatly appreciated

Thanks

Phill