Programmation Excel VBA : quels sont les codes VBA et comment les utiliser

La plupart des utilisateurs de Windows connaissent la suite Office de Microsoft et ses nombreuses applications puissantes, et nombre d'entre eux utilisent ces applications dans leurs tâches quotidiennes. Cependant, seule une poignée de ces utilisateurs maîtrisent Excel. Pourtant, Excel regorge de fonctionnalités telles que des macros et des codes VBA, qui peuvent rendre vos tâches quotidiennes beaucoup plus simples.

Aujourd'hui, nous discuterons de ces fonctionnalités avancées et vous apprendrons à optimiser votre flux de travail. Nous plongerons dans les codes VBA et les macros Excel et vous montrerons comment les utiliser en fournissant des exemples. Il y aura également une section sur la prévention de la perte de données, car les codes VBA peuvent supprimer vos données Excel s'ils sont mal utilisés.

Dans cet article

Qu'est-ce qu'un code VBA ?
Comment utiliser les codes de macro dans Excel
20 exemples de code VBA Excel de base pour les débutants
🚀 [Bonus] Comment garantir la sécurité des données lors de l'utilisation de codes VBA
Conclusion

Qu'est-ce qu'un code VBA?

Avant de regarder des exemples de code VBA, nous devons d'abord parler de VBA et expliquer ce que c'est. VBA, ou Visual Basic Applications, est un langage de programmation que les applications Microsoft Office comme Excel utilisent pour créer, enregistrer et déployer des macros, également appelées scripts de tâches automatisées.

D'autre part, les macros sont des scripts de programmation ou un ensemble de commandes qui peuvent automatiser votre flux de travail Excel. Ces scripts permettent aux utilisateurs d'effectuer des actions complexes et chronophages dans les feuilles de calcul avec un raccourci préenregistré, leur permettant de gagner du temps lors de la gestion des données, du pivotage des tables et du nettoyage des feuilles de calcul.

Comment utiliser les codes de macro dans Excel.

Maintenant que nous connaissons les bases des macros Excel, nous passerons immédiatement à l'utilisation de ces codes et vous montrerons comment en créer un à travers un exemple de macro dans Excel. Voici ce que vous devez faire :

Lancer Microsoft Excel et accéder à Fichier > Options > Personnaliser le ruban.
Sous Onglets principaux, cochez la case en regard de Développeur pour activer la fonctionnalité masquée par défaut.
Enregistrez vos paramètres en cliquant sur OK, puis accédez à l'onglet Développeur.
Sélectionnez l’option Enregistrer la macro.
Nommez votre macro et décrivez brièvement ce qu'elle fait afin de pouvoir l'identifier plus tard. Vous pouvez également ajouter des raccourcis pour appeler la macro.
Une fois que vous avez saisi les détails de la macro, vous pouvez appuyer sur OK et effectuer les actions que vous souhaitez ajouter à la macro. L'application Excel enregistrera et sauvegardera ces actions dans la macro créée.
Cliquer sur Arrêt enregistrement une fois que vous aurez terminé vos actions, votre macro sera terminée.
Lorsque vous devez réutiliser ces étapes, vous pouvez appuyer sur les boutons du clavier et appeler la macro via le raccourci que vous avez défini. Vous pouvez également accéder à Développeur > Macros > Afficher les macros et appuyer sur Exécuter sur la macro souhaitée.

Vos actions préenregistrées s'exécuteront à travers la macro, et vous pourrez vérifier les résultats. N'oubliez pas que la vérification est une étape très importante, surtout pour les débutants en macro, et vous permet de vous assurer que vos nouvelles tâches automatisées fonctionnent bien. Vous devrez modifier vos macros si vos actions ne fonctionnent pas comme vous le vouliez.

20 Exemples de code VBA Excel de base pour les débutants

Comme mentionné ci-dessus, VBA signifie Visual Basic pour Applications, un langage que Excel peut comprendre. Toute macro que vous créez avec les étapes mentionnées ci-dessus enregistrera vos actions sur la feuille de calcul, les convertira en code VBA lisible par Excel et les enregistrera sous une forme que Excel peut reconnaître et comprendre.

Avec cela dit, nous avons également fourni quelques exemples de base de code VBA et de macros. Voyons à quoi ressemblent les macros utiles et ce que vous pouvez en faire :

Ces macros font ce que leur nom suggère, et vous pouvez les copier et les essayer dans vos propres fichiers XLS. Vous trouverez leurs codes VBA ci-dessous, mais n'oubliez pas de les tester sur des feuilles de calcul non importantes ou de créer des copies de vos fichiers importants au préalable.

Insérer plusieurs colonnes

