OpenOffice.info

Hallo in die Runde,

habe es nun mit
While (Len(ThisComponent.Sheets.getByName(strSpeisen).getCellByPosition(1, maxZeilen))) > 0

probiert. Nun kommt aber der Fehler Basic-Laufzeitfehler 380 - Falscher Wert für Eigenschaft.

Gruss
Sigi


Ich habe meinen Fehler gefunden. Ein Value hat gefehlt ...

Danke - probiere ich am WE aus - dann hab ich wieder den PC.

Gruß
Sigi

Hallo in die Runde,

ich habe folgenden Code

Sub neuerSpeiseplan()

Dim strSpeisen As String
Dim strSpeiseplan As String
Dim strZutaten As String
Dim strEinkaufliste As String
Dim maxZeilen As Integer
Dim strVergangeSpeisen As String





strSpeisen = "Liste Gerichte"
strSpeiseplan ...