列を追加する

膨大なリストに列を1行ずつ挿入したい時は、VBAで一括処理すると楽です。

１．[ Alt ]キー押しながら[ F11 ]を押します。（VB Editorが開く）

２．下のSub～End Subまでをまるごとコピーします。

Sub aaa()
　For i = 237 To 2 Step -1　'237は最終行、2は先頭行。
　　Rows(i).Insert
　Next
End Sub

３．最終行（ここでは237）と先頭行（ここでは2）の数字を適宜変更します。

４．Sub aaa　と　End Sub　の間をクリックした後に[ F5 ]キーを押します。

５．使った後にコードを削除します。

　　（削除しないとExcel起動時にマクロ許可画面がでてしまう）

最終行を自動判別する関数をつくってもいいのですが、たったの3行なので使い捨てのが楽。

行を追加したい時は

Rows(i).Insert

を

Columns(i).Insert

にすればOKです。