OpenOffice.info

Sub plus_100_Trinken
	With thisComponent.sheets().getbyname("Tabelle1")
		For i = 4 To 20 Step 2 
			.getCellByPosition(8,i).value = 0
			.getCellByPosition(10,i).value = 0
		Next i
		.getCellByPosition(10,23).value = 0
	End With
End Sub

[quote]Gibt es dafür deinen Macrocode?
[/quote]
z.B.:
[code]Sub plus_100_Trinken
With thisComponent.sheets().getbyname("Tabelle1")
For i = 4 To 20 Step 2
.getCellByPosition(8,i).value = 0
.getCellByPosition(10,i).value = 0
Next i
.getCellByPosition(10,23).value = 0
End With
End Sub
[/code]

[quote]Den den, den ich angefangen abe scheint falsch zu sein:/
[/quote]
naja, die Semikolons sind falsch (das gibt es nur in Tabellenformeln), ich bin aber überfragt wie man direkt mehrere Zellen gleichzeitig per Namen anspricht, obwohl das eigentlich eine simple Frage ist.


Gruß
Stephan