UserFormdan veri aktarmak

[tarquin]

Merhaba arkadaslar,

Ekteki dosyada userform olusturdum. Bazı tanımlamalar da yaptım ama bir türlü Excele veri aktaramıyorum. Bir de Item Nr den arama yapabilmek istiyorum. ve excel acılınca direk userform karsıma gelsin istiyorum.
Kusura Bakmayın pek birsey bilmiyorum.
Okuduklarıma göre birseyler yapmaya calıstım pek beceremedim.
Yardımcı olabilirmisiniz.

 

[suleyman242]

Merhaba arkadaslar,

Ekteki dosyada userform olusturdum. excel acılınca direk userform karsıma gelsin istiyorum.

Ekte dosya yok ama;
excelde makro olarak insert modül yapıp içerisine bu kodu ekle

Sub AUTO_OPEN()
If MsgBox("Veri Tabanını Gizleyerek Açayım mı ?.", vbCritical + vbYesNo, "") = vbYes Then    'istersen kullanıcıya sorabilirsin
Application.Visible = False ' exceli gizle 
UserForm1.Show   'yaptığın userformun direk açılması için 
Else ' kabul edilmesse 
Application.Visible = True  ' exceli gizleme
UserForm1.Show
End If

End Sub

 

[tarquin]

Kusura Bakmayın dosyayı eklemeyi unutmusum.
Dosya ektedir

 

[suleyman242]

Kusura Bakmayın dosyayı eklemeyi unutmusum.
Dosya ektedir

Dosya ektedir

 

[tarquin]

cok tesekküür ederim.

ama en büyük sorunum
Bir türlü Formdan Excele veri aktaramıyorum. Kaydet dedigimde hiçbir sey olmuyor.

Bir de Item Nr den kodu girdigimde o satırdaki bilgilerin user forma gelmesini istiyorum.

yardımcı olabilirmisiniz.

Şimdiden cok tesekkürler.

 

[tarquin]

Yardımcı olabilirmisiniz acaba

 

[tarquin]

Yardımcı olabilecek kimse yok mu

 

[tarquin]

Lütfen yardım edinnnnn

 

[relaxim]

Bence bu konuyu inceleyiniz..

http://www.excel.web.tr/f60/userform-hazyrlama-ve-kod-yazma-t77164.html

 

[suleyman242]

Lütfen yardım edinnnnn

Kodunuzda

Private Sub addButton[COLOR="Red"][B]1[/B][/COLOR]_Click()

bu şekilde yazmıssınız ama user form üzerinde addbutton1 butonu bulunmamakta; sözkonusu komutu

Private Sub addButton_Click()

End Sub

satırları arasına taşıyınız yada yada yukarda kırmızı ile belirttiğim "1" rakamını siliniz kolay gelsin