Nhờ các bác hỗ trợ giúp code VBA

[nqdungpt]

Chào các bác, e mới tập tành VBA, nhờ các bác giúp e. E muốn gán giá trị của a trong vidu1 cho c trong vidu2 thi lam sao ạ. Thanks các bác

Sub vidu1()
Dim a As String
a = "Hello"
End Sub

Sub vidu2()
Dim c As String, a As String
Call vidu1
c = a
End Sub

 

[Phuocam]

Chào các bác, e mới tập tành VBA, nhờ các bác giúp e. E muốn gán giá trị của a trong vidu1 cho c trong vidu2 thi lam sao ạ. Thanks các bác

Khai báo a phía ngoài sub để dùng chung

Dim a As String
Sub vidu1()
a = "Hello"
End Sub

Sub vidu2()
Dim c As String
Call vidu1
c = a
End Sub

 

[Cu Tồ]

Chào các bác, e mới tập tành VBA, nhờ các bác giúp e. E muốn gán giá trị của a trong vidu1 cho c trong vidu2 thi lam sao ạ. Thanks các bác

Sub vidu1()
Dim a As String
a = "Hello"
End Sub

Sub vidu2()
Dim c As String, a As String
Call vidu1
c = a
End Sub

Bạn khai báo biến a là biến toàn cục đi Public a As String .đặt trên cùng của sub nha

Bài đã được tự động gộp: 18/10/20

Khai báo a phía ngoài sub để dùng chung

Dim a As String
Sub vidu1()
a = "Hello"
End Sub

Sub vidu2()
Dim c As String
Call vidu1
c = a
End Sub

Bác nhanh quá hihi

 

[nqdungpt]

Khai báo a phía ngoài sub để dùng chung

Dim a As String
Sub vidu1()
a = "Hello"
End Sub

Sub vidu2()
Dim c As String
Call vidu1
c = a
End Sub

Cám ơn bác rất nhiều

Bài đã được tự động gộp: 18/10/20

String

Cám ơn bác rất nhiều!