OpenOffice.info

Super, das war genau das was mir noch gefehlt hat. :lol:

DANKE
Andreas

Sub Speichern
	oDoc=thisComponent
	Dim sURL as String
    sURL = "file:///C:/Terminplaner/VCS/" '& sDatumBeginn & " " & sBeschreibung & ".vcs"     
	Dim args1(1) as new com.sun.star.beans.PropertyValue
	args1(0).Name = "FilterName"
	args1(0).Value = "Text - txt - csv (StarCalc)"
	args1(1).Name = "SelectionOnly"
	args1(1).Value = true
	oDoc.storeAsUrl(sURL, args1())	
End Sub

Hallo Andreas,

versuch es mal damit:

[code]
Sub Speichern
oDoc=thisComponent
Dim sURL as String
sURL = "file:///C:/Terminplaner/VCS/" '& sDatumBeginn & " " & sBeschreibung & ".vcs"
Dim args1(1) as new com.sun.star.beans.PropertyValue
args1(0).Name = "FilterName"
args1(0).Value = "Text - txt - csv (StarCalc)"
args1(1).Name = "SelectionOnly"
args1(1).Value = true
oDoc.storeAsUrl(sURL, args1())
End Sub
[/code]

Gruß Christiana

Super, genau das ist das Problem gewesen. :lol:

Nun habe ich nur noch das Problem, dass ich auch noch einen Dialog beim speichern der Tabelle habe. Wie bekomme ich den denn weg ?

Hier der Dialog:
Warnung beim Speichern des Dokuments 2007-08-31-Export.ods : Es wurde nur die aktuelle Tabelle gespeichert.

Hintergrund:
Ich erstelle in der Datei 2007-08-31-Export.ods eine neue Tabelle mit dem Namen "daten" dort füge ich dann Daten ein,
diese speichere ich anschließend im TXT Format mit der Dateiendung VCS ab. Danach lösche ich diese Tabelle dann wieder.

Was auch noch bescheiden ist, ist das die dann verbleibende geöffnete Calc Datei den Namen xy.vcs hat und nicht den alten Dateinamen.

Hier der Link zu der eigentlichen Aufgabenstellung: http://de.openoffice.info/viewtopic.php?f=2&t=13462&start=15

Gruß
Andreas

sub aktuelles_blatt_loeschen
oDoc = thisComponent
loeschblatt = odoc.currentcontroller.activesheet.name 'aktuelles T.-Blatt
odoc.Sheets.removebyname(loeschblatt)
end sub 

Hallo
etwa so:
[code]sub aktuelles_blatt_loeschen
oDoc = thisComponent
loeschblatt = odoc.currentcontroller.activesheet.name 'aktuelles T.-Blatt
odoc.Sheets.removebyname(loeschblatt)
end sub [/code]

Gruß Karo

Hallo zusammen,

gibt es eine Möglichkeit die Dialoge zu unterbinden:
Beispiel beim löschen einer Tabelle ( JA / NEIN ).

In meinem Fall möchte ich per Basic einer Tabelle löschen ohne Nachfrage von OpenOffice zu bekommen
Zum löschen benutze ich
[b]dispatcher.executeDispatch(document, ".uno:Remove", "", 0, Array())[/b]
oder kann man das noch anders machen ?


Das ganze „Projekt“ findet ihr hier
http://de.openoffice.info/viewtopic.php?f=2&t=13462&start=15