[[20180926114517]]　『QueryTableを使用について』（なおなお）　ページの最後に飛ぶ

『QueryTableを使用について』（なおなお）

QueryTableを使用で，EXCELに書き出したデータの文字がセルにうまく入りません。

 文字がセルに混合してセル単に分れません。
以下のVBAです。
  どこの設定がおかしいのでしょうか。

        .Name = "MDL_LIST_8"
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = False
        .SaveData = True
       .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .TextFilePromptOnRefresh = False
        .TextFilePlatform = 932
        .TextFileStartRow = 1
        .TextFileParseType = xlFixedWidth
        .TextFileTextQualifier = xlTextQualifierDoubleQuote
        .TextFileConsecutiveDelimiter = False
        .TextFileTabDelimiter = True
        .TextFileSemicolonDelimiter = True 'False
        .TextFileCommaDelimiter = False
        .TextFileSpaceDelimiter = False
        .TextFileColumnDataTypes = Array(1, 1, 1, 1, 1, 1.1)

       ' .TextFileFixedColumnWidths = Array(42, 20, 20, 20, 20, 20, 20)

        .TextFileTrailingMinusNumbers = True
        .Refresh BackgroundQuery:=False
        .Delete

＜使用 Excel：Excel2007、使用 OS：Windows7 ＞

 詳しく見てないが、区切り文字で分割する場合は
 >.TextFileParseType = xlFixedWidth
 ではなく
 >.TextFileParseType = xlDelimited
 だが？
（ねむねむ） 2018/09/26(水) 13:27

 上記を変更したうえで問題が出たら、一度マクロの記録で処理を記録してみてはどうか？
（ねむねむ） 2018/09/26(水) 13:29

 >Array(1, 1, 1, 1, 1, 1.1)
 　　　　　↓
 Array(1, 1, 1, 1, 1, 1,1)　　？？　全部標準みたいだけど・・。

（BJ） 2018/09/26(水) 13:32

 >        .TextFileConsecutiveDelimiter = False
 >        .TextFileTabDelimiter = True
 >       .TextFileSemicolonDelimiter = True 'False
 >       .TextFileCommaDelimiter = False
 >       .TextFileSpaceDelimiter = False

 を削除して

        ' .TextFileFixedColumnWidths = Array(42, 20, 20, 20, 20, 20, 20)
 の行を生かすとどうなりますか？
（seiya） 2018/09/26(水) 13:38

元となるテキストファイルは、どのような形式なのでしょう？ .TextFileTabDelimiter = True ということは、タブ区切りを指定しているのですが、カンマ区切りとか、実際と違っているのでは？

また、文字列として扱うならば、.TextFileColumnDataTypesの中身は全部2にすべきでしょうね。

（???） 2018/09/26(水) 15:24

あ、セミコロンもTrueにしてますね。実はセミコロンではない、とかでしょうねぇ。どれか1つだけTrueにしましょう。
（???） 2018/09/26(水) 15:27

 結局なおなおさんは区切り文字・固定長、どちらで区切りたいのだろうか？
（ねむねむ） 2018/09/26(水) 15:40

コメント返信：

[ 一覧(最新更新順) ]

[[20180926114517]] 『QueryTableを使用について』（なおなお） ページの最後に飛ぶ

[[20180926114517]]　『QueryTableを使用について』（なおなお）　ページの最後に飛ぶ