列数不定のCSVの取り込み
「パワク4本目」
Power Query(M言語)の問題と解答・解説
ツイッターで問題を出して、それに解答と解説をしていく形でPower QueryとM言語の理解を深めていきます。
パワク4本目

列数不定のCSVをパワクで取り込んでください。
1行目をヘッダーして使用してください。
※バス・ファイル.名の指定は任意
※文字コードはUTF8(BOMなし)
※テストデータはメモ帳等で作成してください。
列数の変化に対応するだけの基本問題です。
#PowerQuery #M言語
解答コード

let
ソース = Csv.Document(File.Contents("D:\パワク練習\CSV\test.csv"),
[Delimiter=",", Columns=null, Encoding=TextEncoding.Utf8, QuoteStyle=QuoteStyle.None]),
昇格されたヘッダー数 = Table.PromoteHeaders(ソース, [PromoteAllScalars=true])
in
昇格されたヘッダー数
let
ソース = Csv.Document(File.Contents("D:\パワク練習\CSV\test.csv"),
[Delimiter=",", Columns=4, Encoding=65001, QuoteStyle=QuoteStyle.None]),
昇格されたヘッダー数 = Table.PromoteHeaders(ソース, [PromoteAllScalars=true])
in
昇格されたヘッダー数
Columns=4, Encoding=65001
この部分だけになります。
Columns=4
これは削除してしまっても良いですが、null指定でも列数不定に対応できます。
Encoding=65001
これは数値指定でもよいのですが、後々の事を考えて列挙型の指定に変更しています。
これらについては後述します。
GUI操作での作成


今回はクエリを変更したいので、「データの変換」
「1行目をヘッダーとして使用」


これらは不要なので削除します。

「詳細エディター」をみると、
let
ソース = Csv.Document(File.Contents("D:\パワク練習\CSV\test.csv"),
[Delimiter=",", Columns=4, Encoding=65001, QuoteStyle=QuoteStyle.None]),
昇格されたヘッダー数 = Table.PromoteHeaders(ソース, [PromoteAllScalars=true])
in
昇格されたヘッダー数
Columns=4, Encoding=65001
この部分を変更したものが最初の解答コードになります。
Csv.Document
delimiter は、行を連続する空白文字で分割する必要があることを示す、1 文字、文字の一覧、または値 "" を指定できます。 既定値:","。
extraValues のサポートされる値については、ExtraValues.Type を参照してください。
encoding はテキストのエンコードの種類を指定します。
解答でのスクリブトも上記とは違う使い方になっています。
Learnには続けて以下のように書かれています
レコードが columns (delimiter、extraValues、encoding は null) に対して指定されている場合、次のレコード フィールドを指定することができます。
なかなか難しい書き方をしてくれています・・・
つまり、第二構文として、
Csv.Documentのcolumnsにレコード指定する場合
この時のレコードフィールドとして以下が指定できます。
既定値:","。
列数が入力で見つかった数よりも少ない場合、追加の列は無視されます。
列数が入力で見つかった数よりも多い場合、追加の列は null になります。
指定しない場合、列数は入力で見つかったものによって決まります。
既定値: 65001 (UTF-8)。
CsvStyle.QuoteAfterDelimiter (既定値): フィールド内の引用符は、区切り記号の直後でのみ有効です。
CsvStyle.QuoteAlways: フィールド内の引用符は、使用される場所を問わずいつでも有効です。
QuoteStyle.None (既定値): すべての改行は、引用符で囲まれた値の中で出現した場合でも、現在の行の末尾として扱われます。 QuoteStyle.Csv: 引用符で囲まれた改行は、現在の行の末尾としてではなく、データの一部として扱われます。
TextEncoding列挙型

名前 | 値 | 説明 |
TextEncoding.Utf16 | 1200 | UTF16 リトル エンディアン バイナリ形式を選択するために使用します。 |
TextEncoding.Unicode | 1200 | UTF16 リトル エンディアン バイナリ形式を選択するために使用します。 |
TextEncoding.BigEndianUnicode | 1201 | UTF16 ビッグ エンディアン バイナリ形式を選択するために使用します。 |
TextEncoding.Windows | 1252 | Windows バイナリ形式を選択するために使用します。 |
TextEncoding.Ascii | 20127 | ASCII バイナリ形式を選択するために使用します。 |
TextEncoding.Utf8 | 65001 | UTF8 バイナリ形式を選択するために使用します。 |
同じテーマ「PowerQuery(M言語)入門」の記事
別ブックのシートを列可変で取り込む
セル値でパス・ブック・シート名を指定
別ブックの最終シートの取り込み
列数不定のCSVの取り込み
CSVのA列が日付の行だけを取り込む
A列のヘッダー名を変更する
「売上」が数値の行のみ取り込む
2つのテーブルのマージ
グルーブ内の最小・最大
グルーブ内の最小・最大
有効な最新単価の取得
新着記事NEW ・・・新着記事一覧を見る
WshNetwork(ネットワークドライブの割り当て等)|VBA技術解説(2025-04-09)
TRANSLATE関数(翻訳) DETECTLANGUAGE関数(言語識別)|エクセル入門(2025-04-08)
QRコード、バーコード作成の覚え書き|エクセル関数応用(2025-04-05)
TRIMRANGE関数(セル範囲をトリム:端の空白セルを除外)|エクセル入門(2024-08-30)
正規表現関数(REGEXTEST,REGEXREPLACE,REGEXEXTRACT)|エクセル入門(2024-07-02)
エクセルが起動しない、Excelが立ち上がらない|エクセル雑感(2024-04-11)
ブール型(Boolean)のis変数・フラグについて|VBA技術解説(2024-04-05)
テキストの内容によって図形を削除する|VBA技術解説(2024-04-02)
ExcelマクロVBA入門目次|エクセルの神髄(2024-03-20)
VBA10大躓きポイント(初心者が躓きやすいポイント)|VBA技術解説(2024-03-05)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得(End,Rows.Count)|VBA入門
2.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
3.繰り返し処理(For Next)|VBA入門
4.変数宣言のDimとデータ型|VBA入門
5.RangeとCellsの使い方|VBA入門
6.ひらがな⇔カタカナの変換|エクセル基本操作
7.セルのクリア(Clear,ClearContents)|VBA入門
8.メッセージボックス(MsgBox関数)|VBA入門
9.ブックを閉じる・保存(Close,Save,SaveAs)|VBA入門
10.条件分岐(Select Case)|VBA入門
- ホーム
- その他
- PowerQuery(M言語)入門
- 列数不定のCSVの取り込み
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。