Insertion automatique de données en fonction des cellules adjace nt
2 réponses
Jacmic100
Bonjour,
Question toute simple :
Comment insérer automatiquement des données en fonction des cellules
adjacentes ? Car j'ajoute des lignes en-dessous de la dernière ligne remplie
de valeurs, les cellules sont vides.
Merci de votre réponse
Jacmic
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
MichDenis
Recopie vers le bas, les formules de A1:G1 jusqu'au bas de la liste
Sub test() With worksheets("Feuil1") .Range("A1:G" & .Range("A65536").End(xlUp).Row).FillDown End With End Sub
"Jacmic100" a écrit dans le message de news:
Bonjour,
Question toute simple : Comment insérer automatiquement des données en fonction des cellules adjacentes ? Car j'ajoute des lignes en-dessous de la dernière ligne remplie de valeurs, les cellules sont vides. Merci de votre réponse Jacmic
Recopie vers le bas, les formules de A1:G1
jusqu'au bas de la liste
Sub test()
With worksheets("Feuil1")
.Range("A1:G" & .Range("A65536").End(xlUp).Row).FillDown
End With
End Sub
"Jacmic100" <Jacmic100@discussions.microsoft.com> a écrit dans le message de news:
F3986097-2E30-4489-8AC3-12964132C62E@microsoft.com...
Bonjour,
Question toute simple :
Comment insérer automatiquement des données en fonction des cellules
adjacentes ? Car j'ajoute des lignes en-dessous de la dernière ligne remplie
de valeurs, les cellules sont vides.
Merci de votre réponse
Jacmic
Recopie vers le bas, les formules de A1:G1 jusqu'au bas de la liste
Sub test() With worksheets("Feuil1") .Range("A1:G" & .Range("A65536").End(xlUp).Row).FillDown End With End Sub
"Jacmic100" a écrit dans le message de news:
Bonjour,
Question toute simple : Comment insérer automatiquement des données en fonction des cellules adjacentes ? Car j'ajoute des lignes en-dessous de la dernière ligne remplie de valeurs, les cellules sont vides. Merci de votre réponse Jacmic
MichDenis
Message : Erreur d'aiguillage !
"MichDenis" a écrit dans le message de news:
Recopie vers le bas, les formules de A1:G1 jusqu'au bas de la liste
Sub test() With worksheets("Feuil1") .Range("A1:G" & .Range("A65536").End(xlUp).Row).FillDown End With End Sub
"Jacmic100" a écrit dans le message de news:
Bonjour,
Question toute simple : Comment insérer automatiquement des données en fonction des cellules adjacentes ? Car j'ajoute des lignes en-dessous de la dernière ligne remplie de valeurs, les cellules sont vides. Merci de votre réponse Jacmic
Message : Erreur d'aiguillage !
"MichDenis" <michdenis@hotmail.com> a écrit dans le message de news:
e651XWcVHHA.3568@TK2MSFTNGP06.phx.gbl...
Recopie vers le bas, les formules de A1:G1
jusqu'au bas de la liste
Sub test()
With worksheets("Feuil1")
.Range("A1:G" & .Range("A65536").End(xlUp).Row).FillDown
End With
End Sub
"Jacmic100" <Jacmic100@discussions.microsoft.com> a écrit dans le message de news:
F3986097-2E30-4489-8AC3-12964132C62E@microsoft.com...
Bonjour,
Question toute simple :
Comment insérer automatiquement des données en fonction des cellules
adjacentes ? Car j'ajoute des lignes en-dessous de la dernière ligne remplie
de valeurs, les cellules sont vides.
Merci de votre réponse
Jacmic
Recopie vers le bas, les formules de A1:G1 jusqu'au bas de la liste
Sub test() With worksheets("Feuil1") .Range("A1:G" & .Range("A65536").End(xlUp).Row).FillDown End With End Sub
"Jacmic100" a écrit dans le message de news:
Bonjour,
Question toute simple : Comment insérer automatiquement des données en fonction des cellules adjacentes ? Car j'ajoute des lignes en-dessous de la dernière ligne remplie de valeurs, les cellules sont vides. Merci de votre réponse Jacmic
