| 
    
     |  | ▼くま さん: >以前にこちらで質問させていただいた者です。
 >
 >質問【67107】にて下記の回答を頂き、イミディエイトウィンドウにて、想定通りの結果が抽出・表示されることを確認できたのですが、
 >そのイミディエイトウィンドウに表示されたものを、新しいブックのシートに書き出したいのですが、その方法をご教授いただけないでしょうか。
 単純にdebug.printをWorkbooks("Book1").Sheets("Sheet1").Range("A1")
 でとりあえずできますが、表示のしかたで工夫が必要ですが、
 hostnameが一文と仮定すれば、
 
 gyo= Range("$A$10000").End(xlUp).Row+1
 Workbooks("Book1").Sheets("Sheet1").Range("A"& GYO)
 A列にループの間、下に記入できますが。
 
 >また、最終的にはフォルダ内の全ログファイルを処理し、
 >Book1のsheet1に続けて表示するマクロにしたいので、
 >そちらも教えていただけないでしょうか。
 
 ** これだけでは、なんとも回答はしにくいですね。**
 
 
 |  |