Ci-dessous, nous examinerons un programme en Excel VBA cette supprime les cellules vides .
Situation:
comment calculer la différence de pourcentage dans Excel
1. Tout d'abord, nous déclarons deux variables de type Integer. Un compteur nommé et un nommé i. On initialise le compteur de variable avec la valeur 0.
RiencontrerComme Entier, jeComme Entiercompteur = 0
2. Ensuite, nous vérifions pour chaque cellule si elle est vide ou non ( signifie différent de). Nous utilisons une boucle pour cela. S'il n'est pas vide, nous écrivons la valeur dans la colonne B. Le compteur enregistre le nombre de cellules qui ont été copiées dans la colonne B. Chaque fois que nous copions une valeur dans la colonne B, nous incrémentons le compteur de 1. Cette partie du programme ressemble à ceci :
Pourje = 1Àdix
SiCells(i, 1).Valeur ''Puis
Cellules(compteur + 1, 2).Valeur = Cellules(i, 1).Valeur
compteur = compteur + 1
Finir Si
Prochainje
Résultat à ce jour :
3. Enfin, nous vidons Range('A1:A10'), copions les valeurs de la colonne B dans la colonne A et vidons Range('B1:B10').
Plage ('A1:A10').Valeur = ''Plage('A1:A10').Valeur = Plage('B1:B10').Valeur
Plage('B1:B10') = ''
Résultat:
Aller au chapitre suivant : Boucle