Suppression d'une case d'un tableau
Fermé
lolo77777
-
8 juin 2013 à 13:19
eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024 - 8 juin 2013 à 23:43
eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024 - 8 juin 2013 à 23:43
A voir également:
- Suppression d'une case d'un tableau
- Tableau croisé dynamique - Guide
- Forcer la suppression d'un fichier - Guide
- Tableau ascii - Guide
- Tableau word - Guide
- Comment imprimer un tableau excel sur une seule page - Guide
2 réponses
Bon, étant donné que personne n'ai pu m'aider, j'ai trouvé tout seul.
Voici la solution :
Il suffit de créer deux boucles for, et de décaler les cellules vers la gauche comme pour mon exemple :
Dim i As Integer
Dim j As Integer
For i = 1 To NBC
If TabC(i) = UClasse.Value Then
For j = i + 1 To NBC
TabC(j - 1) = TabC(j)
Next j
End If
Next i
NBC = NBC - 1
MsgBox "Classe supprimée avec succès !"
Voici la solution :
Il suffit de créer deux boucles for, et de décaler les cellules vers la gauche comme pour mon exemple :
Dim i As Integer
Dim j As Integer
For i = 1 To NBC
If TabC(i) = UClasse.Value Then
For j = i + 1 To NBC
TabC(j - 1) = TabC(j)
Next j
End If
Next i
NBC = NBC - 1
MsgBox "Classe supprimée avec succès !"
eriiic
Messages postés
24570
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
23 avril 2024
7 216
8 juin 2013 à 23:43
8 juin 2013 à 23:43
Bonjour,
faut dire que c'est plus facile avec le fichier sous les yeux, tu n'as pas de mérite...
eric
faut dire que c'est plus facile avec le fichier sous les yeux, tu n'as pas de mérite...
eric
