Coller des valeurs

Résolu/Fermé

Ben - Modifié par pijaku le 18/12/2013 à 15:54
f894009 Messages postés 17241 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 février 2025 - 18 déc. 2013 à 18:58

Bonjour,
Voici mon code lors de la compilation, j'obtient l'erreur d'execution 1004 à la derniere ligne.

 'Copier la date
        Feuil1.Activate
        Range("K3").Copy
        'Coller la date
        Feuil2.Activate
        Feuil2.Select
        Range("A4").Select
        ActiveCell.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False

A voir également:

Coller des valeurs
Copier coller pdf - Guide
Historique copier-coller android - Guide
Copier-coller - Accueil - Informatique
Symbole clavier copier coller - Guide
Dessin sms copier coller zizi ✓ - Forum Word

1 réponse

Réponse 1 / 1

f894009 Messages postés 17241 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 février 2025 1 713
18 déc. 2013 à 18:58

Bonjour,

plus simple sans les activate et sélect

Sub test()
        Feuil1.Range("K3").Copy Feuil2.Range("A4")
        
        'ou
        
        Worksheets("feuil1").Range("K3").Copy Worksheets("feuil2").Range("A4")
        
End Sub

Discussions similaires

Arobase (@)

Première connexion

comment faire une arobase

dessin au clavier cannabis

Comment retrouver le presse papier sur iPhone ?