Durch den Einsatz von Objektvariablen machen Sie ihren Code nicht nur übersichtlicher und benutzerfreundlicher, sondern auch programmtechnisch wirksamer, denn Objektvariable können offenbar ganze Excelobjekte aufnehmen. Erinnern Sie sich noch an den langen unhandlichen Ausdruck wie ActiveWorkbook.Worksheets("Tabelle1").Range("B10").Value, der letztlich nur eine bestimmte Zelle beschrieb? Das kann über eine Objektvariable wesentlich verkürzt werden, indem Sie erklären, dass solch eine Variable einfach diesen Ausdruck aufnimmt, zum Beispiel:

Sub bsp1()
Dim Quelle As Object
Dim Ziel As Object
Set Quelle = ActiveWorkbook. _
Worksheets("Tabelle1"). _
Range("B10")
Set Ziel = ActiveWorkbook. _
Worksheets("Tabelle3"). _
Range("C15")
Quelle = InputBox _
("Geben Sie irgendetwas ein!")
Ziel = Quelle 'Toll!
Worksheets("Tabelle3").Activate
End Sub

Rufen Sie bitte Modul Objektvariable das Beispiel bsp1 aus der beigefügten Datei Lösungen Excelobjekte.xlsm (33 kB) auf.