Sub InsérerPlusieursColonnes()
Dim i As Integer
Dim j As Integer
ActiveCell.EntireColumn.Select
On Error Resume Next
i = InputBox("Entrez le nombre de colonnes à insérer", "Insérer des colonnes")
For j = 1 To i
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromRightorAbove
Next j
Last: Exit Sub
End Sub

Insérer plusieurs lignes

Sub InsérerPlusieursLignes()
Dim i As Integer
Dim j As Integer
ActiveCell.EntireRow.Select
On Error Resume Next
i = InputBox("Entrez le nombre de lignes à insérer", "Insérer des lignes")
For j = 1 To i
Selection.Insert Shift:=xlToDown, CopyOrigin:=xlFormatFromRightorAbove
Next j
Last: Exit Sub
End Sub

Colonnes d'ajustement automatique

Sub AjusterColonnes()
Cells.Select
Cells.EntireColumn.AutoFit
End Sub

Lignes d'ajustement automatique

Sub AjusterLignes()
Cells.Select
Cells.EntireRow.AutoFit
End Sub

Annuler la fusion des cellules

Sub DissocierCellules()
Selection.UnMerge
End Sub

Mettre en surbrillance les valeurs supérieures

Sub MiseEnValeurValeursSupérieures()
Dim i As Integer
i = InputBox("Entrez une valeur supérieure", "Entrez une valeur")
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlCellValue, _
Operator:=xlGreater, Formula1:=i
Selection.FormatConditions(Selection.FormatConditions.Count).S
tFirstPriority
With Selection.FormatConditions(1)
.Font.Color = RGB(0, 0, 0)
.Interior.Color = RGB(31, 218, 154)
End With
End Sub

Mettre en surbrillance les valeurs inférieures

Sub MiseEnValeurValeursInférieures()
Dim i As Integer
i = InputBox("Entrez une valeur inférieure", "Entrez une valeur")
Selection.FormatConditions.Delete
Selection.FormatConditions.Add _
Type:=xlCellValue, _
Opérateur : = xlLower, _
Formule1 : = i
Selection.FormatConditions(Selection.FormatConditions.Count).S
tFirstPriority
With Selection.FormatConditions(1)
.Font.Color = RGB(0, 0, 0)
.Interior.Color = RGB(217, 83, 79)
End With
End Sub

Mettre en surbrillance les nombres négatifs

Sous surlignerLesNombresNégatifs()
Dim Rng As Range
Pour chaque Rng dans la Sélection
Si WorksheetFunction.IsNumber(Rng) Alors
Si Rng.Valeur< 0 Then
Rng.Font.Color = -16776961
Fin Si
Fin Si
Suivant
End Sub

Mettre en surbrillance les cellules mal orthographiées

Sous mettreEnValeurLesCellulesMalÉpelées()
Dim rng As Range
Pour chaque rng dans FeuilleActive.UsedRange
Si Application.CheckSpelling(Mot:=rng.Teste) Alors
rng.Style = "Mauvais"
Fin Si
Suivant rng
End Sub

Afficher les feuilles de calcul

Sous rendreToutesLesFeuillesDeCalculVisibles()
Dim ws As Worksheet
Pour chaque ws dans ClasseurActif.FeuillesDeCalcul
ws.Visible = xlSheetVisible
Suivant ws
End Sub

Supprimer tout sauf les feuilles de calcul actives

Sous supprimerLesFeuillesDeCalcul()
Dim ws As Worksheet
Pour chaque ws dans CeClasseur.FeuillesDeCalcul
Si ws.name<>CeClasseur.FeuilleActuelle.name Alors
Application.DisplayAlerts = False
ws.Delete
Application.DisplayAlerts = True
Fin Si
Suivant ws
End Sub

Supprimer les feuilles vierges

Fin Si
Sous supprimerLesFeuillesDeCalculVides()
Dim Ws As Worksheet
En cas d'erreur Continuer
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Pour chaque Ws dans Application.FeuillesDeCalcul
Si Application.WorksheetFunction.CountA(Ws.UsedRange) = 0 Alors
Fin Si
Suivant
Ws.Delete
Application.ScreenUpdating = True
End Sub

Enregistrer les feuilles de calcul en tant que PDFs

Application.DisplayAlerts = True
Sous enregistrerFeuilleDeCalculEnPDF()
Dim ws As Worksheet
Pour chaque ws dans FeuillesDeCalcul
ws.ExportAsFixedFormat _
xlTypePDF, _
"ENTREZ-LE-NOM-DU-DOSSIER-ICI" et; _
Suivant ws
End Sub

Fermer les classeurs

ws.Name et ".pdf"
Sous fermerTousLesClasseurs()
Dim wbs As Workbook
Pour chaque wbs dans Classeurs
wbs.Close SaveChanges:=True
End Sub

Actualiser les tableaux croisés dynamiques

