Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
51420 / 76738 ←次へ　｜　前へ→
【30188】Re:初歩の初歩なのですが、
回答  Jaka  - 05/10/21(金) 12:04 -
引用なし
パスワード
   こんな感じでもいいと思います。

Dim WBK As Workbook
BNst = Dir("フルパス")
Set WBK = Workbooks.Open(BNst)
ADR = WBK.Sheets(1).UsedRange.Address
WBK.Sheets(1).UsedRange.Copy
ThisWorkbook.Sheets(3).Range(ADR).PasteSpecial (xlPasteAll)
Application.CutCopyMode = False
WBK.Close
Set WBK = Nothing
0 hits
▼ 【30173】初歩の初歩なのですが、 rakkyo 05/10/21(金) 10:22 質問
【30176】Re:初歩の初歩なのですが、 Statis 05/10/21(金) 10:40 発言
【30178】Re:初歩の初歩なのですが、 rakkyo 05/10/21(金) 10:42 質問
【30181】Re:初歩の初歩なのですが、 Statis 05/10/21(金) 10:59 回答
【30182】Re:初歩の初歩なのですが、 Jaka 05/10/21(金) 11:00 回答
【30183】Re:初歩の初歩なのですが、 rakkyo 05/10/21(金) 11:04 質問
【30188】Re:初歩の初歩なのですが、 Jaka 05/10/21(金) 12:04 回答≪
【30189】Re:初歩の初歩なのですが、 rakkyo 05/10/21(金) 12:51 質問
【30194】Re:初歩の初歩なのですが、 Jaka 05/10/21(金) 13:59 発言
【30195】Re:初歩の初歩なのですが、 rakkyo 05/10/21(金) 14:23 質問
【30196】Re:初歩の初歩なのですが、 Jaka 05/10/21(金) 14:38 回答
【30198】Re:初歩の初歩なのですが、 rakkyo 05/10/21(金) 14:47 質問
【30199】Re:初歩の初歩なのですが、 Jaka 05/10/21(金) 14:54 発言
【30200】Re:初歩の初歩なのですが、 rakkyo 05/10/21(金) 14:56 質問
【30203】Re:初歩の初歩なのですが、 Jaka 05/10/21(金) 15:27 発言
【30206】Re:初歩の初歩なのですが、 rakkyo 05/10/21(金) 17:06 お礼
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
51420 / 76738 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free