[VBA] Χρησιμοποίηση μεταβλητής σε διαφορετικό module

[kapetang]

Καλησπέρα

Δοκίμασε τον παρακάτω κώδικα:

Module2

Option Explicit
Public B As Double

Sub test2()
    B = Module1.A + 10
End Sub

Module1

Option Explicit
Public A As Double

Sub test()
    Dim i As Long
    A = 100
    
    For i = 1 To 5
        Module2.test2
        A = Module2.B + 5
        MsgBox A
    Next
        
End Sub