Zeile/Spalte ablesen
09.06.2017 08:10:34
Timo
Ich bin relativ neu in der VBA-Welt und brauche noch etwas Hilfe :)
Ich habe einen Code der mir eine gesuchte Zelle findet:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1")) Is Nothing And Range("A1") "" Then
Columns("B:B").Select
Selection.Find(What:=Range("A1").Text, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Select
End If
End Sub
Ich stehe nun in der Zelle "B12".Und jetzt zur Frage: Kann ich aus meiner ActiveCell die ActiveRow auslesen und speichern? Set ActiveRow.Value = Y-Wert habe ich versucht geht aber nicht :(
Das Ziel ist dann den Y-Wert 12 abzulegen und dann zu nutzen für Cell(Y-Wert,X-Wert)
Ich könnte es mit einer Hilfsspalte lösen und mit Offset den Wert auslesen nur das ist in meinem Fall eine ungünstige Lösung.
Vielen Dank für jegliche Hilfe!