Excel VBA質問箱 IV

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

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


40728 / 76732 ←次へ | 前へ→

【41096】外部データの取り込みにおける文字化けについて
質問  taka  - 06/7/29(土) 10:48 -

引用なし
パスワード
   どなたか外部データの取り込みにおける文字化けを防止できるマクロについておしえていただけないでしょうか?

エクセルにより外部データの取り込みをおこなうと、文字化けするページがあります。これはなんらかの方法で、文字化けせずに取り込みをおこなえるものでしょうか?何卒、宜しくお願いいたします。

ちなみに記述したマクロは以下のとおりです。

With ActiveSheet.QueryTables.Add(Connection:= _
    "URL;http://jp.moneycentral.msn.com/investor/invsub/results/statemnt.aspx?lstStatement=CashFlow&Symbol=9501" _
    , Destination:=Range("A1"))
    .Name = "statemnt.aspx?lstStatement=CashFlow&Symbol=9501"
    .FieldNames = True
    .RowNumbers = False
    .FillAdjacentFormulas = False
    .PreserveFormatting = True
    .RefreshOnFileOpen = False
    .BackgroundQuery = True
    .RefreshStyle = xlInsertDeleteCells
    .SavePassword = False
    .SaveData = True
    .AdjustColumnWidth = True
    .RefreshPeriod = 0
    .WebSelectionType = xlSpecifiedTables
    .WebFormatting = xlWebFormattingNone
    .WebTables = "7"
    .WebPreFormattedTextToColumns = True
    .WebConsecutiveDelimitersAsOne = True
    .WebSingleBlockTextImport = False
    .WebDisableDateRecognition = False
    .WebDisableRedirections = False
    .Refresh BackgroundQuery:=False
  End With

1 hits

【41096】外部データの取り込みにおける文字化けについて taka 06/7/29(土) 10:48 質問
【41097】Re:外部データの取り込みにおける文字化け... Blue 06/7/29(土) 12:23 発言
【41109】Re:外部データの取り込みにおける文字化け... taka 06/7/30(日) 13:23 質問
【41116】Re:外部データの取り込みにおける文字化け... Blue 06/7/30(日) 21:08 発言

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