Suivant wb
Sous vba_actualiserToutesLesPivots()
Dim pt As PivotTable
Pour chaque pt dans ClasseurActif.PivotTables
pt.RefreshTable
End Sub

Ajouter des graphiques en tant qu'images

Suivant pt
Sous convertirGraphiqueEnImage()
ActiveChart.ChartArea.Copy
ActiveSheet.Range("A1").Select
End Sub

Insérer des images.

ActiveSheet.Pictures.Paste.Select
Sous nomméImage()
Selection.Copy
End Sub

Supprimer les caractères des chaînes de caractères

Public Function removeFirstC(rng As String, cnt As Long)
removeFirstC = Droite(rng, Len(rng) - cnt)
End Function

Texte inversé

Public Function rvrse(ByVal cell As Range) As String
rvrse = VBA.strReverse(cell.Value)
End Function

Remplacez les cellules vides par des zéros.

Sub replaceBlankWithZero()
Dim rng As Range
Selection.Value = Selection.Value
For Each rng In Selection
If rng = "" Or rng = " " Then
rng.Value = "0"
Else
Fin Si
Suivant rng
End Sub

🚀[Bonus] Comment Assurer la Sécurité des Données Lors de l'Utilisation de Codes VBA

Comme vous l'avez peut-être remarqué, certains exemples de codes VBA ci-dessus incluent des tâches de suppression de données, et de nombreux experts d'Excel utilisent de tels macros quotidiennement. Cependant, il est important de noter que l'utilisation erronée de ces macros peut supprimer vos précieuses feuilles de calcul Excel, et vous devrez donc faire attention avec de tels macros.

Il n'y a rien à craindre même si vous avez déjà utilisé des codes VBA de suppression de données, car il existe des solutions qui peuvent restaurer vos fichiers Excel. Les applications de récupération de données fonctionnent à merveille dans ces situations, et un outil comme Wondershare Recoverit est un parfait exemple.

Téléchargement Gratuit Pour Windows Vista/7/8/10/11

Téléchargement Gratuit Pour macOS X 10.10 ou version ultérieure

Que vous soyez confronté à des feuilles de calcul Excel perdues, des modifications récentes non enregistrées, des données supprimées ou des codes VBA de suppression de données utilisés accidentellement, cette application peut vous aider. Son algorithme de recherche et de récupération efficace et avancé peut rapidement restaurer les fichiers perdus, quelle que soit la situation de perte de données, car l'application prend en charge plus de 500 d'entre elles. Son utilisation est un jeu d'enfant, et voici comment vous pouvez le faire :

Ouvrez Wondershare Recoverit et choisissez le Disques durs et Emplacements.
Sélectionnez le lecteur de disque où vous stockez les fichiers XLS - l'application le numérisera immédiatement à la recherche de données perdues.
Ajoutez des filtres de fichiers et des mots-clés pour rechercher des fichiers Excel spécifiques.
Wondershare Recoverit vous permettra de prévisualiser les fichiers Excel lorsqu'il les trouve. Si vous êtes satisfait de l'aperçu, vous pouvez mettre en pause ou arrêter l'analyse et appuyer sur Récupérer pour enregistrer les données découvertes sur votre PC.

Avec Wondershare Recoverit dans votre arsenal, vous pouvez utiliser et pratiquer en toute sécurité avec des codes VBA avancés et amener votre flux de travail Excel à un autre niveau sans craindre de faire des erreurs. Il peut également gérer des fichiers tels que la musique, les photos et les vidéos, supportant plus de 1 000 types de fichiers récupérables.

Vous pouvez utiliser l'application sur des disques internes, des supports de stockage externe, des NAS, des clés USB et d'autres, car Wondershare Recoverit prend en charge plus de 2 000 périphériques de stockage. C'est parfait pour les pertes de données causées par des logiciels malveillants, des plantages système, des transferts de fichiers interrompus, des disques défaillants, etc., ce qui en fait un outil idéal pour garantir la sécurité des données.

Conclusion

En plus des capacités de calcul, de computation et de feuille de calcul, Microsoft Excel dispose de diverses fonctionnalités avancées, telles que des macros, qui peuvent rationaliser votre flux de travail et automatiser des tâches fastidieuses pour vous faire gagner du temps précieux. Ces macros transforment vos actions préenregistrées en code VBA, un langage de programmation compris et utilisé par Excel.

De l'ajout de plusieurs lignes ou colonnes à l'ajustement automatique des saisies de données pour mettre en évidence les valeurs, les erreurs et les caractères, en passant par la mise en forme de vos feuilles de calcul, les codes VBA peuvent améliorer vos compétences Excel avec un peu de pratique. Et si les choses tournent mal et que vous faites une erreur avec la suppression de données VBA, des applications de récupération comme Wondershare Recoverit peuvent récupérer facilement vos fichiers XLS vitaux et vos données Excel.