Microsoft Excel

Herbers Excel/VBA-Archiv

Inhalt einer bestimmten Zelle übertragen | Herbers Excel-Forum


Betrifft: Inhalt einer bestimmten Zelle übertragen von: Karsten
Geschrieben am: 06.12.2009 18:18:15

Hallo,

mir hat jemand folgendes Beispiel geschrieben:

https://www.herber.de/bbs/user/66396.xls

Ich möchte diesen Code gern anpassen, aber weiß nicht wie. Der in Tabelle2 in C6 stehende Inhalt sollte in "Lehrbericht" C1 angezeigt werden. Kann mir jemand dabei helfen?

Danke

Gruß
Karsten

  

Betrifft: AW: Inhalt einer bestimmten Zelle übertragen von: hary
Geschrieben am: 06.12.2009 18:32:44

Hallo Karsten
soll der Bereich auch so bleiben? dann so:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim actZelle As Range
Set actZelle = Intersect(ActiveCell, Range("A1:C6", Cells(Rows.Count, 1).End(xlUp)))
If Not actZelle Is Nothing Then UebergebeActiveZelle actZelle
End Sub

gruss hary


  

Betrifft: AW: Inhalt einer bestimmten Zelle übertragen von: Karsten
Geschrieben am: 06.12.2009 20:03:59

Hallo Hary,

Danke.

Gruß
Karsten


Beiträge aus den Excel-Beispielen zum Thema "Inhalt einer bestimmten Zelle übertragen"