XL 2013 Aide je ne comprends pas

[filtre69]

Bonjour,
J'ai trouvé une macro qui copie une plage de cellules sur une autre feuille tout fonctionne mais il ne me copie pas le format des cellules.
Je ne trouve pas l'erreur si vous pouvez m'aider à comprendre pourquoi cela ne fonctionne pas.

Merci d'avance de vote aide
Cordialement


Sub RangeCopyHsup()
Range("A12").CurrentRegion.Copy
With Sheets("HSUP").Range("A2").End(xlUp)
.PasteSpecial Paste:=xlPasteFormats
.PasteSpecial Paste:=xlPasteValues
.Application.CutCopyMode = False

End With

End Sub

 

[natorp]

Bonjour Filtre69
Chez moi ça fonctionne, un fichier d'exemple ?
Cordialement, Gérard

 

[filtre69]

Bonjour natrop,
Le voila
Merci de ton aide
Le bouton n'ai pas crée pour l'instant

 

[natorp]

Re,

le problème semble venir du fait que la Mise en Forme Conditionnelle fait référence à la ligne 5 de la feuille "Gestion", or cette ligne n'est pas dans le copier/coller

Cordialement, Gérard

 

[filtre69]

Re,
Merci je vais regarder.

Encore Grand Merci

 

[natorp]

Voilà une approche avec une copie des lignes (cachées) sur la feuille2 et un ajout dans la macro pour la largeur de colonne

Cordialement, Gérard

 

[filtre69]

Grand Merci natrop.
Mais peux-tu expliquer la modification que tu as fait stp que je puisse comprendre.

Merci

Cordialement

 

[natorp]

Re,

J'ai copié les lignes 4 à 7 de la feuille "Gestion" vers la feuille "HSUP" (j'ai masqué les 5 premières)
ensuite j'ai modifié le code de la macro pour qu'elle copie les données sur "HSUP" en A10 (et non plus en A2) et ajouté une ligne de code pour que la macro copie également la bonne largeur de colonne

J'espère avoir été clair, sinon n'hésites pas, cordialement, Gérard

 

[filtre69]

Re,
Merci pour tout
Cordialement