Dans un tableau j'ai dans une colonne D avec un n=B0=20
d'enregistrement, je cherche une astuce pour trouver s'il=20
y a des trous dans la num=E9rotation et y ins=E9rer des=20
lignes vides pour faire correspondre le n=B0de ligne et le=20
N=B0 d'enregistrement sans trous
Avez-vous une id=E9e ????
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel
Bonjour. Essaie ce code :
Sub Test() Range("D1").Select Do While ActiveCell <> "" If ActiveCell.Row < ActiveCell.Value Then ActiveCell.EntireRow.Insert ActiveCell.Value = ActiveCell.Row End If ActiveCell.Offset(1, 0).Select Loop End Sub
Cordialement. Daniel "Popol" a écrit dans le message de news: 7dd901c52873$4a1a6100$ Hello,
Dans un tableau j'ai dans une colonne D avec un n° d'enregistrement, je cherche une astuce pour trouver s'il y a des trous dans la numérotation et y insérer des lignes vides pour faire correspondre le n°de ligne et le N° d'enregistrement sans trous Avez-vous une idée ????
Merci
Bonjour.
Essaie ce code :
Sub Test()
Range("D1").Select
Do While ActiveCell <> ""
If ActiveCell.Row < ActiveCell.Value Then
ActiveCell.EntireRow.Insert
ActiveCell.Value = ActiveCell.Row
End If
ActiveCell.Offset(1, 0).Select
Loop
End Sub
Cordialement.
Daniel
"Popol" <anonymous@discussions.microsoft.com> a écrit dans le message de
news: 7dd901c52873$4a1a6100$a601280a@phx.gbl...
Hello,
Dans un tableau j'ai dans une colonne D avec un n°
d'enregistrement, je cherche une astuce pour trouver s'il
y a des trous dans la numérotation et y insérer des
lignes vides pour faire correspondre le n°de ligne et le
N° d'enregistrement sans trous
Avez-vous une idée ????
Sub Test() Range("D1").Select Do While ActiveCell <> "" If ActiveCell.Row < ActiveCell.Value Then ActiveCell.EntireRow.Insert ActiveCell.Value = ActiveCell.Row End If ActiveCell.Offset(1, 0).Select Loop End Sub
Cordialement. Daniel "Popol" a écrit dans le message de news: 7dd901c52873$4a1a6100$ Hello,
Dans un tableau j'ai dans une colonne D avec un n° d'enregistrement, je cherche une astuce pour trouver s'il y a des trous dans la numérotation et y insérer des lignes vides pour faire correspondre le n°de ligne et le N° d'enregistrement sans trous Avez-vous une idée ????
