在VBA中，可以使用StrComp函数来实现不区分大小写的比较。以下是一个示例代码：

Sub CompareIgnoreCase()
    Dim str1 As String
    Dim str2 As String
    Dim result As Integer
    
    str1 = "Hello"
    str2 = "hello"
    
    ' 使用vbTextCompare参数来实现不区分大小写的比较
    result = StrComp(str1, str2, vbTextCompare)
    
    If result = 0 Then
        MsgBox "两个字符串相等"
    ElseIf result < 0 Then
        MsgBox "str1小于str2"
    Else
        MsgBox "str1大于str2"
    End If
End Sub

在上面的示例中，我们使用了StrComp函数来比较两个字符串，第三个参数vbTextCompare指定了不区分大小写的比较方式。如果两个字符串相等，result将返回0；若第一个字符串小于第二个字符串，result将返回一个负数；若第一个字符串大于第二个字符串，result将返回一个正数。

在实际应用中，你可以根据具体需求修改str1和str2的值，然后根据比较结果进行相应的处理。