Copie de plages non-contigües incluant cellules fusionnées Résolu/Fermé

Question

Bonjour le forum, 

Je souhaite copier une plage de cellules vers un autre endroit de la même feuille.
J'ajoute que la plage à copier contient des cellules fusionnées et d'autres pas.
Enfin, je souhaite faire un coller en valeurs seules.

J'ai fait pas mal d'essais, sans succès, aucune commande ne se satisfait de ce mélange de plages non-contigües et partiellement fusionnées.
Sachant que la destination possède déjà les mêmes fusions de cellules.

Voici un exemple commenté : https://www.cjoint.com/c/LAxtQ5xmzzy

Par avance merci pour votre aide !

Configuration: Windows / Excel 365

cs_Le Pivert · Answer

Bonjour,

il faut d'abord défusionner les cellules. Faire la copie et ensuite fusionner comme ceci:

Sub copier()
Range("F4:F5").UnMerge 'défusionnner
Range("F7:F8").UnMerge
 Worksheets("Feuil1").Range("F4") = Worksheets("Feuil1").Range("C4")
  Worksheets("Feuil1").Range("F7") = Worksheets("Feuil1").Range("C7")
    Range("F4:F5").Merge 'fusionner
    Range("F7:F8").Merge
End Sub
 

Voilà

touroul · Answer

Bonsoir Le Pivert

En effet, tu as absolument raison, ça fonctionne très bien ainsi.
J'avais essayé un nombre incalculable de trucs, mais pas le Merge, bien vu.

Grâce à toi, je gagne 2 secondes par jour, soit 10 min par an, ce qui me permet de les passer avec mes enfants, alors merci beaucoup pour avoir pris le temps de t'intéresser à mon problème.

Je te souhaite une bonne journée et encore merci.

Copie de plages non-contigües incluant cellules fusionnées

2 réponses

Discussions similaires