Boîte de texte Excel VBA
La zone de texte est simplement comme une zone qui est utilisée pour obtenir l'entrée d'un utilisateur, les zones de texte font partie des formulaires utilisateur et dans l'onglet développeur de n'importe quelle feuille de calcul Excel.Si nous voulons créer des zones de texte dans un formulaire utilisateur, nous pouvons sélectionner l'option de zone de texte à partir des contrôles de formulaire utilisateur dans VBA ou dans la feuille de calcul, nous pouvons le sélectionner dans l'onglet Conception.
VBA TextBox est l'un des contrôles des nombreux contrôles du formulaire utilisateur. En affichant la zone de texte sur le formulaire utilisateur, nous pouvons leur demander de saisir les données dans la zone de texte, et les données saisies par l'utilisateur peuvent être stockées dans la feuille de calcul avec des codes simples.
Les formulaires utilisateurs sont très attractifs dans le codage VBA. Cela nous aide énormément, en particulier lorsque nous avons besoin d'obtenir les commentaires des utilisateurs. Avec les formulaires utilisateur, nous avons de nombreux contrôles, et pour obtenir la valeur d'entrée des utilisateurs, «Zone de texte» est l'option idéale dans un formulaire utilisateur. En plaçant une zone de texte sur le formulaire utilisateur, nous pouvons en fait dire à l'utilisateur de saisir la valeur requise dans la zone de texte que nous affichons. Si vous n'avez aucune idée des zones de texte VBA, cet article présente les zones de texte VBA.
Comment insérer TextBox dans VBA UserForm?
Pour insérer d'abord une zone de texte, nous devons insérer un formulaire utilisateur. Pour insérer un formulaire utilisateur, accédez à Insertion> Formulaire utilisateur.
Dès que vous cliquez sur Formulaire utilisateur, nous allons Formulaire utilisateur comme un autre module.
Cliquez sur le formulaire utilisateur pour voir les contrôles du formulaire utilisateur.
À partir de cette boîte à outils Contrôles, sélectionnez «TextBox» et faites glisser sur le formulaire utilisateur.
Avec cela, nous pouvons voir de nombreuses propriétés associées à cette zone de texte.
Propriétés de la zone de texte
Appuyez sur la touche F4 pour afficher les propriétés de la zone de texte.
Comme nous pouvons le voir, la zone de texte a Nom, couleur, Bordure comme celle-ci. Maintenant, donnez un nom propre afin que nous puissions facilement nous référer à cette zone de texte lors du codage.
Exemple d'utilisation de TextBox dans Userform
Nous réaliserons l'un des projets avec le texte VBA. Nous créerons un formulaire utilisateur de saisie de données pour stocker les détails des employés.
Étape 1: Sur le formulaire utilisateur, dessinez Label.
Étape 2: remplacez le texte par défaut de l'étiquette par "Nom de l'employé".
Étape 3: devant l'étiquette, dessinez une zone de texte.
Étape 4: Donnez un nom correct à la zone de texte en tant que «EmpNameTextBox».
Étape 5: Dessinez maintenant une autre étiquette sous la première étiquette et entrez le texte sous la forme «ID d'employé».
Étape 6: devant la deuxième étiquette, dessinez une autre zone de texte et nommez-la «EmpIDTextBox».
Étape 7: Dessinez une autre étiquette et entrez le texte comme «Salaire».
Étape 8: dessinez une autre zone de texte devant l'étiquette «Salary» et nommez-la «SalaryTextBox».
Étape 9: Maintenant, insérez le «bouton de commande» de la boîte à outils.
Étape 10: remplacez le texte du bouton de commande par «Soumettre».
Ok, we are done with the User Form design part. Now we need to write the code to store the data entered in this user form. As of now, run the user form by pressing the F5 key. We should see a user form like this.
Step 11: Change the Caption of the User Form in the Properties window.
Step 12: Now double click on the Submit Command Button.As soon as you double click you will see this auto sub procedure like the below.
This is when you click on the Submit button, what should happen. We need to mention the tasks in the VBA code. In this project, our aim is to store the data entered in the text box as soon as we click on the Submit Button.
For this, first, create a Template like this in the worksheet named “Employees Sheet.”
Step 13: Now come back to the visual basic editor. Inside the button, click subroutine in VBA first to determine the last used row by using the below code.
Code:
Private Sub CommandButton1_Click() Dim LR As Long LR = Worksheets("Employee Sheet").cell(Rows.Count, 1).End(xlUp).Row + 1 End Sub
Step 14: First thing is in the first column we will store Employee Name. So for this, we need to access the text box named “EmpNameTextBox.”
Code:
Private Sub CommandButton1_Click() Dim LR As Long LR = Worksheets("Employee Sheet").cell(Rows.Count, 1).End(xlUp).Row + 1 Ramge("A" & LR).Value = EmpNameTextBox.Value End Sub
Step 15: In the second column, we need to store Employee ID. So this will be obtained by accessing the text box named “EmpIDTextBox.”
Code:
Private Sub CommandButton1_Click() Dim LR As Long LR = Worksheets("Employee Sheet").cell(Rows.Count, 1).End(xlUp).Row + 1 Ramge("A" & LR).Value = EmpNameTextBox.Value Ramge("B" & LR).Value = EmpIDTextBox.Value End Sub
Step 16: At last, we need to store the salary part. For this, we need to access to text box named “SalaryTextBox.”
Code:
Private Sub CommandButton1_Click() Dim LR As Long LR = Worksheets("Employee Sheet").cell(Rows.Count, 1).End(xlUp).Row + 1 Ramge("A" & LR).Value = EmpNameTextBox.Value Ramge("B" & LR).Value = EmpIDTextBox.Value Range("C" & LR).Value = SalaryTextBox.Value End Sub
Ok, we are done with the coding part as well. Now run the code using the F5 key. We should see a User Form like the below.
À partir de maintenant, toutes les boîtes sont vides.
Remplissez d'abord les détails.
Cliquez maintenant sur le bouton «Soumettre». Il stockera les données sur la feuille de calcul.
Comme ça, vous pouvez continuer à saisir les données et appuyer sur le bouton Soumettre. Il s'agit du simple formulaire utilisateur de saisie de données avec une zone de texte.
