Problème Excel

Fermé
Lucie - 11 mars 2009 à 11:51
 Lucie - 11 mars 2009 à 16:09
Bonjour,
Comment insérer une cellule vide toutes les quatre cellules sur 2000 lignes, dans une même colonne.
J'ai mis un exemple.
http://www.cijoint.fr/cjlink.php?file=cj200903/cijjZU7vmB.xls
Merci.
A voir également:

2 réponses

lilidie Messages postés 7 Date d'inscription vendredi 27 février 2009 Statut Membre Dernière intervention 20 août 2013
11 mars 2009 à 11:56
SAlut
tu as la fonction Nbval qui compte le nombre de cellule occupées sous XLS
peut être qu'il y a moyen d'insérer une condition du style " si Nbval =4 alors insérer un ligne
je n'ai pas XLS sous les yeux, mais j'espère t'avoir mis sur la piste :)
cdt
0
Bonjour, je ne sais pas comment faire du tout avec cette fonction si c'est bien cela.
Car Excel est un monde obscure pour moi.
Merci.
0
Bonjour

Commence par faire une copie de ton fichier si jamais tu te plantes.

Tu repères le numéro de la dernière ligne blanche entre 2 groupe de données (si dernière ligne=2000, relever 1997).
Tu fais un clic droit sur l'onglet de la feuille
Tu choisis "Visualiser le code"

Tu y colles la, macro ci-dessous (la partie entre les lignes) :
-------------------------------------------------
Sub InsereLigne()
'
' test InsereLigne
' Macro enregistrée le 11/03/2009 par
'
For i = XXX To 5 Step -4
plage = "A" & i
Range(plage).Select
Selection.EntireRow.Insert
Next i
End Sub
----------------------------------------------------

A la place de XXX, tu mets le numéro de ligne que tu as relevé.

Tu vas dans Outils, Macro, Macros,
Tu sélectionnes la macro InsereLigne
Tu cliques sur Exécuter.
ça devrait le faire si tu as repéré la ligne correctement, sinon tu reprends une copie et tu recommences.
0
Bonjour,
Impeccable, cela marche du premier coup.
j'ai besoin d'insérer une ligne blanche d'une autre façon comment dois-je m'y prendre sur 2000 lignes.
http://www.cijoint.fr/cjlink.php?file=cj200903/cijTOQPX4a.xls
Merci, Relou, Cdt.
0
Lucie > Joelle
11 mars 2009 à 15:17
Bonjour, Joelle
Je vois que la solution de Relou te sert à toi, aussi.
Je suis intéressé par ta demande aussi.
j'ai essayer de modifier la macro de Relou, mais pas moyen d'obtenir ce que je souhaite faire.
Comment insérer une ligne entre :
http://www.cijoint.fr/cjlink.php?file=cj200903/cijFPE1bHF.xls
Merci.
0
Relou > Lucie
11 mars 2009 à 16:02
Je ne comprends plus grand chose entre Lucie et joelle.
Ma réponse était pour Lucie, ça ne lui convient pas mais ça marche chez joelle.
Lucie, dans ton dernier exemple, on ne peut pas automatiser car j'ai tantôt 2 ligne vierges, tantôt 1 seule et même parfois aucune. Il faut savoir de quoi on part exactement.
0
Relou > Joelle
11 mars 2009 à 15:44
Si tu repars de la liste d'origine (Mon Problème), tu utilises la même macro, il suffit de remplacer XXX par le numéro de ligne du dernier prénom de la liste (16 dans ton exemple) et "To 5" par "To 4", ce qui donnerait :

For i = 16 To 4 Step -4
0
Lucie > Relou
11 mars 2009 à 16:09
Bonjour,
Merci, Relou, cela va mettre utile.
Cordialement.
0