如何实现点击F、H、I列单元格时自动打开Userform？

直接在目标工作表中添加工作表级事件代码就能实现需求，步骤如下：

1. 按Alt+F11打开VBA编辑器
2. 在左侧「项目资源管理器」中，双击你要生效的工作表（比如Sheet1）
3. 粘贴以下代码到代码窗口：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    ' 仅处理单个单元格选中的情况，避免多选误触发
    If Target.Cells.Count = 1 Then
        ' 判断选中单元格是否在F(6)、H(8)、I(9)列
        Select Case Target.Column
            Case 6, 8, 9
                ' 替换成你实际的Userform名称，比如你的日期选择窗体
                DatePickerForm.Show
        End Select
    End If
End Sub

代码说明： #

• Worksheet_SelectionChange是Excel内置的工作表事件，每次选中单元格变化时自动触发
• Target.Cells.Count = 1确保只有选中单个单元格时才执行后续逻辑，防止多选区域时弹窗混乱
• Case 6,8,9对应F、H、I列的列号，可根据需要修改列号添加或移除目标列
• 把DatePickerForm替换成你自己创建的用户窗体的真实名称

4. 保存文件（注意要保存为.xlsm格式，否则宏会失效）
5. 返回Excel工作表，点击F、H、I列的任意单元格，就能自动弹出你的日期选择窗体了

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