Makro ile stok girişi

[hako88]

Değerli üstadlarım ektede göreceğiniz gibi bir stok girişi tablosu var örnek kayıt gir e bastığımda userform açılıyor bu user formda yazdıklarımı excel stok girişi sayfasına yazıcak örnek ekte açıklamamı yaptım ilginize şimdiden teşekkür ederim

 

[hako88]

üstadlarım örnek dosyam burada

 

[İhsan Tank]

üstadlarım örnek dosyam burada

merhaba
userform'unuz kod bölümüne

Private Sub CommandButton1_Click()
If TextBox1.Text = Empty Then MsgBox "Marka Giriniz.", vbCritical, "www.excel.web.tr": Exit Sub
If TextBox2.Text = Empty Then MsgBox "Model Giriniz.", vbCritical, "www.excel.web.tr": Exit Sub
If TextBox3.Text = Empty Then MsgBox "Kod Giriniz.", vbCritical, "www.excel.web.tr": Exit Sub
Son_Dolu_Satir = Sheets("STOK GİRİŞİ").Range("A65536").End(xlUp).Row
Bos_Satir = Son_Dolu_Satir + 1
Sheets("STOK GİRİŞİ").Range("a" & Bos_Satir).Value = TextBox1.Text
Sheets("STOK GİRİŞİ").Range("b" & Bos_Satir).Value = TextBox2.Text
Sheets("STOK GİRİŞİ").Range("c" & Bos_Satir).Value = TextBox3.Text
MsgBox "Kaydınız Başarı İle Yapıldı", , "www.excel.web.tr"
Unload UserForm1
End Sub

Private Sub CommandButton2_Click()
Unload UserForm1
End Sub

bu kodları yapıştırınız
örnek dosya ekte

 

[hako88]

İhsan hocam öncelikle ilginiz için çok teşekkür ederim istediğim tam olarak buydu sağolun size sormak istediğim birşeydaha var
Bos_Satir = Son_Dolu_Satir + 1 (+1 yerine +2 yaptığımda 1 satır boşluk bırakıyor peki bıraktığı bu boşluğu kaydı tamamla dediğim zaman herhangi bir renkle doldurabilirmiyiz? ayırma açısından

 

[İhsan Tank]

İhsan hocam öncelikle ilginiz için çok teşekkür ederim istediğim tam olarak buydu sağolun size sormak istediğim birşeydaha var
Bos_Satir = Son_Dolu_Satir + 1 (+1 yerine +2 yaptığımda 1 satır boşluk bırakıyor peki bıraktığı bu boşluğu kaydı tamamla dediğim zaman herhangi bir renkle doldurabilirmiyiz? ayırma açısından

merhaba
istediğinizi yapmaya çalıştım
istediğiniz kodu syn : Ömer Uzman'dan (ç)aldım.
eki inceleyiniz

 

[hako88]

Üstadlarım ikinizede çok teşekkür ederim tam istediğim gibi ihsan bey Ömer bey ikinizede teşekkür ederim ihsan bey bir ricam daha olucak bakabilirmisiniz zahmet olmazsa excelde kendime satış takibi yaptım fakat ektede anlattığım gibi kayıt girerken yanlışlık yapıyorum makro desteği ile sorunun çözüleceğine inanıyorum bugün size çok zahmet verdim kusuruma bakmayın yardımcı olabilirseniz çok memnun olurum

 

[İhsan Tank]

Üstadlarım ikinizede çok teşekkür ederim tam istediğim gibi ihsan bey Ömer bey ikinizede teşekkür ederim ihsan bey bir ricam daha olucak bakabilirmisiniz zahmet olmazsa excelde kendime satış takibi yaptım fakat ektede anlattığım gibi kayıt girerken yanlışlık yapıyorum makro desteği ile sorunun çözüleceğine inanıyorum bugün size çok zahmet verdim kusuruma bakmayın yardımcı olabilirseniz çok memnun olurum

öncelikle rica ederim
yalnız sorularınız birbirine karıştı lütfen yeni bir konu başlığı altıında sorularınızı sorarsanız daha iyi olur
kolay gelsin

 

[hako88]

Kusura bakmayın ihsan hocam yeni konu açıyorum iyi geceler

 

[İhsan Tank]

Kusura bakmayın ihsan hocam yeni konu açıyorum iyi geceler

teşekkür ederim
iyi geceler :mutlu: