Autres Copier/ Coller plage de données dans une autre cellule d'un même onglet

  • Initiateur de la discussion Initiateur de la discussion fenec
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

fenec

XLDnaute Impliqué
Bonjour le forum

Je reviens vers vous pour un nouveau problème, je vous explique ma problématique:

Je souhaiterais copier la plage de cellule "B4:V10" puis la coller dans la cellule "AC45 mais le problème que je rencontre c'est que mes cellules à copier sont fusionnées et que je ne peux pas modifier la structure du fichier d'où mon problème.

Je sais que les cellules fusionnées est un problème mais vous avez déjà réussi à m'aider par rapport à cela,

Job75 si tu lis ce post je pense qu'il est pour toi et d'avance merci si tu veux bien m'éclairer comme d'habitude par ton savoir.

En espérant avoir été clair, j'ai hâte de vous lire

Je vous joint un fichier

Cordialement,

Fenec.
 

Pièces jointes

Solution
Bonjour fenec, sylvanu,

Le copier-coller fonctionne sans problème.

Il suffit de sélectionner la plage B4:AA11, copier, sélectionner AC45:AF46, coller.

En VBA Range("B4:V10").Copy Range("AC45") ne fonctionne pas, utilisez :
VB:
ange("B4:" & Range("V10").MergeArea.Address).Copy Range("AC45")

Dites donc fenec mon post du 9 juin est resté sans réponse :

https://excel-downloads.com/threads...-critere-en-vba.20086157/page-2#post-20691592

A+
Bonjour Fenec,
Si j'ai bien compris, vous pouvez essayer :
VB:
=INDEX($B$4:$AA$11;LIGNE()-44;COLONNE()-28)
A chaque modif dans le 1er tableau les valeurs seront recopiées dans le second.
En passant par index, on s'affranchit du problème des cellules fusionnées.
 

Pièces jointes

Bonjour fenec, sylvanu,

Le copier-coller fonctionne sans problème.

Il suffit de sélectionner la plage B4:AA11, copier, sélectionner AC45:AF46, coller.

En VBA Range("B4:V10").Copy Range("AC45") ne fonctionne pas, utilisez :
VB:
ange("B4:" & Range("V10").MergeArea.Address).Copy Range("AC45")

Dites donc fenec mon post du 9 juin est resté sans réponse :

https://excel-downloads.com/threads...-critere-en-vba.20086157/page-2#post-20691592

A+
 
Allez pour finir en ne copiant que les valeurs :
VB:
With Range("B4:V10")
    Range("AC45").Resize(.Rows.Count, .Columns.Count) = .Value
End With
Sachez que j'utilise Excel depuis plus de 30 ans et que les cellules fusionnées ne m'ont jamais gêné.

L'idée qu'il ne faut pas les utiliser est un vieux saucisson qui traîne sur les forums.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
10
Affichages
373
Retour