Web 情報取り込み(ExecWB)


田中  2012-01-19 10:20:09  No: 103207  IP: 192.*.*.*

現在、VB6を使いWebの特定のページを
エクセルに保存する処理を作成しているのですが、
7-9-9が2007/9/9に勝手に変換されてしまいます。
7-9-9で取り込みたいのですが、そのような事が可能なのでしょうか?
(現状は、Format:="テキスト"にし、対応しています)

現状のソース
objIE.ExecWB 17, 0  'OLECMDID_SELECTALL = 17 全てを選択
objIE.ExecWB 12, 0  'OLECMDID_COPY = 12 コピー
xlSheet.Range("A1").Select
xlSheet.PasteSpecial Format:="HTML"

編集 削除