メインコンテンツへスキップ

別のワークシートからデータをインポートするにはどうすればよいですか?

Excelファイルを操作するときに、別のワークシートから現在のワークシートにデータをインポートしたい場合があります。 今日は、この問題に対処するためのいくつかの興味深いトリックについてお話します。

接続機能を使用して別のワークシートからデータをインポートする

VBAコードを使用して別のワークシートからデータをインポートする

Kutools forExcelを使用して別のワークシートからデータをインポートする


矢印青い右バブル 接続機能を使用して別のワークシートからデータをインポートする

あなたが精通している場合 Connections Excelの機能を使用すると、別のワークシートデータを現在のブックにインポートでき、インポートしたデータは元のデータで自動的に更新されます。

1。 クリックしてください 且つ > Connections、スクリーンショットを参照してください:

doc-import-data-to-worksheet-1

2。 の中に ワークブックの接続 ダイアログ、クリック Add ボタン、そして飛び出した 既存の接続 ダイアログ、クリック もっと見る ボタン、スクリーンショットを参照してください:

doc-import-data-to-worksheet-2
-1
doc-import-data-to-worksheet-3

3。 次に、データを現在のワークシートにエクスポートするブックを選択します。

doc-import-data-to-worksheet-1

4。 ワークブックを選択したら、をクリックしてください Open ボタンをクリックし、使用するワークシートをXNUMXつ選択します。 スクリーンショットを参照してください:

doc-import-data-to-worksheet-1

5。 次に、をクリックします OK、に戻ります ワークブックの接続 ダイアログボックスが表示され、選択したブックがリストボックスに追加されたら、このダイアログを閉じてください。

6。 次にクリックします 且つ > 既存の接続、スクリーンショットを参照してください:

doc-import-data-to-worksheet-1

7。 の中に 既存の接続 ダイアログボックスで、今追加したブックをクリックし、をクリックします Open ボタン。 スクリーンショットを参照してください:

doc-import-data-to-worksheet-1

8。 そして飛び出した データのインポート ダイアログで、から好きなオプションをXNUMXつ選択します ブックでこのデータを表示する方法を選択します、次に、既存のワークシート範囲または新しいワークシートのいずれかを選択してデータを配置します。

doc-import-data-to-worksheet-1

9。 次に、をクリックします OK、別のワークシートのデータが指定したワークシートにインポートされました。

doc-import-data-to-worksheet-1

注意:

1.この方法を使用すると、次のタイプのデータをインポートできます。 テーブル, ピボットテーブルレポート or PivotChartと ピボットテーブルレポート.

2.自分のワークブックで最新のデータを取得する場合は、ワークブックがその外部データに接続されています。 に移動 且つ > すべてリフレッシュ 更新されたデータを取得します。

doc-import-data-to-worksheet-1


矢印青い右バブル VBAコードを使用して別のワークシートからデータをインポートする

上記の方法には非常に多くのステップがあり、疲れを感じるかもしれません。ここでは、次のVBAコードも別のワークシートからデータをインポートするのに役立ちます。

1。 を押し続けます Alt + F11 キー、そしてそれは開きます Microsoft Visual Basic forApplicationsウィンドウ.

2に設定します。 OK をクリックします。 インセット > モジュール、次のコードをに貼り付けます モジュールウィンドウ.

VBAコード:別のワークシートからデータをインポートする

Sub ImportDatafromotherworksheet()
    Dim wkbCrntWorkBook As Workbook
    Dim wkbSourceBook As Workbook
    Dim rngSourceRange As Range
    Dim rngDestination As Range
    Set wkbCrntWorkBook = ActiveWorkbook
    With Application.FileDialog(msoFileDialogOpen)
        .Filters.Clear
        .Filters.Add "Excel 2007-13", "*.xlsx; *.xlsm; *.xlsa"
        .AllowMultiSelect = False
        .Show
        If .SelectedItems.Count > 0 Then
            Workbooks.Open .SelectedItems(1)
            Set wkbSourceBook = ActiveWorkbook
            Set rngSourceRange = Application.InputBox(prompt:="Select source range", Title:="Source Range", Default:="A1", Type:=8)
            wkbCrntWorkBook.Activate
            Set rngDestination = Application.InputBox(prompt:="Select destination cell", Title:="Select Destination", Default:="A1", Type:=8)
            rngSourceRange.Copy rngDestination
            rngDestination.CurrentRegion.EntireColumn.AutoFit
            wkbSourceBook.Close False
        End If
    End With
End Sub

3。 次に、 F5 このコードを実行するためのキーを押し、データを現在のブックに挿入するブックを選択します。スクリーンショットを参照してください。

doc-import-data-to-worksheet-1

4。 ブックを選択したら、をクリックします Open ボタンをクリックし、エクスポートする必要のあるデータをワークシートまたは指定したワークブックの範囲から選択します。 スクリーンショットを参照してください:

doc-import-data-to-worksheet-1

5. 次に、をクリックします。 OK、およびインポートしたデータを現在のワークシートに配置するセルをXNUMXつ選択します。スクリーンショットを参照してください。

