Excel VBA質問箱 IV

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

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


72120 / 76733 ←次へ | 前へ→

【9098】エクセルにインポート(エクスポート?)する
質問  hana  - 03/11/18(火) 15:52 -

引用なし
パスワード
   こんにちは。
VBA初心者です。
エクセルのインポートについて教えてください。
よろしくお願いします。

http://www.vbalab.net/vbaqa/c-board.cgi?cmd=one;no=6470;id=excel
を参考にさせて頂き、作成しました。
やりたい点は、
1.インポート先を閉じていて、インポート元となるファイルを開いた状態でインポートしたい。
  (インポート元にはシートが複数あり、そのときactiveのシートをインポートしたい。)
2.セルAからVの2行目からのデータをインポートしたい。
  (インポート元、インポート先とも、1行目は列名を表示しているので、2行目から行いたい。)
3.インポート先のファイルにデータを蓄積していきたい。
この3点を行いたいと思っているのですが、
エラーが出てしまい、困っています。
間違いをご指摘願えますでしょうか?
よろしくお願いします。

インポート先となるファイルに作成しています。

Sub import()
  With ThisWorkbook.ActiveSheet.Range("A:V")
  .Formula = "=if(" & _
    "'C:\インポート元ファイルの場所\[Data.xls]ActiveSheet'!A1=" & _
        """"",""""," & _
        "'C:\インポート元ファイルの場所\[Data.xls]ActiveSheet'!A1)"
       .Value = .Value
    End With
End Sub

1 hits

【9098】エクセルにインポート(エクスポート?)する hana 03/11/18(火) 15:52 質問
【9123】Re:エクセルにインポート(エクスポート?)... ichinose 03/11/19(水) 2:46 回答
【9135】Re:エクセルにインポート(エクスポート?)... hana 03/11/19(水) 11:58 質問
【9162】Re:エクセルにインポート(エクスポート?)... ichinose 03/11/19(水) 19:13 回答
【9202】Re:エクセルにインポート(エクスポート?)... hana 03/11/21(金) 9:48 お礼

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