excel vba A列放20个被减数（大于10，小于100），C列放20个减数（大于10，小于100），减数小于被减数且减数个位数大于被减数个位数

在Excel VBA中，你可以创建一个宏来完成这个任务。假设A列和C列已经填好了数据，你需要遍历每个单元格，检查条件是否满足：C列的数值是否小于A列的数值，并且C列的个位数字大于A列的个位数字。如果满足，就记录或显示这个结果。以下是简单的步骤和VBA代码示例：

1. 打开VBA编辑器（按Alt + F11键）。

2. 在左侧的工程资源窗口中，选择"插入" -> "模块"，然后你会看到一个新的模块窗口。

3. 将以下代码复制到模块窗口：

Sub FindConditions()
    Dim i As Long
    Dim rng As Range
    Dim aCell As Range
    Set rng = Range("A1:C20") ' 假设你的数据范围是从A1到C20

    For i = 1 To rng.Rows.Count
        Set aCell = rng.Cells(i, 1) ' A列
        If aCell.Value > 10 And aCell.Value < 100 Then
            Set bCell = rng.Cells(i, 3) ' C列
            If bCell.Value < aCell.Value And Right(bCell.Value, 1) > Right(aCell.Value, 1) Then
                Debug.Print "满足条件的: A(" & i & ")=" & aCell.Value & ", C(" & i & ")=" & bCell.Value ' 显示满足条件的结果
                ' 或者在这里添加其他操作，如写入新单元格等
            End If
        End If
    Next i
End Sub

4. 运行`FindConditions`宏。它会检查并打印出符合条件的A列和C列的值。如果你想保存结果，可以修改代码以将它们写入到特定的位置而不是直接打印。

5.