[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『VBA ダイアログ 保存』(ゆう)
名前を付けて保存する際に、ダイアログを表示させたいです。
やりたいことは、今日の日付のあとにサンプルという名前でダイアグを表示させたいです。
Format(Date, "YYMMDDサンプル") & ".xlsm"
GetSaveAsFilenameの使い方がよく分かりません。
ご教授のほど、よろしくお願い致します。
< 使用 Excel:unknown、使用 OS:unknown >
>今日の日付のあとにサンプルという名前でダイアグを表示させたいです。
Sub Test() Dim fname As String
fname = Application.GetSaveAsFilename(InitialFileName:=Format(Date, "YYMMDD") & _ "サンプル", FileFilter:="Excel マクロ有効ブック(*.xlsm),*.xlsm")
If fname <> "False" Then ActiveWorkbook.SaveAs Filename:=fname End If End Sub
(ピンク) 2020/05/06(水) 18:10
いつもありがとうございます。
本当に感謝です。
(ゆう) 2020/05/06(水) 19:01
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.