Laufzeitfehler 1004 / Wechsel Tabellenblatt
18.10.2017 10:37:11
Alex
ich habe folgenden Code:
Option Explicit
Sub Import()
Dim pfad_zeile_oben As Integer
Dim pfad_spalte As Integer
Dim nummer as Integer
Dim wkb As Workbook
Dim thiswkb As Workbook
Set thiswkb = ThisWorkbook
pfad_zeile_oben = 2
pfad_spalte = 3
thiswkb.Sheets("Input").Cells(pfad_zeile_oben, pfad_spalte).Select
Selection.CurrentRegion.Rows.Count
End Sub
Befinde ich mich im Blatt "Input", so läuft das Makro problemlos durch.
Befinde ich mich im Blatt "Input_2", so wird in der vorvorletzten Zeile (thiswkb.Sheets("Input").Cells(pfad_zeile_oben, pfad_spalte).Select) eine Fehlermeldung (Laufzeitfehler 1004: Die Select-Methode des Range-Objektes konnte nicht ausgeführt werden) ausgegeben. Anscheinend hat Excel ein Problem damit, das Arbeitsblatt zu wechseln.
Was mache ich hier falsch?
Vielen Dank und viele Grüße
Alex
PS: Ich habe eine Lösung des Problems (einfach Sheets("Input").Activate. Es wundert mich aber, warum obige Methode nicht funktioniert.