Exemples Excel VBA

C'est très bien quand j'ai commencé à travailler et à apprendre des macros VBA, je ne savais pas par où commencer. Nous avons déjà vu l'éditeur VBA qui a toutes les définitions des options et des onglets de la fenêtre de l'éditeur VBA. En tant que débutant, nous ne savons toujours pas comment démarrer la chose tant que nous n'en avons pas trouvé. Cet article est la solution pour ceux qui éprouvent des difficultés à utiliser et à apprendre des exemples VBA et à créer des macros. Nous avons tous fait face au moment où certaines choses dans Excel auraient pu être automatisées à l'aide de Macro. Mais quelqu'un qui ne sait pas utiliser VBA ne pourra pas en créer un. Ce sera un guide utile pour ceux qui découvrent le codage des macros VBA.

Exemples de VBA dans Excel pour les débutants

Voici les exemples de VBA dans Excel:

Vous pouvez télécharger ce modèle Excel d'exemples VBA ici - Modèle Excel d'exemples VBA

Exemple 1 de VBA

Voyons un exemple simple d'utilisation du codage VBA. Pour cela, suivez les étapes ci-dessous:

Étape 1: Ouvrez un module VBA dans lequel nous écrirons notre code à partir de l'onglet du menu Insérer, comme indiqué ci-dessous.

Étape 2: Maintenant, écrivez la sous-procédure de la macro VBA dans n'importe quel nom.

Code:

 Sub VBA_Examples1 () End Sub

Étape 3: Définissez une variable à l'aide de DIM où nous stockons des nombres sous forme de nombres entiers.

Code:

 Sub VBA_Examples1 () Dim A As Integer End Sub

Étape 4: Donnez maintenant un nombre quelconque à la variable définie ci-dessus, comme indiqué ci-dessous.

Code:

 Sub VBA_Examples1 () Dim A As Integer A = 100 End Sub

Étape 5: Maintenant, nous allons utiliser la boîte de message pour imprimer la valeur stockée dans la variable A.

Code:

 Sub VBA_Examples1 () Dim A As Integer A = 100 MsgBox A End Sub

Étape 6: exécutez le code en appuyant sur la touche F8 ou en cliquant sur le bouton de lecture situé sous la barre de menus. Nous verrons la boîte de message avec la valeur 100 dedans.

Code:

 Sub VBA_Examples1 () Dim A As Integer A = 100 MsgBox A End Sub

Étape 7: Cela aurait également pu être fait en utilisant la fonction Debug Print, dont les valeurs sont visibles dans la fenêtre Exécution. ( Remarque: appuyez sur Ctrl + G pour ouvrir la fenêtre immédiate)

Code:

 Sub VBA_Examples1 () Dim A As Integer A = 100 Debug.Print A End Sub

Exemple 2 de VBA

Maintenant, dans cet exemple, nous verrons un autre exemple où nous utiliserons la boucle For-Next pour imprimer les noms de feuille. Pour cela, suivez les étapes ci-dessous:

Étape 1: Ouvrez un module et écrivez la sous-procédure comme indiqué ci-dessous. Nous pouvons utiliser n'importe quel nom pour définir cela.

Code:

 Sub VBA_Examples2 () End Sub

Étape 2: choisissez une variable comme entier. Nous pouvons choisir la variable de nom comme nous l'avons fait dans l'exemple-1.

Code:

 Sub VBA_Examples2 () Dim A As Integer End Sub

Étape 3: Ouvrez une boucle For-Next comme indiqué ci-dessous.

Code:

 Sub VBA_Examples2 () Dim A as Integer For Next A End Sub

Étape 4: Sélectionnez la position de la cellule à partir de laquelle nous voulons voir les noms des feuilles. Ici, comme nous n'avons pas de référence d'en-tête, nous pouvons commencer à partir de la cellule 1.

Code:

 Sub VBA_Examples2 () Dim A As Integer For A = 1 To Sheets.Count Next A End Sub

Étape 5: Maintenant, nous affectons la variable A avec la cellule Value pour voir le nom de la feuille comme indiqué ci-dessous.

Code:

 Sub VBA_Examples2 () Dim A As Integer For A = 1 To Sheets.Count Cells (A, 1) .Value = Sheets (A) .Name Next A End Sub

Étape 6: Maintenant, exécutez le code en appuyant sur la touche F8 ou en cliquant sur le bouton Lecture.

Nous verrons, comme nous avions 3 feuilles, toutes nommées par défaut, donc leur nom a été imprimé de la cellule A1 en dessous jusqu'au nombre de feuilles que nous avons.

Exemple VBA # 3

Dans cet exemple, nous allons apprendre à imprimer les chiffres. Ce processus est tout à fait le même que celui que nous avons vu dans l'exemple-2. Pour cela, suivez les étapes ci-dessous:

Étape 1: ouvrez un module et écrivez la sous-procédure.

Code:

 Sub VBA_Examples3 () End Sub

Étape 2: considérez une variable utilisant DIM comme entier. Comme nous utilisons les nombres, le type de données Integer doit être utilisé.

Code:

 Sub VBA_Examples3 () Dim A As Integer End Sub

