excel VBA vulgaire copier/coller Résolu/Fermé

Question

Pour comencer merci du temps que vous me consacrerez. Fervant lecteur de vos forum pour la première fois je me résigne a y déposer un post. Aprés des heures de recherches, des tonnes d'imcrompréhension, et des litres de café svp aidez moi.
Mon problême :
Je souhaite réaliser un vulgaire copier coller en vba entre deux feuille excel d'un même classeur. Chose que j'ai déjà réalisé des dizaines de fois dans mon programme. Mes feuilles ne sont ni protéger et n'ont rien de spécial donc pk ca ne marhe pas?? j'en ais rien ca me rend fou lol. Ci joint l'extrait du code tout bête qui marchait d'habitude. Aidez moi svp.......
 
  Sheets("suivi matériel").Select
  Range("designationmateriel:findesignationmateriel").Copy
  Sheets("rapportjournalier").Select
  Range("designationrapport").Select
  ActiveSheet.Paste

Avant de vous lire je sais que les select ralentissent beaucoup mais bon....lol

zavenger · Accepted Answer

Si tes noms de cellules : designationmateriel, findesignationmateriel, designationrapport existent je ne vois pas non plus. 
Et en fait qu'est ce qui ne marche pas exactement.
Tu sais que tu peux aussi faire ta copie avec un 
Sheets("rapportjournalier").Range("designationrapport").Value = Sheets("suivi matériel").Range("designationmateriel").value

ceci eventuellement dans une boucle. Cela evitera les selects

skipparno · Answer

Au secour snif snif

skipparno · Answer

Oui c'est bien le nom de cellule qui sont déjà nommé. 
En fait je veux copier une plage de cellule obtenu suite a un filtre dans un tableau pour  coller les lignes m'interessant sur un autre feuille de synthese d'une autre feuille. donc renvoyer les .value ne peux pas marcher la plage de cellule etant variable celon les filtres.

Le probleme c'est qu'a chaque fois sur ce copier coller là ou j'ai donné le code j'obtient l'erreur "1004" = La méthode Paste de la classe worksheet à echoué sur la ligne "ActiveSheet.Paste". Meme si je passe pas par une macro mais en manuelle, le copier se passe bien mais des que je change de feuille je ne peux pas coller, il perd les infos...

Je me prend le choux lol en tout cas merci pour ta proposition

skipparno · Answer

ba ecoute j'essay rien a perdre...

skipparno · Answer

toujours pareil ma macro beug toujours sur "ActiveSheet.Paste" avec tj la meme erreur 1004 snif snif merci encore por ton aide

skipparno · Answer

bonne idée mais ca  marche toujours pas en revanche quand je lui donne une cellule de la meme feuille que la selection copié là ca marche...Toujours meme probleme je sent que je vais me jeter dans un bol de café.

skipparno · Answer

juste un snif snif de desolation pour remonter dans la liste des sujets

skipparno · Answer

la même... aparemment c'est le fait de passer d'une feuille à l'autre qu'il aime pas alors que d'habitude ca marche, sachant que je procéde exactement comme d'habitude où ca marche sachant que mon fichier fait 10Mega et que c bouré de macro dans tout les sens y aurait t'il pas un lien???

eriiic · Answer

Bonjour,

et avec sheets("machin").activate au lieu de .select ?

eric

skipparno · Answer

Zavenger : j'ai fait une copie de 824ko donc rien par rapport à avant et toujours le même problème snif snif
Eriiiic : Avec le .activate ca marche pas non plus a savoir que la selection de la feuill se fait bien, ca bloque juste au niveau de ActiveSheet.Paste  du code tout bete suivant. 

Je ne comprend rien je deviens fou lol ya un truc qui cloche quand meme...
En tout cas merci de votre aide et de vos suggestion de si bonne heure.


Sheets("suivi matériel").Select 
Range("designationmateriel:findesignationmateriel").Copy 
Sheets("rapportjournalier").Select 
Range("designationrapport").Select 
ActiveSheet.Paste

skipparno · Answer

Zavengr : juste avec ces deux feuilles. En fait c un fichier excel comprenant une vingtaine de feuille. Je met des macro un peu partout d'ou la taille. J'ai deja mis des macro de copier coller de plge de cllules entre des feuilles d'inferente. Mais la entre la feuille ("suivi materiel") et ("rapport jounalier") ca plante a chaque fois. Et comme j'ai dis auparavant , la copie se passe bien , la selectio de la feuille rapport journalier aussi, la selection de la cellule ou je veux coller aussi mais au moment du coller, là c le drame, ca plante et le message erreur 1004 aparait et la ligne active.paste est surligné en jaune. Mais d'habitude avec d'autre feuille ca marche. Je ne vois aucun critere pouvant fire beuguer a part le fait peux etre du nombre de macro dans mon fichier qui est peux etre limité pour les copier coller j en sais rien. Je m'acharne encore un peu...(ca ne fera que deux jours)

PS:désolé pour l'orthographe c'est du a l'émotion..lol

skipparno · Answer

Zavenger :  Merci pour tes recherche je n'était pas tombé sur cette article mais aparemment je rentre dans ce cas de figure de copier coller des données suite à un filtre. Je developpe mes macro avec excel 2007 mais enregistre en compatible 2003 donc je me resigne.... En tout cas je suis ravie de voir que ce probleme ne viens pas de moi.. Me reste plus qu'a trouver une autre solution. 
Je pense faire une copie de mes donnee filtrer dans la premiere feuille pour ensuite ramener via macro ce tableau sans filtre dans ma deuxieme feuille. En esperant que cela marche...

Encore mille merci du teps passé pour moi.
Si je peux t'aider a quoi que se soit n'hesit pas...

skipparno · Answer

pk pa j'essay , rien de tel qu'un point de vue exterieur moi mes neuronnes se grillent tout seul a la vue de mon fichier lol

skipparno · Answer

En fait il y a un probleme sur ma feuille ("rapport journalier") qui doit receptionner les valeurs copier je viens de creer une nouvelle feuille a l'identique et la la macro marche.... ceci restera un mystere pour ma part, il doit y avoir un parametre a la con qui bloque le copier coller de données. me reste plus qu'a modifier mes autre macro lié a cette feuille snif snif que de temps perdu mais encore merci

biroute · Answer

Cela vient peut-être du nom de ta feuille : "rapport journalier" .
Essaye de ne pas mettre d'espace dans le nom.

nabil99 · Answer

http://office.microsoft.com/fr-fr/excel/HA102448971036.aspx

Ghismo · Answer

J'ai déjà eu de nombreuses fois ce problème. Il est souvent dû à la présence de cellules fusionnées quelque part.
En outre, l'utilisation de "PasteSpécial" me semble plus adapté dans ce cas.

pingouin · Answer

j'ai eu le problème et ça s'est résolu en faisant  :

ActiveSheet.Cells(1,1).Select
Selection.PasteSpecial

envahisseur10 · Answer

Bonjour, 

Comme je suis déjà tombé sur ce problème, la solution de contournement est de faire un doEvents après l'appel à la methode Past

Excel VBA vulgaire copier/coller

19 réponses

Discussions similaires