Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel
Excel Forum d'entraide sur Excel. Vos questions sur les fonctions, formules, manipulations, et tout sujet qui ne trouve pas sa place dans un sous-forum.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 10/12/2010, 09h12   #1
Candidat au titre de Membre du Club
 
Inscription : juin 2009
Messages : 43
Détails du profil
Informations personnelles :
Localisation : France, Sarthe (Pays de la Loire)

Informations forums :
Inscription : juin 2009
Messages : 43
Points : 12
Points : 12
Par défaut Parcours de tableau

Bonjour,

Je bloque sur un problème assez simple je pense:
je cherche à faire un parcours de tableau en vba.

Je veux insérer une ligne vide si la valeur de ma cellule A2 est différente de la valeur en A1 ...

Mon code pour le moment:

Code :
1
2
3
4
5
6
Sub test()
Dim i As Long
For i = Range("A65000").End(xlUp).Row To 2 Step 1
If Cells(i, 1).Value <> Cells(i + 1, 1).Value Then Cells(i + 1, 1).EntireRow.insert
Next i
End Sub
Je vous joins un fichier basique pour illlustrer mon problème.

Merci d'avance pour votre aide (et vos critiques :d)
Fichiers attachés
Type de fichier : xls test.xls (32,5 Ko, 4 affichages)
tijocanard est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 10/12/2010, 10h57   #2
Membre Expert
 
Homme Robert JAMIN
Retraité
Inscription : juillet 2009
Messages : 1 223
Détails du profil
Informations personnelles :
Nom : Homme Robert JAMIN
Âge : 73
Localisation : Belgique

Informations professionnelles :
Activité : Retraité
Secteur : Enseignement

Informations forums :
Inscription : juillet 2009
Messages : 1 223
Points : 2 022
Points : 2 022
Bonjour,

Vous parcourez le tableau en remontant donc il faut décrémenter i de 1 et pour cela mettre Step -1 dans la boucle For
__________________
Cordialement.

RJ
rjamin est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 10/12/2010, 14h46   #3
Candidat au titre de Membre du Club
 
Inscription : juin 2009
Messages : 43
Détails du profil
Informations personnelles :
Localisation : France, Sarthe (Pays de la Loire)

Informations forums :
Inscription : juin 2009
Messages : 43
Points : 12
Points : 12
en effet c'était juste ca!
merci
tijocanard est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 21h42.


 
 
 
 
Partenaires

Hébergement Web