Excel VBA 将 2 个短整数转换为长整数 - VBA

在Excel VBA中，有时候需要将两个短整数转换为长整数，以便进行相关的计算和操作。本文将介绍如何使用 Excel VBA 将两个短整数转换为长整数。

方法

VBA中提供了一种 CLng() 函数可以将各种类型的数据转换为长整数。我们可以使用此函数将两个短整数转换为长整数。

以下是示例代码：

Dim num1 As Integer
Dim num2 As Integer
Dim lngResult As Long

' 为 num1 和 num2 赋值
num1 = 32767
num2 = 32767

' 将 num1 和 num2 转换为长整数并相乘
lngResult = CLng(num1) * CLng(num2)

在示例代码中，我们首先定义了 num1 和 num2 两个短整数变量，并将它们的值分别设置为 32767。然后，我们使用 CLng() 函数将它们转换为长整数，并将它们相乘的结果赋值给了 lngResult 变量。最终，lngResult 变量保存的就是两个短整数相乘的结果。

总结

在本文中，我们介绍了如何使用 Excel VBA 将两个短整数转换为长整数。我们使用了 VBA 中的 CLng() 函数将短整数转换为长整数，并演示了一个简单的示例代码。如果您需要在 Excel VBA 中进行数据类型转换，此方法将非常有用。