VBA设置单元格 K41 = abc

在 VBA 中，把 K41 单元格设置为 “abc”，最简单、标准的写法如下：

Sub SetK41()
    Range("K41").Value = "abc"
End Sub

或者等价写法：

Sub SetK41()
    Cells(41, "K").Value = "abc"
End Sub

常见补充说明

• 当前工作表（运行宏所在的工作表）：

  ActiveSheet.Range("K41").Value = "abc"

• 指定工作表（推荐，防止切表出错）：

  ThisWorkbook.Sheets("Sheet1").Range("K41").Value = "abc"

• 仅写入文本，不自动转换：

  With ThisWorkbook.Sheets("Sheet1").Range("K41")
      .NumberFormat = "@"
      .Value = "abc"
  End With

如果你是要在事件里写（比如按钮点击、Worksheet_Change 等）

特此记录

anlog

2026年5月22日