sayfa içindeki texbox dan vba daki değişkenime veri almak

[a_self_lion]

parametreler sayfasına eklemiş olduğum metin kutusu içine yazmış olduğum txtId nesne ismi olan metinkutusundan modül kısmına yazdığım vba kodumun bir değişkenine örneğin Id değişkenime bu sayfadaki yazmış olduğum metinkutusu içindeki değerini nasıl alabilirim teşekkürler.

Id = parametreler sayfamdaki txtId texbox un içindeki değer.

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki şekilde alabilirsiniz.

Id = Sheets("Sayfa1").txtId.Text

 

[a_self_lion]

IP = Sheets("parametreler").TxtIp.Text
SERVER = Sheets("parametreler").TxtServer.Text
DATA = Sheets("parametreler").TxtData.Text
USER = Sheets("parametreler").TxtUser.Text
PASSWORD = Sheets("parametreler").TxtPassword.Text

SQLCON.ConnectionTimeout = 30 ' Time out for the connection
SQLCON.Provider = "sqloledb" ' OLEDB Providers
SQLCON.Properties("Network Address").Value = " + IP + " ' set the ip address of your sql server
SQLCON.CommandTimeout = 30 ' set timeout for 3 minutes
SQLCON.Properties("Data Source").Value = " + SERVER + "
SQLCON.Properties("Initial Catalog").Value = " + DATA + "
SQLCON.Properties("User ID").Value = " + USER + "
SQLCON.Properties("Password").Value = " + PASSWORD + "
SQLCON.CursorLocation = adUseClient

Böyle denedim ama

bu satrıda
Call Main
DoEvents
SQLCON.Open

hata verdi
acaba değişkenleri atarken mi yanlışlık yapıyorum acaba

 

[halit3]

bir yanlışlık olduğu için buradaki kodu sildim

 

[a_self_lion]

halit3 çok teşekkür ederim. ama ne demek istedin anlamadım ben sorunumla ilgili sanırım alakası yok başka bir soruya mı cevap verecektin

Benim şu anki sorunum SQLCON.Properties("Network Address").Value = " + IP + "
...=" + IP + " buraya bu IP DEĞİŞKENİNİN NASIL YAZARIM.

 

[halit3]

pardon ben yanlış anlamışım iyi çalışmalar

 

[a_self_lion]

sorunun cevabı Sayın Korhan Ayhan tarafından çözüldü

SQLCON.Properties("Network Address").Value = " + IP + "
...=" + IP + " buraya bu IP DEĞİŞKENİNİN NASIL YAZARIM.

burda zaten IP değişkeinin string yaptığımız için her hangi bir işaret tırnak vb.. kullanmadan direk yazınca oluyor.