Excel VBA Kullanıcı Formu
VBA'daki kullanıcı formu, bir kullanıcıdan bir form biçiminde girdi almak için yapılan özelleştirilmiş kullanıcı tanımlı formlardır, bir kullanıcıyı bir değer girmeye yönlendirmek için metin kutuları, onay kutuları etiketleri vb. Gibi eklenecek farklı denetim kümelerine sahiptir. ve değeri çalışma sayfasında saklar, kullanıcı formunun her parçasının kendine özgü bir kodu vardır.
Kullanıcı formu, Excel arayüzündeki bir nesnedir ve bu kullanıcı formunun içinde, kullanıcıdan verileri almak için başka yararlı özel iletişim kutuları oluşturabiliriz. Kıdemli görevliniz tarafından oluşturulan veya internetten indirilebilecek bir makro dosyasıyla çalışırken, bunun gibi bir kullanıcı formu görmüş olmalısınız.
Bu makalede, kullanıcıdan gelen verileri depolamak için benzer bir kullanıcı formunun nasıl oluşturulacağını göstereceğiz.
Kullanıcı Formu Nasıl Oluşturulur?
Benzer şekilde yeni bir modülü nasıl eklediğiniz gibi, Userform eklemek için Visual Basic Editor'da INSERT düğmesine tıklamanız gerekir.
Bu VBA Kullanıcı Formu Excel Şablonunu buradan indirebilirsiniz - VBA Kullanıcı Formu Excel Şablonu
Buna tıkladığınız anda kullanıcı formu da eklenecektir.
Bunu nasıl programlayacağınızı söylemeden önce, bu kullanıcı formunu nasıl biçimlendireceğinizi göstermeme izin verin.
Kullanıcı Formunu Biçimlendirme
Kullanıcı formunu seçerek F4 tuşuna basın, size özellikler penceresini gösterecektir.
Bu özellikler penceresini kullanarak bu kullanıcı formunu biçimlendirebiliriz, isimlendirebiliriz, rengini, bordür stilini vb. Değiştirebiliriz ...
Bunun gibi, kullanıcı formunu görmek için diğer özellikleri deneyin.
Şimdi bu kullanıcı formu için Toolbox'ı ekleyin.
Şimdi bunun gibi bir alet kutusu göreceğiz.
Şu anda kullanıcı formu sadece programlanmamıştır. Nasıl çalıştığını öğrenmek için çalıştır düğmesine tıklayın, formu excel çalışma sayfasında göreceğiz.
Şimdi ToolBox çizim etiketini kullanarak.
Metni, etiketin içine Çalışan Adı olarak girin.
Bu etiket için, özellikleri kullanarak biçimlendirebiliriz. Şimdi metni "Çalışan Adı" olarak girdik: Şimdi bunu Başlıklar altındaki özellikler penceresinde görebiliriz.
Bir etiket daha ekleyin. Bir etiket daha eklemek için ya bir araç kutusuna tıklayabilir ya da Ctrl tuşunu basılı tutarak mevcut etiketi sürükleyebilirsiniz, mevcut etiketin bir kopyasına sahip olacaksınız.
Şimdi aynı etikete sahip olacağız.
Adı Çalışan Kimliği olarak değiştirin.
Şimdi benzer şekilde bir etiket daha ekleyin ve bunu "Departman" olarak adlandırın.
Şimdi araç kutusundan bir metin kutusu ekleyin.
Özellikler penceresinde bu metin kutusunu EmpName olarak adlandırın .
Bunun gibi, sırasıyla Çalışan Kimliği ve Departmanından iki metin kutusu daha ekleyin. Bu metin kutularını başlıklarına göre adlandırın.
Benzer şekilde, Departman için yapın.
Şimdi araç kutusundan Komut Düğmesini ekleyin.
Komut Düğmesinin Adını "Gönderme Düğmesi " olarak değiştirin ve başlığını "Gönder" olarak değiştirin.
Bir düğme daha ekleyin ve buna "İptal" deyin.
Şimdi sadece çalıştırmayı görmek için çalıştır düğmesine basın veya F5 tuşunu kullanın ve kullanıcı formunuzun Excel'de nasıl göründüğünü görün.
Şimdi şekle geliyor.
VBA Kodu
Şimdi kullanıcı buna veri girecek, bu yüzden kullanıcı tarafından bu forma girilen verileri saklamak için bunu programlamamız gerekiyor.
GÖNDER düğmesine çift tıklayın, aşağıdaki gibi otomatik oluşturulan bir makro ile sizi makro penceresine götürecektir.
It says SubmitButton click, remember we had given a name for SUBMIT button as SubmitButton.
So, whenever we want to call this button we can call this by this name (submit button). Inside this macro copy and paste the below code.
Code:
Private Sub SubmitButton_Click() Dim LR As Long LR = Cells(Rows.Count, 1).End(xlUp).Row + 1 Cells(LR, 1).Value = EmpName.Value Cells(LR, 2).Value = EmpID.Value Cells(LR, 3).Value = Dept.Value EmpName.Value = "" EmpID.Value = "" Dept.Value = "" End Sub
- EmpName.Value here EmpName is the text box name we had given while creating the employee name text box.
- EmpID.Value here EmpID is the text box name of Employee ID text box.
- Dept.Value this is department text box name.
So, on the click on submit button it will store the values in the mentioned cells.
Now double click on Cancel button, this will also show you the auto macro name like this.
Copy the below code and paste.
Code:
Private Sub CancelButton_Click() MyUserForm.Hide End Sub
MyUserForm is the name we had given to the userform. MyUserForm.Hide means on the click on the CANCEL button it will hide the userform.
Ok, now create a template like this in the worksheet.
Delete all the other sheets in the workbook except this template sheet.
Now go to Visual Basic Editor.
And run the macro using F5 key or manually, we will see user form in front of us.
Enter the employee name, employee id, and Department name.
Now if you click on the SUBMIT button, it will store the values on to the template we have created.
Like this you can keep entering the names, userform will keep storing the values entered by the user in the specified cells.
So by using USER FORM, we can actually create wonderful projects to get the information from the user.