Question

我有两个不同的电子表格A和B，其中两个都有一个由服务器名称组成的列。一些服务器名称是共同的，为此我想在Excel中进行条件查询，我首先要检查服务器名称是否相等，如果是，请检查A中由整数值组成的列是否有限制为90.如果服务器的对应整数值大于90，我想在B列的一列中填写颜色。所以大概像伪代码的python看起来像：

for i in range(Spreadsheet A: Column 1):
    for j in range(Spreadsheet B: Column 1):
        if i==j:
            if i.column 2 > 90:
               color fill j.column2 red
            else:
                color fill j.column2 green

Answer 1

我只用了几个小时来学习VBA语法，所以答案如下：

Sub Patch()

Dim s1 As Worksheet
Set s1 = Sheets("Patch")

Dim s2 As Worksheet
Set s2 = Sheets("Report")

For i = 5 To 259
    For j = 2 To 227
        If s1.Cells(i, 1) = s2.Cells(j, 1) Then
            If s1.Cells(i, 7) > 90 Then
                s2.Cells(j, 1).Interior.Color = vbRed
            Else
                s2.Cells(j, 1).Interior.Color = vbGreen
            End If
        Else
        End If

     Next j
Next i

End Sub

在Excel中进行条件查询

1 个答案: