Giá trị biến giữa Modules và Microsoft Excel Objects bị trả về không.

[trungtrung224]

_Em xin chào tất cả các a/c trên diễn đàn ạ. Hiện tại e có 1 chương trình khi chuyển đổi biến " Count " giữa Modules và Microsoft Excel Objects thì giá trị biến lại trả về biến " Count = 0 ". Em có đoạn code như sau:
*Code bên Microsoft Excel Objects:
Public Count As Double
Sub CommandButton1_Click()
Do While True
If Count = 0 Then
Call Main
ElseIf Count = 1 Then
Exit Do
End If
Loop
End Sub
*Code bên Modules:
Sub Main()
Count = 1
End Sub
_ Em sai ở đâu mong a/c giúp đỡ e với, e cảm ơn.

 

[Nhattanktnn]

Public Count As Double

Biến toàn cục phải đặt trong module, nghĩa là nằm trên sub main ở module chính
Khai báo Count As Long

 

[trungtrung224]

mình hiểu ròi, Mình cảm ơn nhen.

Biến toàn cục phải đặt trong module, nghĩa là nằm trên sub main ở module chính
Khai báo Count As Long