Bu dosya, bir UserForm üzerindeki iki TextBox arasında veri aktarımının nasıl yapıldığını gösteren makro örneğidir. TextBox1 içindeki metin, düğmelerle TextBox2'ye kopyalanır veya taşınır.
Dosyanın içeriği
- exceldestek.com | exceldepo.com: Veri ve formül içermeyen tek sayfadır. Formu açan makro bu sayfadan çalıştırılır.
- Module1: Formu açan makro1 yordamını barındırır.
- UserForm1: İki TextBox ve iki düğme (CommandButton1 ve CommandButton2) içeren formdur.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Dosya .xlsm biçimindedir.- makro1: UserForm1 formunu görüntüler.
- UserForm_Initialize: Form açıldığında imleci TextBox1 alanına yerleştirir.
- CommandButton1_Click: TextBox1 içindeki metnin tamamını seçer, kopyalar ve TextBox2 alanına yapıştırır. Metin korunur, TextBox1 değişmez.
- CommandButton2_Click: Aynı seçimi yapar, ancak metni keserek TextBox2 alanına yapıştırır. Metin TextBox1 içinden kaldırılır ve TextBox2 içinde kalır.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Alt+F8 ile makro listesini açıp makro1 makrosunu çalıştırın; UserForm1 görüntülenir.
- TextBox1 alanına aktarılacak metni yazın.
- Metni TextBox2 alanına kopyalamak için CommandButton1 düğmesine, taşımak için CommandButton2 düğmesine tıklayın.
- Kendi çalışmanıza uyarlamak için Alt+F11 ile VBA düzenleyicisini açın ve UserForm1 üzerindeki kontrolleri ve düğme kodlarını düzenleyin.