0

我想从右侧的两个单元格中剪切两个数字,并找到数字在什么时候变得相等并在另一个单元格中打印该数字,如图所示

在此处输入图像描述

任何人请帮助我

4

1 回答 1

2

你实际上并没有比较两个数字,它们是字符串(因为你有一个前导零)。您可以使用 Left 函数在没有 VBA 的情况下轻松完成此操作。

在此处输入图像描述

这是显示公式的相同内容:

在此处输入图像描述

或者您可以在 VBA 中执行此操作:

Public Function CompareTwoNumbers(num1 As String, num2 As String) As String

Dim i As Long
Dim temp1 As String, temp2 As String

For i = Len(num1) To 1 Step -1

    temp1 = Left(num1, i)
    temp2 = Left(num2, i)

    If temp1 = temp2 Then
        CompareTwoNumbers = temp1
        Exit Function
    End If

Next

CompareTwoNumbers = "The numbers do not match"

End Function
于 2013-05-14T08:20:50.840 回答