aynı dosya içinde nasıl tanıtılır

[ahsen]

selam
servis adlı bir kasorun içinde "xl1, xl2, ve xl3" adında 3 adet xl dosyası bulunuyor.
xl1' de userform var. xl2 ve xl3ü veritabanı olarak kullanacağım.
xl1 deki userform ile xl2 ve xl3 e veri kaydederken, adres olarak sürücü isimleri vermek zorundamıyım.
bu 3 dosyanın aynı klasor içinde olması, sürücü ismi olmadan da kayıt yapılabilir mi?
cevaplarınız için çok teşekkür ederim. sağolun. :dua:

 

[Levent Menteşoğlu]

Gerekli değildir. Aşağıdaki gibi bir yazım yeterlidir. Yalnız burada kayıt yapılacak kitaplarda açık olmalıdır.

Workbooks("kitap2").Sheets("sayfa1").[a1] = TextBox1.Value

 

[ahsen]

sadece userform olan kitap çalışşın istiyorum. diğer kitaplar kapalı bulunsun. böylesi mümkünmü acaba. teşekkürler.

 

[Levent Menteşoğlu]

Elbette mümkün. Fakat bu o kadar basit değildir. Bu durumda devreye Ado girecektir. Bu konuda yeteri kadar bilgi sahibi olmadığımdan yardımcı olamayacağım. Bilgi sahibi arkadaşlar yardımcı olurlarsa bende istifade etmiş olurum. İkinci bir yol olarakta kod; kapalı kitabı açtırıp içine veri kaydedildikten sonra tekrar kapatılacak şekilde düzenlenebilir.

örneğin;

[vb:1:b6ed126fed]Application.ScreenUpdating = False
Workbooks.Open Filename:="C:\excel\Kitap2.xls"
Workbooks("kitap2").Sheets("sayfa1").[a1] = TextBox1.Value
Workbooks("kitap2").Save
Workbooks("kitap2").Close
[/vb:1:b6ed126fed]