Ci-dessous, nous examinerons un programme en Excel VBA cette parcourt tous les classeurs et feuilles de calcul ouverts , et affiche tous les noms.
comment totaliser les lignes dans Excel
Situation:
Ajoutez les lignes de code suivantes au bouton de commande :
1. Tout d'abord, nous déclarons deux objets et une variable. Un objet de type Workbook que nous appelons book, un objet de type Worksheet que nous appelons feuille et une variable de type String que nous appelons text.
RienlivreCommeCahier d'exercices, feuilleCommeFeuille de travail, texteComme Chaîne de caractères
2. Nous voulons parcourir tous les classeurs ouverts. Pour y parvenir, ajoutez la ligne de code suivante :
excel formule pour ajouter plusieurs cellulesPour ChaquelivreDansCahiers d'exercices
3. Nous écrivons le texte « Classeur : », le nom du classeur et le texte « Feuilles de travail : » dans le texte variable.
text = text & 'Workbook: ' & book.Name & vbNewLine & 'Worksheets: ' & vbNewLineRemarque : vous pouvez utiliser l'opérateur & pour concaténer (joindre) des éléments. Pour commencer une nouvelle ligne, vous pouvez utiliser vbNewLine.
4. Pour parcourir toutes les feuilles de calcul d'un classeur, ajoutez la ligne de code suivante :
Pour ChaquefeuilleDanslivre.Feuilles de travail5. Nous écrivons les noms des feuilles de calcul d'un classeur dans le texte variable.
text = text & sheet.Name & vbNewLine6. Fermez la deuxième boucle.
comment flasher remplir excel macProchainfeuille
7. Ajoutez une ligne blanche.
texte = texte & vbNouvelleLigne8. N'oubliez pas de fermer la première boucle.
Prochainlivre9. Enfin, nous affichons le texte de la variable à l'aide d'une MsgBox.
Texte de la boîte de message10. Testez le programme. Avant de cliquer sur le bouton de commande, donnez à vos feuilles de calcul des noms descriptifs et ouvrez un classeur vierge avec trois feuilles de calcul.
Résultat:
Aller au chapitre suivant : Objet de plage