Excel VBA質問箱 IV

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

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


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

27224 / 76732

←次へ　｜　前へ→


	【54831】先頭のシートに表示されている内容で名前（ファイル名）をつけて保存する方法

kotaro - 08/4/1(火) 10:42 -


	引用なし

	パスワード

先頭のシートに表示されている内容で名前（ファイル名）をつけて保存する方法について、どなたかアドバイスください。

先頭のシートが常に同じであれば、
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\12345\My Documents\" & _
CStr(Sheets("Sheet1").Range("A1")) & ".xls", _
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~　
FileFormat:=xlNormal, Password:="", _
WriteResPassword:="",ReadOnlyRecommended:=False, _
CreateBackup:=False
のようにできるのです。

これが、先頭のシートが常に同じ名前ではなく、にもかかわらず先頭のシートのセル「A1」に表示されている内容でファイル名を付ける場合は、どのようにマクロを設定すればいいでしょうか。

どなたか、アドバイスをお願いいたします。

0 hits

▼

【54831】先頭のシートに表示されている内容で名前（ファイル名）をつけて保存する方... kotaro 08/4/1(火) 10:42

≪