Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8578 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【32381】4.0マクロについて イノセンス 05/12/13(火) 19:03 質問[未読]
【32385】Re:4.0マクロについて やっちん 05/12/13(火) 20:03 回答[未読]
【32386】Re:4.0マクロについて ponpon 05/12/13(火) 20:26 発言[未読]
【32389】Re:4.0マクロについて Kein 05/12/13(火) 20:35 回答[未読]
【32400】Re:4.0マクロについて Jaka 05/12/14(水) 9:17 発言[未読]
【32490】Re:4.0マクロについて イノセンス 05/12/16(金) 3:19 お礼[未読]
【32381】4.0マクロについて
質問  イノセンス  - 05/12/13(火) 19:03 -
引用なし
パスワード
   どなたか、『4.0マクロ』というのをご存知でしょうか？
今私はその4.0マクロを使ってプログラムを組んでいるんですが、
イマイチよく分かっていません。
下記に仮に組んだ4.0マクロのコードを載せましたので、
このプログラムの翻訳（？）を教えてください。よろしくお願いします。

Sub ブックを開かないでデータを読む()

Dim i As Long, j As Long

For i = 1 To 4
For j = 1 To 4

Cells(i, j) = ExecuteExcel4Macro("'C:\tmp\[databook.xls]sheet1'!R" & i & "C" & j)

Next j
Next i

End Sub

題名どおり、ワークブックを開かないで、ワークブックのシート１のデータを
抽出するといったようなプログラムです。一番よく分からないのは下線を引いている部分ですので、
ご存知の方は下線部の所を重点的に教えていただけたら幸いです。
【32385】Re:4.0マクロについて
回答  やっちん  - 05/12/13(火) 20:03 -
引用なし
パスワード
   ▼イノセンス さん：
こんばんは。
ブックのパス：C:\tmp\
ブック名：databook.xls
シート名：sheet1
行："R"& i
列："C"& j

セルの"A2","B3"は"R2C1","R3C2"という表現もできます。
こういう回答でよろしいでしょうか？
【32386】Re:4.0マクロについて
発言  ponpon  - 05/12/13(火) 20:26 -
引用なし
パスワード
   こんばんは。

これと同じことじゃないですか？

http://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=25559;id=excel
【32389】Re:4.0マクロについて
回答  Kein  - 05/12/13(火) 20:35 -
引用なし
パスワード
   分からないまま使うより、理解しやすい「リンク」を使った方が良いと思います。
リンクは数式の一種ですから、ループしなくても相対参照で一気に矩形のセル範囲に
入力できます。こんな感じです。

Sub ブックを開かないでデータを読む2()
　 With Range("A1:D4")
　　　.Formula = "='C:\tmp\[databook.xls]Sheet1'A1"
　　　.Value = .Value
　 End With
End Sub
【32400】Re:4.0マクロについて
発言  Jaka  - 05/12/14(水) 9:17 -
引用なし
パスワード
   R1C1がわからなかったら、こんな感じにしても良いです。

http://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=7197;id=excel
【32490】Re:4.0マクロについて
お礼  イノセンス  - 05/12/16(金) 3:19 -
引用なし
パスワード
   たくさんの返信どうもありがとうございます！
仕事の都合上、しょっちゅう見る事が出来なくて返信が遅れてしまいました。
どうもすいません。本当にありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8578 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free