ich kenne mich ein wenig mit VB aus, habe aber noch keine Makros geschrieben.
Ich möchte im Sheet Blatt_2 die Zeile 3 nach dem Wert aus dem Sheet Diagramm Zelle C4 durchsuchen.
Wenn der Wert in der Zeile 3 gefunden wurde, sollen die zugehörigen Zellen 4-26 aus Blatt_2 ins Sheet Diagramm Zellen C5:C27 kopiert werden.
Hoffentlich könnt ihr mir helfen.
Vielen Dank schonmal.
Ich möchte im Sheet Blatt_2 die Zeile 3 nach dem Wert aus dem
Sheet Diagramm Zelle C4 durchsuchen.
Wenn der Wert in der Zeile 3 gefunden wurde, sollen die
zugehörigen Zellen 4-26 aus Blatt_2 ins Sheet Diagramm Zellen
C5:C27 kopiert werden.
Hallo Wbg,
Sub tt()
Dim Zelle As Range
Set Zelle = Worksheets(„Blatt_2“).Rows(3).Find(Worksheets(„Diagramm“).Range(„C4“).Value)
If Not Zelle Is Nothing Then Zelle.Offset(1, 0).Resize(23, 1).Copy Worksheets(„Diagramm“).Range(„C5“)
Set Zelle = Nothing
End Sub
auch ich kenne mich ein wenig mit VB aus und habe sogar schon Makros geschrieben
In diesem Fall würde es aber auch ohne vba gehen. Probiere ´mal sverweis bzw. wverweis dafür! ( Anleitung in der Hilfe Deiner Excel-Version )