PasteSpecial 2010 vs 2003

phlaurent55

Nous a quittés en 2020

Repose en paix

• 20 Octobre 2014

• #2

Re : PasteSpecial 2010 vs 2003

Bonjour Jidé,

question qui peut paraître idiote mais en voyant ton code,

y avait-il eu copie de cellules avant de coller ?
y aurait-il des cellules fusionnées qui perturbent la procédure ?


à+
Philippe

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 20 Octobre 2014

• #3

Re : PasteSpecial 2010 vs 2003

Bonjour à tous

S'il s'agit de copier en valeurs seules
Ces deux macfos doievent fonctionner quelque soit la version d'Excel

Code:

Sub a()
Sheets("Départs").Range("A1").Copy
Sheets("Départs").Range("D6").PasteSpecial xlValues
End Sub

Code:

Sub b()
With Sheets("Départs")
.Range("D6") = .Range("A1")
End With
End Sub

Lamacro a plantera si présence cellules fusionnées comme l'a mentionné phlaurent55
Dans ce cas la macro b devrait ne pas planter 😉

 

Dernière édition: 20 Octobre 2014

Vote positif 0 Vote négatif

Jidé

XLDnaute Nouveau

• 20 Octobre 2014

• #4

Re : PasteSpecial 2010 vs 2003

Bonjour Philippe,

Merci pour la réponse.
Oui le code pour une autre feuille active ("Groupage") se termine par banalement par :

Range("A1:C48").Copy

Soit les quatre lignes successives :

Range("A1:C48").Copy
Sheets("Départs").Select
Range("D6").PasteSpecial xlPasteValues
Application.CutCopyMode = False

Cordialement,

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 20 Octobre 2014

• #5

Re : PasteSpecial 2010 vs 2003

Re


Jidé:
Tu ne me salues pas ?
Pourtant je me suis brossé les dents après mon dernier repas
A moins que tu ais zappé mon précédent message

Ce qui est bien dommage, car il y avait du VBA dedans qui pourrait t'être utile...

Au cas où, je remets un bout de code modifié qui ne plante pas 😉

VB:

Sub c()
Sheets("Départs").Range("D6").Resize(48, 3).Value = Sheets(1).Range("A1:C48").Value
'remplacer Sheets(1) par le nom de la feuille source
End Sub

 

Dernière édition: 20 Octobre 2014

Vote positif 0 Vote négatif

Jidé

XLDnaute Nouveau

• 20 Octobre 2014

• #6

Re : PasteSpecial 2010 vs 2003

Bonjour Staple,

Désolé, mais je n'avais lu que la première réponse, celle de Philippe.
Merci, je vais essayer ton code, et je te ferai part du résultat.

Cordialement,

 

Vote positif 0 Vote négatif

Jidé

XLDnaute Nouveau

• 21 Octobre 2014

• #7

Re : PasteSpecial 2010 vs 2003

Bonjour,

Merci à vous deux.
Le second code de Staple fonctionne parfaitement.
En outre je le comprends, et je comprends pourquoi il fonctionne !
En revanche j'ai essayé le code engendré par l'éditeur de macro xl2003.
Et à ma grande surprise il fonctionne sous xl 2010, et pas sous xl2003 !
J'en déduis, qu'il s'agit d'un pb propre à xl2003, et pas un pb consécutif à la conversion xl2010 vers xl2003.

Cordialement,

Jidé

 

Vote positif 0 Vote négatif