Sauter une cellule sur une plage de donnée
Résolu
mr.denver
Messages postés
31
Date d'inscription
Statut
Membre
Dernière intervention
-
mr.denver Messages postés 31 Date d'inscription Statut Membre Dernière intervention -
mr.denver Messages postés 31 Date d'inscription Statut Membre Dernière intervention -
bonjour,
en fait je voudrai laisser une cellule vide entre deux cellues rempli
000000000010001128
000000000010001129
000000000010001130
000000000010001131
000000000010001143
000000000010001144
le résultat que je voudrai avoir est comme ça :
000000000010001128
000000000010001129
000000000010001130
000000000010001131
000000000010001143
000000000010001144
y a t'il une formule qui peux faire ça pour moi.
je vous remercie par avance.
en fait je voudrai laisser une cellule vide entre deux cellues rempli
000000000010001128
000000000010001129
000000000010001130
000000000010001131
000000000010001143
000000000010001144
le résultat que je voudrai avoir est comme ça :
000000000010001128
000000000010001129
000000000010001130
000000000010001131
000000000010001143
000000000010001144
y a t'il une formule qui peux faire ça pour moi.
je vous remercie par avance.
A voir également:
- Sauter une cellule sur une plage de donnée
- Comment supprimer une page sur word avec un saut de page ? - Guide
- Aller à la ligne dans une cellule excel - Guide
- Bloquer une cellule excel - Guide
- Excel cellule couleur si condition texte - Guide
- Diviser une cellule excel en deux horizontalement ✓ - Forum Excel
7 réponses
Bonjour,
Il n'existe pas de fomule, il faut passer par vba pour réaliser ce que tu veux faire...
Envoie ton fichier depuis cjoint.com
Il n'existe pas de fomule, il faut passer par vba pour réaliser ce que tu veux faire...
Envoie ton fichier depuis cjoint.com
Bonjour mr.denver
Public Sub Saut_mouton()
'
' sélectionner la première cellule de la liste avant de lancer la macro
'(Conseil de bon sens faire une copie de la liste avant sur une autre feuille)
Dim stocK As Variant, feuLL
Dim derL As Long, preL As Long, coL As Long
If ActiveCell = Empty Then Exit Sub 'securité
feuLL = ActiveSheet.Name
With Selection
preL = .Row
coL = .Column
derL = .End(xlDown).Row
End With
If derL = ActiveSheet.Rows.Count Then Exit Sub 'securité
With ActiveSheet
stocK = .Range(.Cells(preL, coL), .Cells(derL, coL))
.Range(.Cells(preL, coL), .Cells(derL, coL)).Clear
Dim i
Dim y As Single: y = 0
For Each i In stocK
.Cells(preL + y, coL).Value = i
y = y + 2
Next i
End With
End Sub
Si tu as des question n'hésite pas
Public Sub Saut_mouton()
'
' sélectionner la première cellule de la liste avant de lancer la macro
'(Conseil de bon sens faire une copie de la liste avant sur une autre feuille)
Dim stocK As Variant, feuLL
Dim derL As Long, preL As Long, coL As Long
If ActiveCell = Empty Then Exit Sub 'securité
feuLL = ActiveSheet.Name
With Selection
preL = .Row
coL = .Column
derL = .End(xlDown).Row
End With
If derL = ActiveSheet.Rows.Count Then Exit Sub 'securité
With ActiveSheet
stocK = .Range(.Cells(preL, coL), .Cells(derL, coL))
.Range(.Cells(preL, coL), .Cells(derL, coL)).Clear
Dim i
Dim y As Single: y = 0
For Each i In stocK
.Cells(preL + y, coL).Value = i
y = y + 2
Next i
End With
End Sub
Si tu as des question n'hésite pas
merci pour votre réponse
mais le problème c'est que je ne sait pas utiliser VBA.
voici mon fichier
https://sendbox.fr/index.php?/pro/ylqtt0eqfdm5/Nouveau_Microsoft_Excel_Worksheet.xlsx.html
mais le problème c'est que je ne sait pas utiliser VBA.
voici mon fichier
https://sendbox.fr/index.php?/pro/ylqtt0eqfdm5/Nouveau_Microsoft_Excel_Worksheet.xlsx.html
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Bonjour Iama,
merci beaucoup pour votre aide sauf que je n'arrive pas à récupérer le fichier que vous m'avais fait puisque mon pc filtre le site ci-joint est ce que c'est possible de me l'envoyer par
https://www.sendbox.fr/
ou mon mail: tresorisland@gmail.com.
merci par avance
merci beaucoup pour votre aide sauf que je n'arrive pas à récupérer le fichier que vous m'avais fait puisque mon pc filtre le site ci-joint est ce que c'est possible de me l'envoyer par
https://www.sendbox.fr/
ou mon mail: tresorisland@gmail.com.
merci par avance
Bonjour,
Une proposition par formule. En B1 :
à recopier vers le bas.
Terminer avec un copier collage spécial valeur de la colonne B.
eric
Une proposition par formule. En B1 :
=SI(MOD(LIGNE();2);DECALER($A$1;(LIGNE()-1)/2;);"")
à recopier vers le bas.
Terminer avec un copier collage spécial valeur de la colonne B.
eric
merciiiiiii eriiic le résultat est parfait ,tu me sauve là:
000000000010001865 10001865
000000000010001866
000000000010001867 10001866
000000000010001868
000000000010001869 10001867
000000000010001821
ya juste un petit détail mais important pour mon fichier est ce que c'est possible
de garder les zéro à gauches qui precède les chiffres .
plutot comme ca.
000000000010001865 000000000010001865
000000000010001866
000000000010001867 000000000010001866
000000000010001868
000000000010001869 000000000010001867
000000000010001821
merci beaucoup. t'ai un AS
000000000010001865 10001865
000000000010001866
000000000010001867 10001866
000000000010001868
000000000010001869 10001867
000000000010001821
ya juste un petit détail mais important pour mon fichier est ce que c'est possible
de garder les zéro à gauches qui precède les chiffres .
plutot comme ca.
000000000010001865 000000000010001865
000000000010001866
000000000010001867 000000000010001866
000000000010001868
000000000010001869 000000000010001867
000000000010001821
merci beaucoup. t'ai un AS
et si je voudrai sauter deux cellules au lieu d'une seule , j'imagine qu'il fait changer juste un paramètre dans la formule précédant peu-tu m'indiquer stp
genre:
000000000010001865 000000000010001865
000000000010001866
000000000010001867
000000000010001868 000000000010001866
000000000010001869
000000000010001821
000000000010001822 000000000010001867
encore une fois merci
genre:
000000000010001865 000000000010001865
000000000010001866
000000000010001867
000000000010001868 000000000010001866
000000000010001869
000000000010001821
000000000010001822 000000000010001867
encore une fois merci
https://sendbox.fr/index.php?/pro/ylqtt0eqfdm5/Nouveau_Microsoft_Excel_Worksheet.xlsx.html
désolé de ne pas utilisé ci-joint.com il est bloqué par mon portail internet