ワークシートからデータをコピーするExcelマクロ

Question

タイトルによれば、特定のファイルのデータをブックの新しいタブにコピーしようとしていますが、マクロはクエリ定義のみをコピーしますそれはデータそのものを取得するために使用されていたと私は推測しています。

私はすでに外部ソースへの接続をすべて削除しましたが、それでも問題は解決されませんでした。ここでは、ペースト結果のスクリーンショットです：

は、ここで私は貼り付けるには使用しています私のコードの一部です：

Set DestWS = wkbDest.Sheets(Curr_Input_File) 
If Len(wkbDest.Sheets(Curr_Input_File).Range("A1").Value) > 0 Then 
    wkbDest.Sheets(Curr_Input_File).UsedRange.ClearContents 
    SheetToCopy.UsedRange.Copy 
    DestWS.Range("A1").PasteSpecial xlPasteAll 
    Application.CutCopyMode = False 
Else 
    SheetToCopy.UsedRange.Copy 
    DestWS.Range("A1").PasteSpecial xlPasteAll 
    Application.CutCopyMode = False 

End If 

私は他のすべてのファイルがあるので、コピー/ペーストループが動作します知っています問題なしにコピー/貼り付けただし、このファイルについてのみ、上記の問題が発生しています。どのようにしてクエリの代わりに実際のデータを貼り付けるようにコードすることができますか？ FWIW、ソースデータファイルのどこにでもクエリが表示されません。

Answer 1

さて、答えは明らかですが、わかりました。 SQLクエリ定義を含む隠しシートがありました。私のコピーコードは、ブック内の最初のタブをデフォルトでSheetToCopy = wkbSource.Sheets(1)でコピーしていたため、SQLクエリーを取得していました。

私はあなたがシートを隠すことさえ知りませんでした。 [セル]セクションの[ホーム]タブに移動し、[フォーマット] - > [&]の順にクリックします。