最終行取得.txt

この文章はAIで生成しています。誤りが含まれることがあります。

このプログラムは、指定されたシート名のワークシート内の最終行の行番号を取得するVBAコードです。具体的には、指定されたシート名のワークシート内の1列目（1番目の列）の最終行の行番号を取得します。

このコードは、以下の手順で動作します。

1. Worksheets(sheet_name) は、指定されたシート名のワークシートを参照します。
2. .Cells(Rows.Count, 1) は、ワークシート内の1列目の最終行のセルを参照します。
3. .End(xlUp) は、指定されたセルから上方向に検索し、空のセルが見つかるまで移動します。
4. .Row は、最終行の行番号を取得します。

このコードは、指定されたシート名のワークシート内の1列目の最終行の行番号を取得するために使用されます。

sheet_name = "Sheet Name"
Worksheets(sheet_name).Cells(Rows.Count, 1).End(xlUp).Row
' 1 column