Étape 3: Ouvrez à nouveau une boucle For-Next comme indiqué ci-dessous.

Code:

 Sub VBA_Examples3 () Dim A as Integer For Next A End Sub

Étape 4: Sélectionnez maintenant la plage de cellules à partir de laquelle nous voulons voir le nombre jusqu'au dernier dans la syntaxe For.

Code:

 Sub VBA_Examples3 () Dim A As Integer For A = 1 to 10 Next A End Sub

Étape 5: Fixez maintenant la position de la cellule avec la variable A. Ici, le deuxième sommet de la position dans la cellule affiche le numéro de colonne. Comme nous avons choisi 1, nous nous attendons à voir les nombres à partir de la cellule A1.

Code:

 Sub VBA_Examples3 () Dim A As Integer For A = 1 to 10 Cells (A, 1) .Value = A Next A End Sub

Étape 6: Maintenant, exécutez le code en appuyant sur la touche F8 ou en cliquant sur le bouton Lecture. Nous verrons, les nombres sont générés de la cellule A1 à A10 à partir de 1 à 10 .

Étape 7: Et si nous essayons d'ajouter ces chiffres dans la deuxième colonne? Modifiez le sommet de la colonne de 1 à 2. Sinon, ajoutez une autre ligne de code comme indiqué ci-dessous.

Code:

 Sub VBA_Examples3 () Dim A As Integer For A = 1 to 10 Cells (A, 1) .Value = A Cells (A, 2) .Value = A Next A End Sub

Étape 8: Exécutez à nouveau le code complet en appuyant sur la touche F8 ou en cliquant sur le bouton Lecture. Nous verrons le même nombre à partir de 1 à 10 imprimé dans la colonne B ainsi que de la cellule B1 à B10.

Exemple VBA # 4

Dans cet exemple, nous verrons comment changer la couleur des cellules vides à partir des plages sélectionnées. Pour cela, nous avons utilisé le même numéro que dans l'exemple ci-dessus, mais nous avons supprimé certaines cellules pour obtenir la sortie.

Étape 1: Ouvrez un module, écrivez la sous-procédure comme indiqué ci-dessous.

Code:

 Sub VBA_Example4 () End Sub

Étape 2: Définissez une variable en utilisant DIM comme plage, car nous sélectionnons la plage de numéros existante.

Code:

 Sub VBA_Example4 () Dim A As Range End Sub

Étape 3: définissez maintenant cette variable comme sélection

Code:

 Sub VBA_Example4 () Dim A As Set Range A = Selection End Sub

Étape 4: Sélectionnez maintenant la plage de nombres à l'aide de la variable définie A et choisissez xlCellTypeBlanks pour sélectionner uniquement les cellules vides.

Code:

 Sub VBA_Example4 () Dim A As Range Set A = Selection A.Cells.SpecialCells (xlCellTypeBlanks). End Sub

Étape 5: Maintenant, pour changer la couleur intérieure des cellules vides, utilisez Interior.Color et choisissez la couleur par laquelle nous voulons mettre en évidence les cellules vides. Utilisez le type vbBlue ou vbGreen pour définir la couleur. L'utilisation de vb est un must.

Code:

 Sub VBA_Example4 () Dim A As Range Set A = Selection A.Cells.SpecialCells (xlCellTypeBlanks) .Interior.Color = vbBlue End Sub

Étape 6: Sélectionnez maintenant la plage de cellules, puis exécutez le code en appuyant sur la touche F8 ou en cliquant sur le bouton Lecture. Nous verrons, les cellules A4 et A7 qui étaient vides, sont maintenant surlignées en bleu comme illustré ci-dessous.

Avantages et inconvénients d'Excel VBA Exemples

  • VBA augmente l'efficacité du travail.
  • Par cela, nous voulons réduire les tâches répétitives en une seule fois.
  • Nous pouvons créer tout type de macro que nous voulons.
  • Nous pouvons également enregistrer une macro si le codage n'est pas facile.
  • Les personnes qui n'ont aucune connaissance ou idée de codage peuvent trouver difficile d'utiliser la macro VBA.

Choses dont il faut se rappeler

  • Le débutant dans VBA doit garder à l'esprit pour enregistrer le code au format Excel activé par macro. Cela nous permettra de conserver le code dans le même fichier.
  • Compilez toujours le code complet, même s'il s'agit d'une seule ligne. Cela réduira notre temps de débogage si vous rencontrez une erreur pendant l'exécution du code.
  • Commencez toujours le processus d'apprentissage de VBA ou de tout autre langage de codage avec un code petit et facile. Cela donnera une meilleure compréhension et confiance.

Articles recommandés

Ceci est un guide des exemples VBA dans Excel. Nous discutons ici de quelques exemples utiles de code de macro VBA dans Excel avec un modèle Excel téléchargeable. Vous pouvez également consulter nos autres articles suggérés -

  1. Collection VBA (exemples)
  2. Instructions IF VBA | Modèles Excel
  3. Comment utiliser la fonction de tri Excel VBA?
  4. Boucle VBA While (Exemples avec modèle Excel)
  5. VBA Environ

Catégorie:

VBA