Excel 将长变量引用到工作表中的单元格

Excel 将长变量引用到工作表中的单元格,excel,vba,Excel,Vba,如何将长变量链接到excel工作表中输入的值?我想创建大量行,虽然我可以直接在代码中更改变量(例如x=100000),但只要我将变量x链接到单元格(例如x=Cells(1,1))上似乎无法识别任何值并将其打印到该范围。为了模拟链接到变量的单元格,您必须添加一些由某些内容触发的代码以将其写入单元格 将变量调暗为Public或Global(设置该变量的例程之外),以便其他子例程可以“查看”其值: Public x as Long 然后将设置其值的代码添加到工作表\u selection Chang

如何将长变量链接到excel工作表中输入的值?我想创建大量行,虽然我可以直接在代码中更改变量(例如x=100000),但只要我将变量x链接到单元格(例如x=Cells(1,1))上似乎无法识别任何值并将其打印到该范围。

为了模拟链接到变量的单元格,您必须添加一些由某些内容触发的代码以将其写入单元格

将变量调暗为
Public
Global
(设置该变量的例程之外),以便其他子例程可以“查看”其值:

Public x as Long
然后将设置其值的代码添加到
工作表\u selection Change
事件或
工作表\u Change
事件中的工作表中(取决于您希望它的工作方式):

如果您试图自动设置变量,则情况正好相反。将其添加到
工作表\u Change
事件:

If Target.Row = 1 and Target.Column = 1 Then 
    x = Cells(Target.Row, Target.Column)
End If

感谢您抽出时间回答我的问题。我发现以下方法最适合我

子测试()
暗x长
x=工作表(“表1”)。单元格(4,2)例如,值为100.000
范围(单元格(1,1),单元格(x,1))。Value=“*””用*填充x行作为测试

结束子变量将被复制,但不会链接。因此必须将其值写回范围。
将myClng设置为LongLong:myClng=CLngLng(单元格(1,1)):myClng=myClng+1:Cells(1,1)=myClng
或者您可以编写自己的
作为公式执行。@houssam什么是
LongLong
ClngLng
?@AhmedAbdelhameed:请看:,和@houssam嗯,我实际上从未使用过64位版本的Office,这就是为什么。直到有了新东西。谢谢!
If Target.Row = 1 and Target.Column = 1 Then 
    x = Cells(Target.Row, Target.Column)
End If