Coller des valeurs

Résolu
Ben -  
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

1 réponse

  1.  f894009
    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

    Problème de restrictions
    SuperAmbi

    5 réponses
    Arobase
    Zezette

    1 réponse
    Copier coller impossible
    coulondou

    43 réponses
    comment faire une arobase
    GLORIA

    1 réponse