使用VBA模块中的对象变量

Question

在对象-Sheet2-中我是这样的：

Private Sub Listbox1_Change()
    keuze = Sheet2.Listbox1.Text
End Sub

我想在模块中使用变量keuze，但是我尝试了它，它是空的。我该如何解决这个问题？

Answer 1

将模块中的keuze声明为

Public keuze As String

然后在分配keuze = Sheet2.Listbox1.Text后，您还可以在模块中访问keuze的值。

通过使用Public关键字，变量将在所有模块中可用，Public变量的值将保留，直到Workbook关闭或重置项目。