Excel SVERWEIS "Objekt Erforderlich" Fehlermeldung
Hier ist eine weitere einer von denen "so einfach ist es zum Verrücktwerden, wenn es nicht funktioniert" - Typ Fragen.
Habe ein makro weiter unten. Es basiert auf einem ActiveX-Kombinationsfeld-was ist mit C3. Wenn der Benutzer eine Auswahl vornimmt, wird das makro soll sich auf die Suche, die Auswahl, die Sie auf einem anderen Arbeitsblatt, identifizieren isbn (Spalte 2), und kehren Sie zu der ursprünglichen Arbeitsblatt zum einfügen in die entsprechende Zelle (C4).
Durchlaufen, wirft er ein "Objekt Erforderlich" Fehler in der isbn.Wählen Sie.
Ich bin sicher, es ist etwas einfach. Immer ist. Kannst du mir die hand?
Private Sub TitleSelection_Change()
Dim lookFor As Range
Dim rng As Range
Dim isbn As Variant
Set lookFor = Sheets("AAP Dashboard").Range("C3")
Set rng = Sheets("Books").Columns("A:I")
isbn = Application.VLookup(lookFor, rng, 2)
Application.ScreenUpdating = False
isbn.Select
Selection.Copy
Sheets("AAP Dashboard").Range("C4").Select
Selection.Copy
ActiveSheet.Paste
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub
vlookup
gibt einen Wert zurück, nicht eine Reihe. Sie können nichtselect
Ihreisbn
. VersuchenSheets("AAP Dashboard").Range("C4").Value = isbn
Du musst angemeldet sein, um einen Kommentar abzugeben.
Können Sie nicht wählen Sie isbn denn es ist die Variante-Objekt ist, wird nicht Mitglied.
Versuchen:
Ich denke, Sie sind fehlt ein Objekt zwischen Anwendung und SVERWEIS hinzufügen "WorksheetFunction". Beachten Sie auch, dass SVERWEIS liefert den Wert, die es findet, in der Spalte 2, so dass keine Notwendigkeit zu kopieren und einzufügen. Schließlich beachten Sie, dass der SVERWEIS das erste argument ist ein Wert nicht ein range-Objekt, also änderte ich lookFor zu Variante
Können Sie leicht ändern Sie Ihren code zu bekommen gewünschten Ergebnis:
Btw, versuchen Sie zu vermeiden
Select
undActive...
Aussagen (wie Sie zu vermeiden)