CSV のカーソル位置の列を削除

CSV のカーソル位置の列(縦)を一括削除します。

// -----------------------------------------------------------------------------
// CSVのカーソル位置の列を削除
//
// Copyright (c) Kuro. All Rights Reserved.
// www:    https://www.haijin-boys.com/
// -----------------------------------------------------------------------------

with (document.selection) {
    // カーソルを行頭に移動
    StartOfLine(true, mePosLogical);
    // カーソル位置までのカンマの数を取得(手抜き)
    var l = Text.split(",").length;
}
// 改行コードで配列に分割
var a1 = document.Text.split("\n");
if (a1.length > 0) {
    for (var i = 0; i < a1.length; i++) {
        // カンマで配列に分割
        var a2 = a1[i].split(",");
        // 指定位置より後ろの配列を削除
        if (l <= a2.length)
            a2.splice(l - 1, 1);
        // カンマ区切りで結合
        a1[i] = a2.join(",");
    }
    with (document.selection) {
        SelectAll();
        // 改行コード区切りで結合
        Text = a1.join("\n");
        StartOfDocument();
    }
}