技术求助：如何实现导入数据时遇空白单元格即停止操作？

Excel VBA 实现方式 #

如果是用VBA处理数据导入，这是最直接的解决方案，核心逻辑是遍历C列，每一行先检查是否为空，一旦发现空白就终止流程：

Sub ImportUntilBlank()
    Dim ws As Worksheet
    Dim lastRow As Long
    Dim currentRow As Long
    
    ' 指定要操作的工作表，替换成你的实际表名
    Set ws = ThisWorkbook.Worksheets("Sheet1")
    
    ' 获取C列最后一行有数据的行号
    lastRow = ws.Cells(ws.Rows.Count, "C").End(xlUp).Row
    
    ' 从第1行开始遍历（如果有表头，改成currentRow = 2）
    For currentRow = 1 To lastRow
        ' 检查当前C列单元格是否为空
        If ws.Cells(currentRow, "C").Value = "" Then
            MsgBox "第" & currentRow & "行C列是空白，已停止导入。"
            Exit Sub
        End If
        
        ' 这里替换成你的实际导入操作
        ' 示例：把C列数据复制到D列
        ws.Cells(currentRow, "D").Value = ws.Cells(currentRow, "C").Value
    Next currentRow
    
    MsgBox "导入完成，全程没碰到空白单元格。"
End Sub

代码关键点

• 先锁定目标工作表，避免操作错表格；
• 遍历前先获取C列的有效数据行范围，减少不必要的循环；
• 一旦检测到空白单元格，用Exit Sub直接终止整个导入过程，不会继续执行后续代码。

Power Query 实现方式 #

如果用Power Query做数据导入，也能实现这个需求：

1. 把数据导入Power Query编辑器；
2. 选中C列，点击「添加列」→「索引列」（选从0开始）；
3. 新增自定义列，输入公式：= if [C列的实际列名] = null then [索引] else null；
4. 筛选自定义列，找到第一个非空值对应的索引n；
5. 保留前n行数据，删除索引列和自定义列，再加载回Excel。

这样就能保证只导入到第一个空白单元格之前的所有数据，不会继续往后处理。

内容的提问来源于stack exchange，提问作者Ben