こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

VBAでマクロを使って、マクロ無効のエクセルシートとして名前を付けて保

VBAでマクロを使って、マクロ無効のエクセルシートとして名前を付けて保存ってできますか??

FileFilter:="エクセルファイル(*.xlsx),*.xlsx"

として保存すると、保存はできるのですが、開くことができません。


VBA初心者です。よろしくお願いします。

投稿日時 - 2010-09-13 21:32:51

QNo.6180400

すぐに回答ほしいです

質問者が選んだベストアンサー

#Excelのバージョンが2007だとして。

Book名が固定なら

ActiveWorkbook.SaveAs Filename:="c:\test\test.xlsx", FileFormat:=xlOpenXMLWorkbook
'"c:\test\test.xlsx"はテキトーです。

...っていう事でしょうか?

それとも
Sub Macro1()
  Dim x As Variant

  x = Application.GetSaveAsFilename(fileFilter:="エクセルファイル(*.xlsx),*.xlsx")
  If VarType(x) <> vbBoolean Then
    ActiveWorkbook.SaveAs Filename:=x, FileFormat:=xlOpenXMLWorkbook
  End If
End Sub
こちらでしょうか。

投稿日時 - 2010-09-13 23:30:46

お礼

できました。
ありがとぉございます!!

投稿日時 - 2010-09-14 00:01:31

ANo.1

このQ&Aは役に立ちましたか?

2人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問