debug dans une commande de copie

[Titi_Malembourg]

Je n'arrive pas à trouver la faute dans la commande de copie suivante :

Sheets('feuill1').Range(ActiveCell.Offset(0, 4).Value & ':' & ActiveCell.Offset(0, 4).Value).Offset(3,2).Copy _Destination:=Sheets('feuill' & Numerofeuille)

ActiveCell.Offset(0, 4).Value et ActiveCell.Offset(0, 4).Value contiennent des addresses.

Trouvez vous l'erreur ?
Si oui, je vous remercie d'avance

 

[2passage]

Bonjour,

déja, je crois que tu as un L en trop à la fin des noms de feuille (enfin si c'est comme chez moi) :

Sheets('feuill' & Numerofeuille)

je regarde pour le reste

ActiveCell.Offset(0, 4).Value et ActiveCell.Offset(0, 4).Value

Ca serait pas un peu 2 fois la meme adresse ? c'est le but ?


A+

Message édité par: 2passage, à: 27/06/2005 17:05

Message édité par: 2passage, à: 27/06/2005 17:08

 

[michel_m]

bonjour,

ActiveCell.Offset(0, 4).Value et ActiveCell.Offset(0, 4).Value contiennent des addresses

OK mais tu as 2 fois la même donnée: activecell.offset(0,4)

donc le deuxième terme ne devrait pas être offset(0,4)

Le lundi, c'est toujours dur

Michel at work mais c'est l'heure de partir Ouf!

 

[Titi_Malembourg]

Pour le nom des feuilles, j'ai mis un nom fictif.
En effet, ma formule de base est :
Sheets('Matrice image').Range(ActiveCell.Offset(0, 4).Value & ':' & ActiveCell.Offset(0, 5).Value). _
Offset(-NombrePixFond, -NombrePixFond).Copy _
Destination:=Sheets('Point ' & NumeroTache)
C'était pour mieux comprendre.
Mais j'ai vérifié les noms tout de meme Ca aurait été tout moi de me planter dessus :whistle:

Message édité par: Titi_Malembourg, à: 27/06/2005 17:11

 

[Titi_Malembourg]

Merci Michel J'avais pas vu. Mais ca devrait quand meme marcher non ?
Enfin, j'ai remplacé le '4' par le bon nombre mais c'est toujours la louze

 

[2passage]

Re,

Je me demande aussi si tu ne devrais pas définir un range de destination : là tu indiques juste une feuille. As tu testé avec un Destination:=Sheets('Point ' & NumeroTache).range('A1')

A+

 

[2passage]

re

pis d'abord, c'est quoi ton erreur , au fait

++

 

[Titi_Malembourg]

Merci 2passage, il fallait en fait mettre un range de destination. ouf
Ca roule ! Merci à vous deux :kiss:

 

[michel_m]

Re,

enlève la mise à ligne entre copy et destination: il me semble qu'il n'y a pas d'espace: tu aurais
copydestination

j'y vas peut être adtaleur
Michel