Excel VBA模块中如何引用其他工作表的单元格？

我来帮你梳理下怎么在VBA模块里引用其他工作表的单元格，还要结合你的SQL更新需求给你调整下代码——毕竟你的当前SQL语句还有几个小问题需要修正~

1. 基础引用方法 #

在模块里引用其他工作表的单元格其实很直接，常用两种方式：

• 用Sheets("工作表名称").Cells(行号, 列号)：行号和列号都是数字，比如第3行第2列（B3）就是Sheets("Sheet3").Cells(3, 2)
• 用Sheets("工作表名称").Range("单元格地址")：更直观，比如B3可以写成Sheets("Sheet3").Range("B3")

如果怕以后工作表名称被修改导致代码失效，还可以给工作表设置固定代号：在VBA编辑器里选中Sheet3，在右侧属性窗口修改(Name)为wsParams，之后直接用wsParams.Cells(3,2)来引用，稳定性更高。

2. 结合你的SQL场景修正代码 #

你的当前SQL语句有几个小问题：比如变量后面多了下划线、日期/字符串参数没加单引号，我给你调整成更规范的写法，先把Sheet3的参数存到变量里再拼SQL，可读性和调试性都会更好：

Sub UpdatePlanToSQL()
    ' 先定义变量存储Sheet3的参数，根据实际数据类型调整
    Dim planQty As Double ' 假设Plan_QTY是数值型
    Dim macID As String ' 假设MacID是字符串类型
    Dim modelID As String ' 假设ModelID是字符串类型
    Dim targetDate As Date
    Dim targetYear As Integer
    
    ' 从Sheet3读取参数，这里的单元格位置你根据实际情况调整
    planQty = Sheets("Sheet3").Cells(3, 2).Value ' 比如B3存要更新的Plan_QTY
    macID = Sheets("Sheet3").Range("C3").Value ' C3存MacID
    modelID = Sheets("Sheet3").Range("D3").Value ' D3存ModelID
    targetDate = Sheets("Sheet3").Cells(3, 5).Value ' E3存目标日期
    targetYear = Year(targetDate) ' 也可以直接读Sheet3的年份单元格，比如F3：Sheets("Sheet3").Cells(3,6).Value
    
    ' 构建正确的SQL语句，注意字符串、日期要加单引号，数值型不用
    Dim sSQLUpd As String
    sSQLUpd = "UPDATE [table1].[dbo].[Plan] " & _
              "SET [Plan_QTY] = " & planQty & " " & _
              "WHERE [MacID] = '" & macID & "' " & _
              "AND [ModelID] = '" & modelID & "' " & _
              "AND [Date] = '" & Format(targetDate, "yyyy-MM-dd") & "' " & _
              "AND DATEPART(year, [Date]) = " & targetYear
    
    ' 这里写你的数据库连接和执行SQL的代码
    ' 比如：
    ' Dim conn As Object
    ' Set conn = CreateObject("ADODB.Connection")
    ' conn.Open "你的数据库连接字符串"
    ' conn.Execute sSQLUpd
    ' conn.Close
    ' Set conn = Nothing
End Sub

3. 关键注意事项 #

• 数据类型匹配：字符串和日期类型的SQL参数必须用单引号包裹，数值型直接拼接就好，不然会报SQL语法错误
• 先存变量再拼接：把单元格值先存到变量里，方便你在调试时查看参数是否正确，避免直接拼接单元格值导致的隐藏问题
• SQL注入风险：如果这些参数是用户输入的，建议用参数化查询代替字符串拼接，更安全；如果是内部固定参数，拼接方式也可以用
• 工作表代号稳定性：前面说的给工作表设置固定(Name)属性，比用工作表名称更靠谱，毕竟工作表名称可能被用户随意修改

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