DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Private Sub UserForm_Click()
TextBox3.Text = "DEPO"
End Sub
Private Sub TextBox3_Change()
TextBox3.Text = "DEPO"
End Sub
her iki türlü de olmadı
Asagidaki kisa kodu herhangi bir Sub kodun arasina yazdiginiz zaman mesela KaydetKutusuna yazdiginiz zaman otomatikman bu Depo yazisi gelir ve yazinizi sürdürürsünüz.
TekstBox1.Value = "Depo"