Copier coller speciale sur VBA [Résolu]

kikou - Dernière réponse le 7 janv. 2009 à 19:56

Bonjour,
Je souhaite faire un collage speciale seulement des valeurs d'une feuille excel à une autre:
Ce code fonctionne tres bien pour copier coller:
Sub kopieren_KlickenSieAuf()
Sheets("OV").Select
Range("A1:AB100").Select
Selection.Copy
Sheets("Tabelle2").Select
Range("A1:AB100").Select
ActiveSheet.Paste
End Sub
Et voici le code que j'ai teste pour un collage spéciale après une visite sur plusieurs forums, mais cela ne fonctionne. pourriez -vous me donner un coup de main?
Sub kopieren_KlickenSieAuf()
Sheets("OV").Select
Range("A1:AB100").Select
Selection.PasteSpecial
Sheets("Tabelle2").Select
Range("A1:AB100").Select
ActiveSheet.Paste
Paste:=xlValues
End Sub
Je vous remercie d'Avance.
bonne soirée.
kikou

Copier coller speciale sur VBA »

Suggestions

Copier coller speciale sur VBA
[EXCEL VBA] copier coller spécial » Forum
Vba excel copier lignes avec condition (Résolu) » Forum
Copier/coller fichier excel VBA (Résolu) » Forum
Excel VBA vulgaire copier/coller (Résolu) » Forum
Excel vba copier des valeurs (Résolu) » Forum

Plus

Réponse

Lupin.A 972Messages postés 15 mars 2006Date d'inscription 22 avril 2008 à 19:23

Bonjour,

Ça devrait plutôt ressembler à :

Option Explicit

Sub kopieren_KlickenSieAuf()

    Sheets("OV").Select
    Range("A1:AB100").Select
    Selection.Copy

    Sheets("Tabelle2").Select
    Range("A1").Select
    Selection.PasteSpecial Paste:=xlPasteValues

End Sub
'

en pratique, la copie ne se fait pas sur une plage mais sur une cellule :

ces 2 lignes :
Range("A1:AB100").Select
ActiveSheet.Paste

devrait se lire :
Range("A1").Select
ActiveSheet.Paste

dans votre exemple, il fauit utiliser :
Selection.PasteSpecial Paste:=xlPasteValues

Lupin

Ajouter un commentaire

Réponse

kikou 23 avril 2008 à 07:48

Merci beaucoup, c'est nickel, ca fonctionne à merveille!
bonne journée
Kikou

Ajouter un commentaire

Réponse

Triskel 7 janv. 2009 à 19:56

Merci beaucoup! j'ai eu beaucoup de mal à trouver ce code VBA.

Ajouter un commentaire

Répondre au sujet

Posez votre question

Dossier à la une

Passage au tout numérique : quel coût pour les particuliers ?

Passage au tout numérique : quel coût pour les particuliers ?

Combien cela coûte-t-il au total ? Quelles aides apportent l'état et les acteurs du marché pour alléger cette charge non choisie ? Tous les détails sur Commentçamarche.net.

Copier coller speciale sur VBA [Résolu]

Copier coller speciale sur VBA »

Passage au tout numérique : quel coût pour les particuliers ?