皆さん、こんにちは
SQL Serverからの抽出プログラムをExcelで作りこんで実行しているのですが、Excel 2013へアップグレードしてから1回目は問題なく実行できるのですが2回目は必ずエラーが発生します。
何方か下記のどの文がExcel 2013で使用できなくなったかアドバイスしていただけませんでしょうか?ちなみにExcel 2010では何度で実行しても問題は発生しません。
With ActiveSheet.ListObjects.Add(SourceType:=0, Source:="ODBC;DSN=SQL_Server;Database=DATABASE;UID=xxxx;PWD=xxxxx" _
, Destination:=Range("$A$1")).QueryTable
.CommandText = (wSQLquery)
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = False
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.PreserveColumnInfo = True
.ListObject.DisplayName = "Extract_Data"
.Refresh BackgroundQuery:=False
End With
よろしくお願いします。
A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
こんばんは。
今は、試していませんが、
>2010では何度で実行しても問題は発生しません
ざっとみると、どのExcelでも、1回めはできても、2回めはうまくないような気がしますけれども。
今は、Excel 2013はインストールしていないので、正確には申し上げられないけれども、
ActiveSheet.ListObjects.Add
は、一つのシートでは繰り返しができないことも多いかと思います。
With ActiveSheet.ListObjects(1)
最後のコードで、ListObject を削除していないのですから、当然、ListObjects(1)とかが、ActiveSheet上に残っているはずですから、それを再利用すればよいはずです。
回答ありがとうございます。
このコードの前で当該シートのコンテンツをクリアーしているのでAddでないと以前のバージョンでは動かなかったんです。
でも確かにDisplayNameとか何かが残っているかもしれませんね。確かめてみます
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Visual Basic(VBA) [Excel VBA] このコードでは行の挿入や行の消去をすると13のエラーが出てしまう。 3 2022/12/09 00:29
- Excel(エクセル) Excelのマクロコードについて教えてください。 1 2022/03/27 10:47
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- Excel(エクセル) Excelでnullになるような式のセルをマクロで空白行と認識させるにはどうすればいいですか? 3 2023/03/13 13:42
- Visual Basic(VBA) マクロを短くする 1 2023/01/15 00:11
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/08/10 14:24
- Visual Basic(VBA) 動きっぱなしです。止め方とプロシージャの間違いを教えて下さい! 5 2022/08/15 23:08
- Excel(エクセル) 2つのVBAを一緒にしたら機能しなくなりました(エクセル) 7 2022/06/02 12:41
- Visual Basic(VBA) vbaのエラー対応(実行時エラー7:メモリが不足しています) 4 2023/04/24 00:20
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA一覧取得 再投稿
-
VBA一覧取得
-
エクセルVBAについて
-
【ExcelVBA】値を変更しながら...
-
VBA 複数のエクセルから一つの...
-
VBA ユーザーフォーム ボタンク...
-
VBAに詳しい方教えてください。
-
VBA実行後に元のセルに戻りたい
-
VBAコンボボックスで選択した値...
-
エクセルについて
-
Vba SelStart、SelLen教えてく...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
ExcelのVBAコードについて教え...
-
【マクロ】1つのマクロの中に...
-
Vba 実数および実数タイプの変...
-
VBA レジストリの値の読み方に...
-
VBAの計算で@が出てしまう件
-
VBA 複数条件の分岐処理の上手...
-
VB.net(VB)で、フォームにExcel...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel VBA 定義されたプロージ...
-
Excel-VBAのmsgBox()の不思議
-
【VBA】マクロの入ったファイル...
-
VBA 複数条件の分岐処理の上手...
-
現在のブックを閉じないで、マ...
-
VBAで各列の"+"と"o"の合計数を...
-
VBAに詳しい方教えてください。
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
ユーザーフォームに別シートか...
-
エクセルのマクロについて教え...
-
ExcelVBA シート名を複数セルか...
-
エクセルのマクロについて教え...
-
VBA listBoxから
-
Excelのマクロについて教えてく...
-
エクセルのマクロについて教え...
おすすめ情報