Problème copier/coller VBA (erreur 1004..)
Fermé
jfblaquiere
Messages postés
3
Date d'inscription
mercredi 31 juillet 2013
Statut
Membre
Dernière intervention
31 juillet 2013
-
31 juil. 2013 à 17:59
Thorak83 Messages postés 1051 Date d'inscription jeudi 20 juin 2013 Statut Membre Dernière intervention 22 décembre 2017 - 1 août 2013 à 07:44
Thorak83 Messages postés 1051 Date d'inscription jeudi 20 juin 2013 Statut Membre Dernière intervention 22 décembre 2017 - 1 août 2013 à 07:44
A voir également:
- Impossible de coller les données de votre organisation ici.
- Effacer les données de navigation - Guide
- Comment sauvegarder toutes les données de mon téléphone - Guide
- Reinstaller windows sans perte de données - Guide
- Service de diffusion de données - Forum TNT / Satellite / Réception
- Célia doit nettoyer le tableau ci-dessous pour l’ajouter à la base de données de son entreprise. les données sont ensuite traitées automatiquement. quelles sont les 4 cellules qui risquent de poser problème ? ✓ - Forum Excel
1 réponse
Thorak83
Messages postés
1051
Date d'inscription
jeudi 20 juin 2013
Statut
Membre
Dernière intervention
22 décembre 2017
156
Modifié par Thorak83 le 31/07/2013 à 18:29
Modifié par Thorak83 le 31/07/2013 à 18:29
Bonjour,
Ton code fonctionne chez moi sur Excel 2010. Mais je le simplifierais un peu comme cela:
C'est optimisable encore plus mais bon.
Le classeur "7- Xtime - Macros" ou vous collez est vide ?
Cordialement
Ton code fonctionne chez moi sur Excel 2010. Mais je le simplifierais un peu comme cela:
Workbooks("_Xtime - Toyota").Activate
Sheets("Consumer_Website_Statistics_Lat").Activate
Application.CutCopyMode = False
Range("A1:S4060").Copy
Workbooks("7- Xtime - Macros").Activate
Sheets("_Toyota").Activate
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
C'est optimisable encore plus mais bon.
Le classeur "7- Xtime - Macros" ou vous collez est vide ?
Cordialement
31 juil. 2013 à 18:48
Non, le classeur "7- Xtime - Macros" n'est pas vide, il y a déjà du contenu.
J'ai essayé tes lignes de codes et voici le message qu'on m'affiche quand j'applique le PasteSpecial :
------
Erreur d'exécution '1004'
Impossible de coller les informations car les zones de Copier et de Collage sont de forme et de taille différentes. Essayer l'une des opérations suivantes :
- Cliquez sur une seule cellule et puis coller ;
- Sélectionnez une forme rectangulaire de taille et de forme identiques aux informations copier et puis coller.
--------
Même si la macro est censée coller seulement sur la cellule A1. Si je change le Range ("A1") pour un range identique (Range("A1:S4060")) .. ça ne fonctionne pas plus.
On me dit :
-----
Erreur d'exécution '1004'
Cette opération requiert que les les cellules fusionnées soient de taille identique.
-----
Merci de ton aide
31 juil. 2013 à 19:03
31 juil. 2013 à 19:07
Donc, quand je le fais manuellement, je dis "oui" à "voulez-vous remplacer le contenu des cellules de destination?"... oui.
J'aimerais l'automatiser avec une macro et que je n'aie pas besoin de cliquer "oui".
Est-ce possible?
1 août 2013 à 07:44