excel vba 如何在執行巨集後保留變數的值??

變數在 END SUB 之後，它的值不可保留至下一個巨集進行運算;

但你可以考慮在工作表找一些儲存格，作為你保留變數值的地方。
----------------------------------------
Sub TEST1()
x = 0
For y = 1 To 100
x = x + 1
Next y
[a1] = x
End Sub
-----------------------------------------
Sub TEST2()
If [a1] <> "" Then
x = [a1]
Else
x = 0
End If
For y = 1 To 100
x = x + 1
Next y
[a1] = x
End Sub
-------------------------------------------
舉例TEST1在End Sub之前，[a1] = x 把變數"x"，紀錄在A1儲存格。
當執行TEST2時，可延續變數"x"的值進行運算。

執行巨集A的過程中, 要執行巨集B, 而巨集B是要引用巨集A的變數(假設是var1)的話, 則var1 是要以Publice宣告
Public Var1
Sub A()
....
B
....
End Sub
Sub B()
.....
End Sub