excelde hazırlanmış veri tabanı örneği

[Fuat Şirin]

arkadaşlar vb 6.0 yeni öğrenmeye çalışıyorum
vba da kendime yetecek kadar bilgim var
ama bunları vb de yapmak istiyorum
bu konuyla ilgili arkadaşlardan ricam
vba da mesela
sayfa1 de a1 hücresindeki veriyi nasıl alıyorsam
yada onu değiştirip nasıl sayfaya işliyorsam
textbox1.text =[a1]

[a1] = textbox1.text

gibi

bunu vb de nasıl yaparım
yani veri tabanı ve rapor oluşturma ile ilgili küçük bir çalışma yada
link verilirse çok makbule geçer

[Mahmut Kök]

arkadaşlar vb 6.0 yeni öğrenmeye çalışıyorum
vba da kendime yetecek kadar bilgim var
ama bunları vb de yapmak istiyorum
bu konuyla ilgili arkadaşlardan ricam
vba da mesela
sayfa1 de a1 hücresindeki veriyi nasıl alıyorsam
yada onu değiştirip nasıl sayfaya işliyorsam
textbox1.text =[a1]

[a1] = textbox1.text

gibi

bunu vb de nasıl yaparım
yani veri tabanı ve rapor oluşturma ile ilgili küçük bir çalışma yada
link verilirse çok makbule geçer


Sayın Fuat ŞİRİN, bahsettiğiniz işlemin SQL ile doğrudan bir ilgisi bulunmamakta; ayrıca bu sitede VB değil VBA ile ilgili yardım taleplerine daha ziyade cevap verilmektedir. Yine de bahsettiğiniz hususla ilgili küçük ama yeterli olabilecek bir bilgi vereyim.

İlk önce excel referansı eklemelisiniz. Mesele C:/deneme/kitap1.xls adlı belgenizin A1 hücresine textbox1'deki veriyi yazdırmak isterseniz, bunu şu şekilde yapabilirsiniz:




dim uyg as excel.application, ktp as excel.workbook, syf as excel.worksheet

set uyg=new excel.application
set ktp=uyg.workbooks.open ("C:/deneme/kitap1.xls")
set syf =ktp.sheets(1)
uyg.visible=true
'yukarıda exceli tanımladık. Gerisi zaten kolay.

syf.range("a1")=textbox1.text 'Metin kutusuna hücredeki veriyi almak için de tersini yazarsınız.

[Fuat Şirin]

hocam tam olarak dediğiniz kodları
form1 i n kod bölümene ekledim
ama set yazan yerde compile error diyor
excel türkçe onu belirtiyim
vb 6.0
saygılar hocam

[Fuat Şirin]

bu konuda en azından hatayı nerde yaptığımı sölerseniz sevinirim

[Fuat Şirin]

bu konuda yardımcı olacak arkadaşyok mu?

[Mahmut Kök]

excel referansı eklediniz mi? Bir de bu kodları bir düğmeye atarsanız daha iyi olur. Yani kodların başında private sub .. () gibi başlık olmasına dikkat ediniz.

[Fuat Şirin]

hocam bunu excel dosyasını açmadan kaplı halde nasıl yaparız

[Mahmut Kök]

hocam bunu excel dosyasını açmadan kaplı halde nasıl yaparız


Eğer excelin görünmesi sorun ise

uyg.visible=true

yerine

uyg.visible=false

kullanabilirsiniz. Eğer excel hiç açılmasın diyorsanız ADO veya DAO gibi bağlantı yollarını kullanabilirsiniz. Bunun için de excelle ilişkili her alanda olduğu gibi ADO alanında da uzamanlaşmış olan arkadaşlarımızın katkılarıyla hazırlanan ve forumumuzda bulunan aşağıdaki başlığı inceleyebilirsiniz. Yukarıda bahsettiğim gibi vb projenize exceli tanımladıktan sonra, diğer işlemleri de excelde yapar gibi, yani aynı mantıkla yapabilirsiniz.

İyi çalışmalar.

ADO-DAO-Kapalı Dosya Uygulamaları (http://www.excel.web.tr/forumdisplay.php?f=117)