Copier une feuille
Bonjour,
Voilà mon soucis :
j'ai réussi à copier une feuille sur une autre et que quand je rajoute une ligne sur la Feuil1 ça la rajoute sur la Feuil2,
mais le soucis c'est que ça enlève tout ce qui est après la colonne E alors que j'ai des données.
Voir fichier joint.
Cdlt
Bonjour le forum,
Private Sub Worksheet_Activate()
dl = Sheets("Feuil1").Cells(Rows.Count, 1).End(xlUp).Row
Cells.ClearContents
Cells.ClearFormats
Sheets("Feuil1").Range("A5:Z" & dl).Copy Destination:=Range("A5")
Columns("A:Z").AutoFit
End Sub
mbbp
Bonjour,
Cells.ClearContents efface les formules de la totalité de la feuille.
Pour effacer uniquement les colonnes A:E, il faut utiliser Columns("A:E").Clear
Private Sub Worksheet_Activate()
Dim dl As Long
Application.ScreenUpdating = False
With Worksheets("Feuil1")
dl = .Cells(Rows.Count, 1).End(xlUp).Row
Columns("A:E").Clear
.Range("A5:E" & dl).Copy Destination:=Range("A5")
End With
End SubA+
Bonjour frangy,
ça fonctionne, mais la ligne s'ajoute bien mais je voudrais que la ligne continu sur tout le long et non que pour les colonnes A à E donc de F à BH que la ligne reste vide.
Cdlt.
Re,
Mattsly a écrit :mais le soucis c'est que ça enlève tout ce qui est après la colonne E alors que j'ai des données.
Cdlt
La modification du code proposée "post 2" semble répondre à la question ?
mbbp
Désolé, je n'ai pas compris
Peux-tu joindre un classeur exemple avec les données à copier en feuille 1 et le résultat attendu en feuille 2 ?
A+
Bonjour,
Voici le classeur, sur la feuille 2 il faut qu'après la colonne E, il m'insère aussi la ligne mais vide par contre.
Cdlt.
Une solution à tester.
J'ai remplacé la plage de données en feuille 2 par un tableau.
A+
Bonjour,
Toujours le même soucis.
Cdlt.
Peux-tu développer un peu ?
Avec la dernière modification, tu obtiens bien une nouvelle ligne vide après la colonne E lorsque tu ajoutes une ligne en feuille 1, non ?
A+
Bonjour,
Oui, ça fonctionne mais le soucis c'est que quand je rajoute la ligne en feuille 1 en plein milieu, en feuille 2 la ligne se rajoute bien jusque E mais à partir de F la ligne se place en dernière position.
Cdlt.
mbbp a écrit :Re,
Mattsly a écrit :mais le soucis c'est que ça enlève tout ce qui est après la colonne E alors que j'ai des données.
Cdlt
La modification du code proposée "post 2" semble répondre à la question ?
mbbp
Bonjour mbbp, c'est ça que je veux mais juste il ne faudrait pas que ça copie de la colonne F à BH, les colonnes restent vide.
Cdlt.