Excel VBA質問箱 IV

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

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


24447 / 76732 ←次へ | 前へ→

【57633】Re:txtファイル出力の際に、出力する行を指定したい
発言  Yuki  - 08/9/6(土) 9:52 -

引用なし
パスワード
   ▼くりぃむ さん:
こんにちは。

考え方として

テーブルA 用のファイル
テーブルB 用のファイル
テーブルC 用のファイル
のテキストファイルを作成して
変更のあった時は各々のテキストファイルを更新

その後で下記を実行
生成されるファイル名は
  strFnm = "D:\Table.txt"
になります。

Sub TESTAdd()
  ' ファイルの結合
  Dim WSH   As Object
  Dim strFnm As String
  Dim strFnm1 As String
  Dim strFnm2 As String
  Dim strFnm3 As String
  Dim pID   As Long
  
  strFnm = "D:\Table.txt"   ' 生成されるファイル
  strFnm1 = "D:\TableA.txt"  ' Data File 1
  strFnm2 = "D:\TableB.txt"  ' Data File 2
  strFnm3 = "D:\TableC.txt"  ' Data File 3
  
  Set WSH = CreateObject("WScript.Shell")
  pID = WSH.Run("CMD.Exe /c Copy " & strFnm1 & " + " & _
                    strFnm2 & " + " & _
                    strFnm3 & " " & _
                    strFnm, 0, True)
  MsgBox "End"
End Sub

考え方の一つとして下さい。
0 hits

【57630】txtファイル出力の際に、出力する行を指定したい くりぃむ 08/9/6(土) 2:33 質問
【57633】Re:txtファイル出力の際に、出力する行を指... Yuki 08/9/6(土) 9:52 発言
【57634】Re:txtファイル出力の際に、出力する行を指... kanabun 08/9/6(土) 9:53 発言
【57652】Re:txtファイル出力の際に、出力する行を指... くりぃむ 08/9/7(日) 0:06 お礼

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