
No.4ベストアンサー
- 回答日時:
こんにちは
以下でもいけると思います。
Sub Sample()
Const p = "C:\Sample1.xlsx"
With CreateObject("Excel.Application")
.Application.DisplayAlerts = False
.Workbooks.Open(ThisWorkbook.FullName).SaveAs p, 51
.Workbooks(1).Close
.Quit
End With
End Sub
No.3
- 回答日時:
ワークシートはいくつもあるのでしょうか?一つだけならWorksheets.Copyでコピー先を指定しなければ新しいブックができるので、それをSaveAsで保存すればいいです。
他にシートがあるなら新しいブックに追加でコピーしてSaveAsすればいいです。No.2
- 回答日時:
力技なら
Dim bk As Workbook
Dim bkPath, bkName
ActiveWorkbook.Save
bkPath = ActiveWorkbook.Path
bkName = ActiveWorkbook.Name
Application.ScreenUpdating = False
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:="C:\Sample1.xlsx", FileFormat:=51
Set bk = ActiveWorkbook
Workbooks.Open bkPath & "\" & bkName
bk.Close
Application.DisplayAlerts = True
Application.ScreenUpdating = True
No.1
- 回答日時:
SaveCopyAsではなく、別名保存としてSaveAsを使います。
このとき、xlOpenXMLWorkbookを指定することでマクロなしで
保存ができます。
http://officetanaka.net/excel/vba/tips/tips214.htm
ご提示のプログラムはやったことがありますが、実行すると、現在編集中のブックが新しくできたブックに入れ替わってしまいます。引き続き編集できるようにするにはどうすれば良いでしょうか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
名前をつけて保存した後、元のファイルに戻るには
その他(コンピューター・テクノロジー)
-
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
エクセルVBA 開いているブックのコピー
Excel(エクセル)
-
-
4
EXCELのVBAでシートコピーをしたとき元のマクロを削除するには?
Excel(エクセル)
-
5
マクロ ブックをマクロなしでコピー
Access(アクセス)
-
6
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
7
メッセージボックスのOKボタンをVBAでクリックさせたい
Visual Basic(VBA)
-
8
【Excel VBA】マクロでExcel自体を終了させたい
Excel(エクセル)
-
9
VBA 新規ファイルを元ファイルと同じ場所に保存する方法
Excel(エクセル)
-
10
Application.ScreenUpdating = Falseが効きません
Visual Basic(VBA)
-
11
マクロの「SaveAs」でエラーが出るのを解消したいです(再)
Visual Basic(VBA)
-
12
Excel マクロでShearePoint先のフォルダ指定
Excel(エクセル)
-
13
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
14
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
15
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
16
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
17
VBA エンターキーでイベントに入りたい。
PowerPoint(パワーポイント)
-
18
【VBA】テキストファイルを指定行数からの読み込み
Visual Basic(VBA)
-
19
UNICODE文字が含まれているかのチェック
Visual Basic(VBA)
-
20
エクセルVBA 配列からセルに「関数式」を一気代入したい
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
今、見られている記事はコレ!
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
-
なぜ批判コメントをするの?その心理と向き合い方をカウンセラーにきいた!
今や生活に必要不可欠となったインターネット。手軽に情報を得られるだけでなく、ネットを介したコミュニケーションも一般的となった。それと同時に顕在化しているのが、他者に対する辛らつな意見だ。ネットニュース...
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで複数のコメントのサ...
-
バッチファイル XCOPYで上書き...
-
xcopyでのバッチコピー方法でコ...
-
bat 同名ファイルコピー時にリ...
-
[エクセル]コピーするとオブジ...
-
frxファイルの役目
-
エクセルのハイパーリンクがコ...
-
現在のブックを閉じないで、マ...
-
同じファイル名 上書きしないフ...
-
アクセス クエリを別のファイ...
-
Vba初心者です。下記のコード助...
-
賃貸アパートの退去の時の返却...
-
バッチファイル 別ファイルにリ...
-
エクセル2010、図が大きすぎま...
-
ハイフネーションされている英...
-
ExeclVBAユーザーフォームから...
-
ExcelシートをコピーするとA4用...
-
FTPとファイルコピーの違いにつ...
-
エクセルのファイル名をコピー...
-
vbsでファイルやフォルダのコピ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで複数のコメントのサ...
-
同じファイル名 上書きしないフ...
-
ファイルサーバ上のファイルが...
-
frxファイルの役目
-
バッチファイル XCOPYで上書き...
-
[エクセル]コピーするとオブジ...
-
Vba初心者です。下記のコード助...
-
エクセルのハイパーリンクがコ...
-
バッチファイル 別ファイルにリ...
-
エクセル2010、図が大きすぎま...
-
現在のブックを閉じないで、マ...
-
vbsでExcelのシートをコピーす...
-
xcopyでのバッチコピー方法でコ...
-
バッチファイルのコピーで
-
FTPとファイルコピーの違いにつ...
-
アクセス クエリを別のファイ...
-
パワポでスライドをコピーでき...
-
vbsでファイルやフォルダのコピ...
-
開いている別のファイルにExcel...
-
bat 同名ファイルコピー時にリ...
おすすめ情報
これだと現在開いているブックが閉じてしまいます。