在Excel中使用VBA查找和更新与工作表不同的工作表上的相关记录

，可以通过以下步骤实现：

首先，打开Excel并创建一个新的宏。在开发工具栏中选择“Visual Basic”或按下“Alt + F11”打开VBA编辑器。
在VBA编辑器中，选择“插入”菜单下的“模块”，然后在新建的模块中编写VBA代码。
首先，我们需要定义变量来引用相关的工作表。例如，假设我们要在名为“Sheet1”的工作表中查找和更新记录，可以使用以下代码：

Dim sourceSheet As Worksheet
Set sourceSheet = ThisWorkbook.Sheets("Sheet1")

接下来，我们需要定义变量来引用目标工作表。假设我们要在名为“Sheet2”的工作表上更新相关记录，可以使用以下代码：

Dim targetSheet As Worksheet
Set targetSheet = ThisWorkbook.Sheets("Sheet2")

然后，我们可以使用循环遍历源工作表中的每一行，并在目标工作表中查找匹配的记录。以下是一个示例代码：

Dim sourceRow As Long
Dim targetRow As Long

For sourceRow = 2 To sourceSheet.Cells(sourceSheet.Rows.Count, "A").End(xlUp).Row
    For targetRow = 2 To targetSheet.Cells(targetSheet.Rows.Count, "A").End(xlUp).Row
        If sourceSheet.Cells(sourceRow, "A").Value = targetSheet.Cells(targetRow, "A").Value Then
            ' 找到匹配的记录，可以在这里更新相关数据
            targetSheet.Cells(targetRow, "B").Value = sourceSheet.Cells(sourceRow, "B").Value
            Exit For
        End If
    Next targetRow
Next sourceRow

在上述代码中，我们假设源工作表和目标工作表中的记录都以列A开始，并且要更新的数据在列B中。你可以根据实际情况进行修改。