|
|
|
|
|
|
Har du set hvor smart det kan være?
|
![Microsoft Office, Word skabeloner, Excel regneark](/images/Layout/Blank.gif)
|
SmartOffice - GetSaveAsFileName
Når du gerne vil vise dialogboksen til gem, og du vil bestemme hvilken sti dialogboksen skal vise brugeren, så er dette løsningen.
![](/images/Layout/SO_Line_Fade_Right.jpg)
Eksempel 1
Public Sub GetSaveAsFileName()
' Flemming Vadet, November 2001, fv@smartoffice.dk
Dim vntFileName As Variant
ChDrive "D"
ChDir "D:\Temp"
vntFileName = Application.GetSaveAsFileName(ThisWorkbook.Name, _
"Excel Files (*.xls),*.xls")
If vntFileName <> False Then
ThisWorkbook.SaveAs vntFileName
End If
End Sub
![](/images/Layout/SO_Line_Fade_Right.jpg)
Download eksempel
|
|
|
|
Smart Data Management
Compare 2 Columns
Excel Super- Subscript
Teachers Excel Tools
|
|
|
|
|
|