Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/25.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel VBA如果选择了特定的列和行,则类型不匹配错误_Excel_Vba - Fatal编程技术网

Excel VBA如果选择了特定的列和行,则类型不匹配错误

Excel VBA如果选择了特定的列和行,则类型不匹配错误,excel,vba,Excel,Vba,我正在尝试编写一个代码,其中sub在我选择特定列和特定行时激活,但在以下代码中出现类型不匹配错误: If Selection.Worksheet.Columns("E:L") And Selection.Worksheet.Rows("16:99999") Then 您将看到关键字Target始终返回触发工作表\u更改事件的单元格的范围对象。因此,有了这些知识,我们现在可以使用Intersect方法在指定单元格发生更改时采取一些措施。比如, Private Sub Worksheet_Chan

我正在尝试编写一个代码,其中sub在我选择特定列和特定行时激活,但在以下代码中出现类型不匹配错误:

If Selection.Worksheet.Columns("E:L") And Selection.Worksheet.Rows("16:99999") Then

您将看到关键字Target始终返回触发工作表\u更改事件的单元格的范围对象。因此,有了这些知识,我们现在可以使用Intersect方法在指定单元格发生更改时采取一些措施。比如,

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("E12:L54787")) Is Nothing Then
        MsgBox "Hello"
    End If
End Sub

在相应的工作表中编写代码:


谢谢您,这很有帮助,您还有一个问题,我在哪里可以学习所有这些逻辑和代码?我试图边走边学习,我在努力,犯了很多错误,在谷歌上
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    If (Not Intersect(Target, Columns("E:L")) Is Nothing) And _
        (Not Intersect(Target, Rows("16:99999")) Is Nothing) Then

        Debug.Print Target.Address

    End If

End Sub