我正在嘗試獲取2個值之間的序列的函數。下面給出的例子更好地理解。需要序列號的函數
第一值= A1245 第二值= A1257
當我給上述 'AddNum' 函數值。結果應該給'A1245,A1246,A1247'。
以下給出的vba代碼由我自己寫的,我請你,請幫助這個。
Public x As Double
Function AddNum(Val1 As Variant, Val2 As Variant)
If Val1 = "" Or Val2 = "" Then
Exit Function
Else
x = -(Right(Val1, 4) - Right(Val2, 4))
End If
Dim myary As Variant
ReDim myary(x) As Variant
For y = LBound(myary) To UBound(myary)
Z = Right(Val1, 4) + y
myary(y) = Left(Val1, 2) & Z
ActiveCell.Offset(0, y + 1).Value = myary(y)
Next y
End Function
我不明白你在等待什麼。是VAL1/VAL2字符串?或範圍?結果你想要一個字符串?範圍?什麼是規則? 「你給A1257,但它會返回到A1247」..請解釋你期望的功能 –
@Sai Krishna你是否嘗試過下面提供的任何解決方案?他們是否按照你的意圖工作? –