VBA初心者です。
ACCESS VBAからExcelブック2のシート「データ①」をExcelブック1のシート「データ①」へコピーしたいのですが、インデックスが有効でないとのエラーで先にすすめません。
どなたかをご教授願います。
Private Sub Ps_Excel_Data_Set()
Dim strNewFileName As String
Dim strOldFileName As String
Dim xlApp As Object
Dim xlBook1 As Object
Dim xlBook2 As Object
Dim xlSheet As Object
strNewFileName = "c:\ブック1.xls"
strOldFileName = "c:\ブック2.xls"
'エクセル展開
Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = False
xlApp.UserControl = False
xlApp.DisplayAlerts = False
Set xlBook1 = xlApp.Workbooks.Open(strNewFileName)
Set xlBook2 = xlApp.Workbooks.Open(strOldFileName)
'シート削除
xlBook1.Worksheets("DATA①").Delete
xlBook1.Worksheets("DATA②").Delete
'****************ここでエラーが出ています!
'シートコピー
'xlBook2.Worksheets("DATA①").Copy after:=xlApp.Workbooks(strNewFileName).sheets(1)
'**************************************
'エクセルファイルを閉じる
xlBook2.Close (False)
Set xlSheet = Nothing
Set xlBook2 = Nothing
'エクセルファイルを閉じる
xlBook1.Close (True)
xlApp.Quit
'オブジェクトの開放
Set xlBook1 = Nothing
Set xlApp = Nothing
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Visual Basic(VBA) VBA 別ブックからの転記の高速化について VBA 別ブックからの転記の高速化についてご教授下さい。 19 2022/07/26 13:07
- Visual Basic(VBA) このVBAでExcelアプリケーションを作成は必要ですか? 3 2023/07/19 21:13
- Visual Basic(VBA) 【ご教示ください】VBAの記述方法がわかりません。 2 2022/08/12 21:28
- Visual Basic(VBA) 2つ目のコンボボックスが動作しません。 3 2023/03/25 12:29
- Visual Basic(VBA) 別ブックからシートのコピー 3 2022/04/01 20:07
- Visual Basic(VBA) 【前回の続き続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/24 20:49
- Visual Basic(VBA) excel vbaでvlooupの変数がわかりません。 7 2022/05/30 09:35
- その他(Microsoft Office) マクロVBAについて 1 2022/09/06 18:12
- Visual Basic(VBA) VBAが止まります。 1 2022/09/02 14:51
このQ&Aを見た人はこんなQ&Aも見ています
-
「どうして捨てられないの?」前妻の物を捨てられない男性の心理って?
前妻の物を捨てられない理由に加え、捨てるための手段はあるのかを専門家に聞いてみた!
-
ACCESSのVBAにてExcelのシートをコピーしたい
その他(データベース)
-
アクセスからエクセルのシートを追加して、名前をつける方法
Excel(エクセル)
-
アクセスVBAで既に開いているエクセルを閉じたい
Yahoo!ショッピング
-
-
4
Access VBAから使用したExcelプロセスを閉じる方法について
Visual Basic(VBA)
-
5
アクセスvbaでエクセルブックを保存
その他(Microsoft Office)
-
6
Access VBAからExcelシートの削除
Excel(エクセル)
-
7
ACCESS、VBAでEXCELファイルをコピーはできますか
その他(データベース)
-
8
AccessVBAで作成したExcelファイルを削除する方法は?
Visual Basic(VBA)
-
9
Access サブフォームでの選択行の取得
その他(データベース)
-
10
VBA シートをコピーする際に Copyメソッドは失敗しましたのエラーが出てしまいます
Visual Basic(VBA)
-
11
Access-VBAでExcelファイルを作成する。
Excel(エクセル)
-
12
ACCESSのVBAにてExcelに行を追加したい
その他(データベース)
-
13
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
-
14
ACCESS VBAで作成済のExcelのコピーを作りたい
Visual Basic(VBA)
-
15
ACCESSのVBで、エクセルファイルの最終行を取得
Excel(エクセル)
-
16
Access エクセルシート名変更
その他(プログラミング・Web制作)
-
17
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
18
ACCESSからEXCELの PasteSpecial でエラーになる
Excel(エクセル)
-
19
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
20
新規レコード行を非表示にしたい
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルVBAが途中で止まります
-
VBA シートをコピーする際に Co...
-
ワイルドカード「*」を使うとう...
-
VBS Bookを閉じるコード
-
別ブックをダイアログボックス...
-
【マクロ】違うフォルダにある...
-
VBA 別ブックからコピペしたい...
-
vbaでvbaProjectのパスワード解...
-
VBAで複数のブックを開かずに処...
-
VBAで別のブックにシートをコピ...
-
マクロVBA 1シートをまとめ...
-
【ExcelVBA】インデックスが有...
-
VBAで別ブックのシートを指定し...
-
VBA シート名が一致した場合の...
-
【ExcelVBA】zip圧縮されたCSV...
-
VBSでExcelのオープン確認
-
vbaで他のブックに転記したい。...
-
エクセルVBAでテキストボックス...
-
複数のエクセルブックをひとつ...
-
同フォルダ内の串刺し集計と文...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBA シートをコピーする際に Co...
-
エクセルVBAが途中で止まります
-
ワイルドカード「*」を使うとう...
-
別ブックをダイアログボックス...
-
VBAで別ブックのシートを指定し...
-
Excelのマクロについて教えてく...
-
VBA 別ブックからコピペしたい...
-
Excelのマクロについて教えてく...
-
vbaでvbaProjectのパスワード解...
-
VBA コードを実行すると画面が...
-
【マクロ】アクティブセルにブ...
-
Excelのマクロについて教えてく...
-
VBAで別のブックにシートをコピ...
-
VBS Bookを閉じるコード
-
Excelのマクロについて教えてく...
-
【ExcelVBA】zip圧縮されたCSV...
-
【ExcelVBA】インデックスが有...
-
ACCESSVBA からExcelの他ブック...
-
vbaで他のブックに転記したい。...
-
【マクロ】違うフォルダにある...
おすすめ情報