VBA erreur 9

Résolu/Fermé

tetro14 Messages postés 8 Date d'inscription lundi 8 août 2016 Statut Membre Dernière intervention 15 août 2016 - Modifié par pijaku le 9/08/2016 à 08:18
tetro14 Messages postés 8 Date d'inscription lundi 8 août 2016 Statut Membre Dernière intervention 15 août 2016 - 9 août 2016 à 14:17

Bonjour, je cherche a faire un copier-coller(transposer) avec VBA mais le code d'erreur 9 m’apparaît.en bref, je voudrais que que la colonne A de la feuille Sheets1 soit copier et transposer dans la feuille asset. Voici le code :

Sub Transpose()
'
' Transpose Macro

    Sheets("Sheet1").Select
    Sheets("sheet1").Range("A2").Select
    Sheets("sheet1").Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy
    Sheets("ASSET").Select
    Sheets("ASSET").Range("E5").Select  'ERREUR ICI
    Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=True
End Sub

le code m’apparaît a l'étape de la ligne indiquée
P.S : si je ne spécifie pas les feuille j'ai un code d'erreur 1004
merci a l'avance

A voir également:

VBA erreur 9
Erreur 0x80070643 - Guide
Iptv erreur de lecture - Forum TV & Vidéo
Erreur 1004 vba ✓ - Forum Excel
Vba erreur automation référence future non valide ✓ - Forum Word
Vba range avec variable ✓ - Forum VB / VBA

1 réponse

Réponse 1 / 1

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
9 août 2016 à 08:55

Bonjour,

Pas d'erreur chez moi avec votre code !!!

Sans select, plus simple

Sub Transpose()
'
' Transpose Macro
    With Sheets("sheet1")
        .Range("A2:A" & .Range("A" & Rows.Count).End(xlUp).Row).Copy
    End With
    Sheets("ASSET").Range("E5").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=True
End Sub

tetro14 Messages postés 8 Date d'inscription lundi 8 août 2016 Statut Membre Dernière intervention 15 août 2016
9 août 2016 à 14:17

un grand merci, cela a fonctionné du premier coup

Discussions similaires

VBA erreur 1004

Instagram "Désolé, une erreur s'est produite"

Erreur vidéo inconnue sur le Freebox Player

Free erreur 38 : impossible d'envoyer des SMS

Problème license ps4 et ps4 principale (NP-34958-9)

Discussions similaires

Newsletters