Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

63677 / 76738

←次へ　｜　前へ→


	【17656】Re:名前をつけて保存ダイアログボックスを表...

かみちゃん - 04/9/4(土) 12:33 -


	引用なし

	パスワード

こんにちは。かみちゃん　です。

横から失礼します。

>ヘルプで調べてみましたがどこか悪いでしょうか？
>コンパイルエラーを出るけど

どういうコンパイルエラーでしょうか？
以下のコードの「.xls」が反転して、「参照が不正また不完全です。」と表示されませんか？
>　　パス = Application.GetSaveAsFilename( _
>　　　　　 FileFilter:="a" & "b" & "c" & "d" & .xls)

まず、「.xls」を「".xls"」にします。

次に、
>　　　　　 FileFilter:="a" & "b" & "c" & "d" & .xls)
を
　　　　　 InitialFileName:="a" & "b" & "c" & "d" & ".xls")
とします。
GetSaveAsFilename メソッドのヘルプを参照すると、引数の説明が載っていると思いますが、FileFilterは、「ファイルの候補を指定する文字列 (ファイルフィルタ文字列) を指定」するだけですので、「既定値として表示するファイル名を指定」するInitialFilenameを使います。

さらに、
　　　　　 InitialFileName:="a" & "b" & "c" & "d" & ".xls")
を
　　　　　 InitialFileName:=a & b & c & d & ".xls")
とします。これは、"a"とすると、aという変数の値ではなく、aという文字そのものを表してしまうからです。

0 hits

▼

【17651】名前をつけて保存ダイアログボックスを表... さる 04/9/4(土) 1:37