OpenOffice.info

Hallo,
wenn du die Tabelle 18 löschst, rutschen alle nachfolgenden Tabellen eine Nummer herunter. Die frühere 19 ist jetzt die 18 und die frühere 20 ist nun die 19. Jetzt löschst du die (neue) 19 und das Spiel beginnt von vorn.

Hallo mikeleb,
cool. Vielen Dank.
Aber warum ist das so?

For i=26 To 18 Step -1

Hallo,
lösche die Tabellen von "oben nach unten":
[code]For i=26 To 18 Step -1[/code]

sub Tab_loeschen
myDoc = thisComponent
 Anzahl=myDoc.Sheets.count
 For i=18 to 26
     mySheet = myDoc.Sheets(i)
  mydoc.Sheets.removebyName(mysheet.name)
  next i
end sub

Hallo Fachleute,
ich möchte mehrere Arbeitsblätter löschen.
Index 18 bis 26
der nachstehende Code löscht allerdings "nur"
Arbbl. Index nr. 18,20,22,24,26.
Abschließend folgende Fehlermeldung:
"Unzulässiger Wert oder Datentyp.
Index außerhalb des definierten Bereichs."
[code]sub Tab_loeschen
myDoc = thisComponent
Anzahl=myDoc.Sheets.count
For i=18 to 26
mySheet = myDoc.Sheets(i)
mydoc.Sheets.removebyName(mysheet.name)
next i
end sub[/code]
Wär schön, wenn jemand helfen könnte.
Vielen Dank!