Microsoft Excel

Herbers Excel/VBA-Archiv

Ausfüllen

Betrifft: Ausfüllen von: Erich
Geschrieben am: 25.08.2004 09:54:07

Hallo

Wie muß ich die Formel umändern, wenn nicht in Spalten sondern in Zeilen
arbeiten möchte.

If Target.Row > 2 Then Exit Sub
Application.EnableEvents = False
On Error GoTo Errorhandler
If Cells(1, Target.Column) = "Sa" And Cells(2, Target.Column) = "31" Then Cells(3, Target.Column) = "9,92"


Für eine Antwort wäre ich dankbar

Gruss Erich

  


Betrifft: AW: Ausfüllen von: Andreas Walter
Geschrieben am: 25.08.2004 12:01:47


Tja

Ein blinder Versuch
If Target.Column > 2 Then Exit Sub
Application.EnableEvents = False
On Error GoTo Errorhandler
If Cells(Target.Row,1) = "Sa" And Cells(Target.Row,2) = "31" Then Cells(Target.Row,3) = "9,92"

Sagen wir es so
Cells(x,y) bedeutet auf der "x"ten Zeile und der "y"ten Spalte zugreifen
Daher
Cells(Target.Row,2)
bedeutet in der 2. Spalte von der Zeile "Target.Row"
Hilft das es zu verstehen?


  


Betrifft: AW: Ausfüllen von: Erich
Geschrieben am: 25.08.2004 12:21:06

Hallo Andreas

Erstmal vielen Dank für die Antwort.

Das mit Target.Column u. Target.Row habe ich jetzt verstanden.
Alles andere kann ich mir jetzt aufbauen.

Nochmals vielen Dank

Gruss Erich