Clever-Excel-Forum

Normale Version: Zellinhalt inclusive Hyperlink kopieren
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo Zusammen,

ich verzweifele gerade dabei, per VBA,  Daten inclusive des Hyperlinks von einer Zelle in Tabelle1   in eine Zelle in Tabelle2 zu übertragen.

Mein Ansatz nur für den Wert funktioniert:

TabZiel.Cells(i, 1).Value = Sheets(i_Blatt).Cells(i_Zeile, 1).Value 

Gefunden habe ich folgendes Beispiel

Range("A2").Copy Destination:=Tabelle2.Range("C7")

und dann versucht umzubauen:

Sheets(i_Blatt).Range(Cells(i_Zeile,1).Copy Destination:=TabZiel.Range(Cells(i,1))

Das funktioniert leider nicht.

Kann mir bitte jemand helfen?

Danke und Gruß

Stefan
DA habe ich aber mal lange auf der Leitung gestanden  19

Lösung gefunden:

Sheets(i_Blatt).Cells(i_Zeile, 1).Copy
TabZiel.Select
TabZiel.Cells(i, 1).Select
ActiveSheet.Paste



Makro Aufzeichnung hilft!  Blush