如何设置循环遍历A1到A列最后一个有数据的单元格？

Excel VBA 场景 #

先获取A列最后一个非空单元格的行号，再构建循环范围：

' 获取A列最后一行行号
Dim lastRow As Long
lastRow = Cells(Rows.Count, "A").End(xlUp).Row

' 遍历每个单元格（对象方式）
For Each cell In Range("A1:A" & lastRow)
    ' 示例操作：打印单元格值
    Debug.Print cell.Value
Next cell

' 或者用索引遍历
Dim i As Long
For i = 1 To lastRow
    Dim currentCell As Range
    Set currentCell = Cells(i, "A")
    ' 编写对currentCell的操作逻辑
Next i

Python（openpyxl 操作本地Excel文件） #

通过openpyxl定位A列范围后遍历：

from openpyxl import load_workbook

# 加载工作簿和工作表
wb = load_workbook("你的文件路径.xlsx")
ws = wb.active

# 获取A列最后一个有数据的行号
last_row = ws.max_row

# 遍历A1到A列最后一行的单元格
for row in ws.iter_rows(min_row=1, max_row=last_row, min_col=1, max_col=1):
    cell = row[0]
    ' 示例操作：打印单元格值
    print(cell.value)

Python（pandas 批量处理数据） #

用pandas可直接遍历A列非空值：

import pandas as pd

# 读取Excel文件
df = pd.read_excel("你的文件路径.xlsx")

# 遍历A列（iloc[:,0]代表第一列，即A列）的非空值
for value in df.iloc[:, 0].dropna():
    ' 示例操作：打印值
    print(value)

内容的提问来源于stack exchange，提问作者Александр Дексбах