Das ist irgendwie albern, aber ich stecke eine Weile in dieser einfachen Aussage fest:

<code>    Dim range1 as Range
    Dim mysheet as String
    Dim myrange as String

    mysheet = "Sheet1"
    range = "A1:A10"

range1 = Worksheets(mysheet).Range(myrange)
</code>

Ich habe alle Lösungen getestet, die ich zum Beispiel im Internet gefunden habediese, diese unddiese, aber nichts.

Die ganze Zeit gibt es mir Fehler: 1004 "Fehler von der Anwendung definiert" oder "Objektvariable oder mit nicht gesetzt".

Ich habe Folgendes versucht:

<code>range1 = ThisWorkbook.Worksheets(mysheet).Range(myrange)

range1 = ActiveWorkbook.Worksheets(mysheet).Range(myrange)

range1 = Sheets(mysheet).Range(myrange) (and the combinations above)

range1 = Worksheets(mysheet).Range(Cells(1,1), Cells(1,10)) (and the combinations with This/Active workbook)
</code>

und

<code>with This/ActiveWorkbook
range1 = .Worksheets(mysheet).Range(myrange)
end with
</code>

Keiner hat gearbeitet.

Das ist eine WIRKLICH dumme Sache, aber ich stecke jetzt schon eine Weile fest: s

Kann mir jemand helfen?

Wirklich vielen Dank im Voraus.

Freundliche Grüße,