Grundsätzliche Verständnisfrage zu Adressierungen
05.06.2019 11:52:09
El
(ich hoffe das Subject verwirrt nicht). Ich programmiere oft nach dem Versuch und Irrtum Prinzip. Ich bekomme häufig Fehler beim Ansprechen von Cells bzw.Ranges. Ich will nun aber folgendes endlich mal grundsätzlich vestehen:
1.)
Sub Paste3()
Dim rgBereich As Range
Set rgBereich = Tabelle26.Range(Cells(9, 10), Cells(13, 10)) 'Funktioniert
Set rgBereich = ThisWorkbook.Tabelle26.Range(Cells(9, 10), Cells(13, 10)) ' Funktioniert nicht " _
Fehlermeldung ...Objekt unterstützt Eigenschaft oder Methode nicht
End Sub
'Wo ist das Problem bei ThisWorkbook? auch bei ActiveWorkbook geht es nicht
' Wenn ich anstelle von Tabelle26 den Worksheets("Tabellenname") verwende, funktioniert es. Ich verstehe das Prinzip dahinter nicht.
Frage 2.)
Wenn ich eine Range kopiere, muss die Destination immer den gleichen Zeilen und Spaltenbereich haben?
Sub Paste4()
Dim rgBereich As Range
Set rgBereich = Tabelle26.Range(Cells(9, 10), Cells(13, 10))
rgBereich.Copy Destination:=Tabelle26.Range(Cells(9, 11), Cells(13, 11)) 'funktioniert
rgBereich.Copy 'Destination:=Tabelle26.Range(Cells(9, 11)) ' fuktioniert nicht
' Folgendes aber geht
Tabelle26.Cells(9, 11).Select
Selection.Paste
' Auch hier wieder für mich nicht verständlich:
Tabelle26.Range(Cells(9,11)).select ' funktioniert nicht! Warum?
End Sub
Ich habe da jetzt mehrere unterschiedlich Punkte gefragt, aber ich glaube, dass mir da irgendetwas Grundsätzliches unklar ist, das diese Fälle erklärt. Vielen Dank im Voraus