セルの最終行を調べる
今更な感じの基本的なテクニックだが、ほかの言語を触るとすぐに忘れてしまうので記事にしておく。
Dim MaxRow As Long MaxRow = Cells(Rows.Count, 1).End(xlUp).Row
"Rows.Count"はsheetの最終行
xlsxなら1048576、xlsファイルなら65536
.Endプロパティは
キーボードでの[Ctrl] + [方向キー] の操作で移動する先のセルへの参照
Pythonの開発環境変更
Pythonでプログラムを書く際、今まで標準のIDE(統合開発環境)で作成していましたが、変数の確認とか効率が悪かったため、他のIDE導入を決意。
"Atom"とか"Visual Studio Code"とかPythonに対応した有名どころが色々ある中、"Anaconda"に含まれている"Spyder"に落ち着きました。
Anacondaのダウンロードはこちら
https://www.continuum.io/downloads
CSVファイルを1行ずつ読み込む
csvモジュールのreader関数で読み込みます。
読み込んだデータをfor文で1行ずつ出力しています。
ファイルをコピーしてリネームする
shutilモジュールのcopy関数を使用して"fromPath"の内容を"toPath"へコピーします。