VBA TextBox | Comment insérer et utiliser TextBox dans VBA Userform?

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 utilisateur sont très attrayants 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 d'entrer 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 fera une visite guidée des zones de texte VBA.

Comment insérer TextBox dans VBA UserForm?

Vous pouvez télécharger ce modèle de zone de texte VBA ici - Modèle de zone de texte VBA

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 le formulaire utilisateur, nous afficherons le formulaire utilisateur comme un autre module.

Cliquez sur Formulaire utilisateur pour voir les contrôles du formulaire utilisateur.

Dans 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 un nom, une couleur, une 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 l'étiquette.

É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 comme «EmpNameTextBox».

Étape 5: Dessinez maintenant une autre étiquette sous la première étiquette et entrez le texte comme «ID d'employé».

Étape 6: Devant la deuxième étiquette, dessinez une zone de texte supplémentaire 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: Changez le texte du bouton de commande en «Soumettre».

Ok, nous en avons terminé avec la partie conception du formulaire utilisateur. Nous devons maintenant écrire le code pour stocker les données saisies dans ce formulaire utilisateur. À partir de maintenant, exécutez le formulaire utilisateur en appuyant sur la touche F5, nous devrions voir un formulaire utilisateur comme celui-ci.

Étape 11: modifiez la légende du formulaire utilisateur dans la fenêtre Propriétés.

Étape 12: Maintenant, double-cliquez sur le bouton Soumettre la commande.Dès que vous double-cliquez, vous verrez cette sous-procédure automatique comme ci-dessous.

C'est lorsque vous cliquez sur le bouton Soumettre ce qui devrait se passer. Nous devons mentionner les tâches dans le code VBA. Dans ce projet, notre objectif est de stocker les données saisies dans la zone de texte dès que nous cliquons sur le bouton Soumettre.

Pour cela, créez d'abord un modèle comme celui-ci dans la feuille de travail intitulée «Feuille d'employés».

Étape 13: Revenez maintenant à l'éditeur Visual Basic. À l'intérieur du sous-programme de clic de bouton dans VBA, déterminez d'abord la dernière ligne utilisée à l'aide du code ci-dessous.

Code:

 Private Sub CommandButton1_Click () Dim LR As Long LR = Worksheets ("Employee Sheet"). Cell (Rows.Count, 1) .End (xlUp) .Row + 1 End Sub

Étape 14: La première chose est que dans la première colonne, nous stockerons le nom de l'employé. Donc pour cela, nous devons accéder à la zone de texte nommée «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

Étape 15: Dans la deuxième colonne, nous devons stocker l'ID d'employé. Cela sera donc obtenu en accédant à la zone de texte nommée «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