Excel 比较不同工作表中的两个单元格,将不同的单元格设置为ok

Excel 比较不同工作表中的两个单元格,将不同的单元格设置为ok,excel,vba,Excel,Vba,我将以此为基础构建循环。我想检查FDSA中是否包含单元格(2,5)中的内容!细胞(2,5)。如果这是真的,那么我想标记FDSA!单元(2,10)正常。我收到一条对象所需的消息。这是我在看了示例和教程后得出的结论。如果有问题,请告诉我 仅第二次使用VBA。 提前感谢,Alexis M.您引用工作表的语法不正确。这可能是抛出错误。您需要调用工作表(“FDSA”),而不要使用FDSA像你一样打电话 此外,必须将单元格值设置为Status,才能使其正常工作。仅更改状态不会将其写回工作簿 另外,InStr

我将以此为基础构建循环。我想检查FDSA中是否包含单元格(2,5)中的内容!细胞(2,5)。如果这是真的,那么我想标记FDSA!单元(2,10)正常。我收到一条对象所需的消息。这是我在看了示例和教程后得出的结论。如果有问题,请告诉我

仅第二次使用VBA。
提前感谢,Alexis M.

您引用工作表的语法不正确。这可能是抛出错误。您需要调用
工作表(“FDSA”)
,而不要使用
FDSA像你一样打电话

此外,必须将单元格值设置为
Status
,才能使其正常工作。仅更改
状态
不会将其写回工作簿

另外,
InStr
返回匹配的位置。如果您想知道是否存在匹配项,则需要检查返回值是否为
>0
。这段代码应该运行,希望比您当前的代码更接近正确

Sub test1()

Dim Str As String
Dim Search As String
Dim Status As String
Str = Cells(2, 5).Value
Search = FDSA!Cells(2, 5).Value
Status = FDSA!Cells(2, 10).Value

    If InStr(Search, Str) = True Then
                Status = "ok"
    Else
         End If

End Sub

非常感谢,这已经完成了我的要求。祝您今天过得愉快!
Sub test1()

Dim Str As String
Dim Search As String

Str = Cells(2, 5).Value
Search = Worksheets("FDSA").Cells(2, 5).Value


    If InStr(Search, Str) > 0 Then
        Worksheets("FDSA").Cells(2, 10).Value = "ok"
    End If

End Sub