Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


6661 / 13644 ツリー ←次へ | 前へ→

【43916】設定したファイル、シートを呼び出したい さとし 06/10/29(日) 18:51 質問[未読]
【43917】Re:設定したファイル、シートを呼び出したい かみちゃん 06/10/29(日) 19:09 発言[未読]
【43920】Re:設定したファイル、シートを呼び出したい さとし 06/10/29(日) 19:32 質問[未読]
【43921】Re:設定したファイル、シートを呼び出したい かみちゃん 06/10/29(日) 19:49 発言[未読]
【43932】Re:設定したファイル、シートを呼び出したい さとし 06/10/30(月) 8:04 お礼[未読]
【43919】Re:設定したファイル、シートを呼び出したい ponpon 06/10/29(日) 19:22 発言[未読]
【43931】Re:設定したファイル、シートを呼び出したい さとし 06/10/30(月) 8:03 お礼[未読]

【43916】設定したファイル、シートを呼び出したい
質問  さとし  - 06/10/29(日) 18:51 -

引用なし
パスワード
   はじめまして

現在のファイルの任意の場所にdir名、ファイル名、シート名が入っています。他に保存されたファイル、シートを呼び出し、現在のファイルにコピーしたいのですが・・・・
  
dir名 = Cells(i, 4)
結合ファイル名 = Cells(i, 5)
シート名 = Cells(i,6)


'ファイルの呼び出し
Workbooks.Open Filename:=dir名 & 結合ファイル名 

----ココまでは呼び出しますが、シートの呼び出し方が分かりません---

【43917】Re:設定したファイル、シートを呼び出し...
発言  かみちゃん  - 06/10/29(日) 19:09 -

引用なし
パスワード
   こんにちは。かみちゃん です。

> シートの呼び出し方が分かりません

呼び出し方というのは、アクティブにする方法ですか?
「マクロの記録」で記録できますが、試されましたか?

【43919】Re:設定したファイル、シートを呼び出し...
発言  ponpon  - 06/10/29(日) 19:22 -

引用なし
パスワード
   変数で受けたらどうでしょう?

  Dim newWB As WorkBook

  Set newWB = Workbooks.Open(Filename:=dir名 & 結合ファイル名)
  newWB.Sheets(シート名)・・・・・・

【43920】Re:設定したファイル、シートを呼び出し...
質問  さとし  - 06/10/29(日) 19:32 -

引用なし
パスワード
   返事有り難うございます

Workbooks.Open Filename:=dir名 & 結合ファイル名
として指定したファイルをアクティブ(呼び出し)までは出来ましたが・・


「マクロの記録」で指定したシートは出来ます。
Sheets("aaa").Select
と記録され、マクロでは「aaa」のシートを選択します。
が、たとえばa1セルに入った「bbb」という名前ののシートを呼び出す方法が分かりません。
宜しくお願いします。

【43921】Re:設定したファイル、シートを呼び出し...
発言  かみちゃん  - 06/10/29(日) 19:49 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>「マクロの記録」で指定したシートは出来ます。
>Sheets("aaa").Select
>と記録され、マクロでは「aaa」のシートを選択します。
>が、たとえばa1セルに入った「bbb」という名前ののシートを呼び出す方法が分かりません。

以下のコードを試してみてください。

Dim aaa As String

'「aaa」という名前のシートを直接指定する
Sheets("aaa").Select

'変数に格納する場合
aaa = "bbb"
Sheets(aaa).Select '※1

'変数に格納する場合(セルの値を参照)
aaa = Range("A1").Value
Sheets(aaa).Select '※1

'セルの値を直接参照する場合
Sheets(Range("A1").Value).Select '※1

※1は。どれも同じ意味です。
"aaa" と aaa の内容は、まったく違うことも理解してください。

【43931】Re:設定したファイル、シートを呼び出し...
お礼  さとし  - 06/10/30(月) 8:03 -

引用なし
パスワード
   ▼ponpon さん
早々に試しました。問題解決致しました。有り難うございました。

【43932】Re:設定したファイル、シートを呼び出し...
お礼  さとし  - 06/10/30(月) 8:04 -

引用なし
パスワード
   ▼かみちゃん さん
様々な方法有り難うございました。aaaと"aaa"が違うことを再認識致しました。

6661 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free