doc-import-data-to-worksheet-1

6。 クリックしてください OK、および選択したデータがワークシートにインポートされました。

注: この方法では、インポートされたデータは元のデータで更新されません。


矢印青い右バブル Kutools forExcelを使用して別のワークシートからデータをインポートする

Kutools for Excel 提供する カーソル位置にファイルを挿入 この問題を解決するための機能。

Kutools for Excel 300以上の便利なExcelツールが含まれています。 30日以内に制限なしで無料でお試しいただけます。 今すぐ入手

1。 別のワークシートデータを挿入するワークブックを開きます。

2に設定します。 OK をクリックします。 Enterprise > インポート・エクスポート > カーソル位置にファイルを挿入、スクリーンショットを参照してください:

doc-import-data-to-worksheet-1

3。 とで カーソル位置にファイルを挿入 ダイアログボックスで、データを配置するセルを選択し、をクリックします。 ブラウズ ボタンをクリックして、挿入するワークブックをXNUMXつ選択します。

doc-import-data-to-worksheet-1

4。 次に、をクリックします OK、ワークシートに複数のワークシートが含まれている場合は、[ワークシートの選択]ダイアログからXNUMXつのワークシートを選択します。スクリーンショットを参照してください。

doc-import-data-to-worksheet-1

5。 そして、 OK、選択したワークシートが特定のワークシートにインポートされました。

Note:この方法では、インポートされたデータは元のデータで更新されません。

このカーソル位置にファイルを挿入機能の詳細を知るため。


関連記事:

Excelでテキストファイルまたはワークシートをインポートするにはどうすればよいですか?

最高のオフィス生産性向上ツール

🤖 Kutools AI アシスタント: 以下に基づいてデータ分析に革命をもたらします。 インテリジェントな実行   |  コードを生成  |  カスタム数式の作成  |  データを分析してグラフを生成する  |  Kutools関数を呼び出す...
人気の機能: 重複を検索、強調表示、または識別する   |  空白行を削除する   |  データを失わずに列またはセルを結合する   |   数式なしのラウンド ...
スーパールックアップ: 複数の基準の VLookup    複数の値の VLookup  |   複数のシートにわたる VLookup   |   ファジールックアップ ....
詳細ドロップダウン リスト: ドロップダウンリストを素早く作成する   |  依存関係のドロップダウン リスト   |  複数選択のドロップダウンリスト ....
列マネージャー: 特定の数の列を追加する  |  列の移動  |  Toggle 非表示列の表示ステータス  |  範囲と列の比較 ...
注目の機能: グリッドフォーカス   |  デザインビュー   |   ビッグフォーミュラバー    ワークブックとシートマネージャー   |  リソースライブラリ (自動テキスト)   |  日付ピッカー   |  ワークシートを組み合わせる   |  セルの暗号化/復号化    リストごとにメールを送信する   |  スーパーフィルター   |   特殊フィルター (太字/斜体/取り消し線をフィルター...) ...
上位 15 のツールセット12 テキスト ツール (テキストを追加, 文字を削除する、...)   |   50+ チャート 種類 (ガントチャート、...)   |   40+ 実用的 (誕生日に基づいて年齢を計算する、...)   |   19 挿入 ツール (QRコードを挿入, パスから画像を挿入、...)   |   12 変換 ツール (数字から言葉へ, 通貨の換算、...)   |   7 マージ&スプリット ツール (高度な結合行, 分割セル、...)   |   ... もっと

Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。  最も必要な機能を入手するにはここをクリックしてください...

説明


Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作​​業をはるかに簡単にします

  • Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!
Comments (12)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
How to import only values with VBA, this VBA paste formulas when importing?
This comment was minimized by the moderator on the site
Amazing, thank you
This comment was minimized by the moderator on the site
This post is FANTASTIC!!!! This is extremely helpful! Thank you!!!
This comment was minimized by the moderator on the site
How can i use relative paths instead of fixed paths,
because these files will be uploaded to SVN and paths will be differ
This comment was minimized by the moderator on the site
This was incredibly useful. Thank you!
This comment was minimized by the moderator on the site
I am using the VBA Code. How can I unhide and remove all filter before select source range?
This comment was minimized by the moderator on the site
Sub Clear()
'
' Clean Sheet
'
Dim A As Long

Sheets("Sheet1").Select
ActiveSheet.Range("Range").Select
Selection.Clear

End Sub


Example
range mean A2:D35
This comment was minimized by the moderator on the site
How do I adapt the VBA code so that it will continuously update with another file?
This comment was minimized by the moderator on the site
I want to learn VBA, can you give me the number of WhatsApp to facilitate communication
This comment was minimized by the moderator on the site
Hit the record button in execl and ALT+f11 look at the code and then change it run it its the way learnt well that was 20year ago
Even know I still hit the record and change it to fix the problem
This comment was minimized by the moderator on the site
Hi, It is very useful for me and my organisation. I need help in this. While connecting the excel files I am not able to open the html links which are there in main file. Please help me out on this.
This comment was minimized by the moderator on the site
How would you adjust the VBA code so that it would paste selections as values?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations