Userform daki değişkeni Module içinde kullanmak

[mrcylmz_61]

Merhaba,
aşağıda bir form aktifleşince değer alan bir değişken tanımladım. bu değişken değerini Module1 içerisinde Deneme1 adlı kodumun içerisine almak ve orada kullanmak istiyorum. yardımcı olabilir misiniz?
Private Sub UserForm_Activate()
dim a as double
a=0.54
End sub

 

[ÖmerFaruk]

https://www.excel.web.tr/threads/degiskenler-variables.4299/
https://docs.microsoft.com/en-us/office/vba/language/concepts/getting-started/declaring-variables
https://docs.microsoft.com/en-us/of.../user-interface-help/option-private-statement

Değikeni Modul içinde Public olarak tanımlamalısınız. Ecel açık olduğu sürece değişken tüm projeler için kullanılır.

Public Say As Integer
Public Konum As String

Sadece kendi projesinde kalmak istiyorsanız aşağıdaki gibi olmalı

Option Private Module
Public Say As Integer
Public Konum As String

Modul içinde tanımlama yaptıktan sonra UserForm içinde de yeniden bir tanımlama yapmazsanız tüm projede aynı değişkeni kullanmış olursunuz.

 

[mrcylmz_61]

https://www.excel.web.tr/threads/degiskenler-variables.4299/
https://docs.microsoft.com/en-us/office/vba/language/concepts/getting-started/declaring-variables
https://docs.microsoft.com/en-us/of.../user-interface-help/option-private-statement

Değikeni Modul içinde Public olarak tanımlamalısınız. Ecel açık olduğu sürece değişken tüm projeler için kullanılır.

Public Say As Integer
Public Konum As String

Sadece kendi projesinde kalmak istiyorsanız aşağıdaki gibi olmalı

Option Private Module
Public Say As Integer
Public Konum As String

Modul içinde tanımlama yaptıktan sonra UserForm içinde de yeniden bir tanımlama yapmazsanız tüm projede aynı değişkeni kullanmış olursunuz.

Ömer bey ben Userform1 aktif olduğunda tanımlanan bir değişkeni Module1 içinde kullanmak istiyorum

 

[ÖmerFaruk]

Yukarıda dediğimi yapmadınız ki.

Module1 içinde en başa, ya da boş bir module örneğin Module99 içine, Module99 sizin ortak değişkenlerinizin olduğu module olsun. İçinde sadece değişkenlerinizi koyarsınız

Public a As Double

Userform içinde tekrar tanımlamanıza gerek yok.

Private Sub UserForm_Activate()
a = 0.54
End Sub

Daha sonra bu a değişkeni, istediğiniz yerde prosedür çalışma sırasına göre son atanmış değeri almış olarak işlenecektir