OpenOffice.info

Hallo Balu,

ich meine natürlich speichern.
In Zelle A1 steht der Pfad im Format c:\Dokumente..... .
Dannenhoefer hilft mir leider nicht weiter.

Eigentlich müsste der Code so oder so ähnlich aussehen aber leider funktioniert das nicht.

url=converttourl (ThisComponent.getSheets().getByName( "Test ...

Hallo,

ich komme bei folgendem Problem nicht weiter und wäre dankbar wenn mir jemand helfen könnte.
Ich möchte über ein Makro einen Datensatz exportieren.
Der Exportpfad ist aber immer ein anderer und kann daher nicht im Makro fest hinterlegt werden.

Ich möchte nun das im Makro auf die Zelle A1 im ...

Hallo,

so habs jetzt doch noch selbst hin bekommen.
Danke für den Denkanstoß !!!

sub Datei_exportieren

Dim sPath, fullPath, iVal, iResult As String
Dim r as Integer
Dim oDocument, thisDoc, oSheet, ocell1, oVal, oSrcRange, oDstRange as Object




' Start und Endposition fuer ...

Hallo,

ich bin zu blöd.
Ich habe vorher schon viele Dinge hinbekommen wie autom. E-Mail versenden, Datein versenden, aus und einblenden von Sheets pdf auf Desktop abspeichern usw. aber hier dran scheiter ich.

Ich hatte es jetzt mit diesem Code versucht.

Fehlanzeige

sub Datei_exportieren ...

Hallo,

ich hatte versucht die Bereiche "umzudrehen" damit das Makro erst in der geöffneten Datei arbeitet und dann in der Zieldatei.

Dies habe ich so versucht



thisDoc = thisComponent
oSheet = thisDoc.sheets(0)
oSrcRange = osheet.getCellRangeByPosition(CRBP_L,CRBP_O,CRBP_R,CRBP_U)
oDataArray ...

Hallo,

ich habe mal wieder ein Problem mit einem Makro.
Ich habe mir aus einem Forum schon einmal ein Makro kopiert welches perfekt funktioniert.
Dieses Makro importiert in eine geöffnete Datei Daten aus einer anderen Calc Datei.

Nun möchte ich gerne eine aus der geöffneten Datei Daten in eine ...

Ein Traum 1000 Dank !!!!!!!!!!!!!!!!!!!

Hallo,

ich bin mal wieder am verzweifeln und hoffe auf einen kleinen Tip oder Hilfe.

Ich habe mir ein Makro "zusammen gebastelt" welches auch wunderbar funktioniert.
Das Makro importiert Daten aus einer .xls Datei.

Nun möchte ich gerne eine Fehlermeldung bekommen z.B. "Datei existiert nicht" wenn ...

Hallo Karo,

erst einmal vielen Dank.
Die msgbox gibt den richtigen Bereich aus, allerdings wurde im meinem Makro nicht der Bereich angegeben wenn in einer Zelle eine Wenn Funktion hinterlegt ist mit dem Ergebnis "" also kein Text bzw. Zahl.
Bekommst du das auch hin ?
Das wäre perfekt !

Vielen Dank ...

Hallo,
thisComponent.sheets(2) kenn ich und hab ich ausprobiert aber was genau muss ich in meinem Code verändern.
Habe versucht die Zeile oRanges(0).Sheet = ActiveSheet() in oRanges(0).Sheet = thisComponent.sheets(2)
umzuändern aber dann kommt eine Fehlermeldung.
Ich bin leider noch ganz am Anfang ...

Hallo,

ich benötige bitte Hilfe.
Ich glaube das diese Aufgabe für euch ganz einfach ist, ich verzweifel aber daran.
Ich habe schon ein Makro gefunden welche meine Wünsche fast erfüllt.
Nun soll dieses Makro aber auf das dritte Tabellenblatt angewendet werden, gestartet wird es aus dem ersten.
Und ...

Hallo liebe Open Office Gemeinde,

ich bin seit Wochen verzweifelt mit Hilfe von Google und Co. auf der Suche nach der Lösung für folgendes Problem.
Bisher leider ohne brauchbares Ergebnis und deshalb erhöffe ich mir hier die Lösung meiner Probleme

Ich möchte verschiedene Druckbereiche per Makro ...

Hallo liebe Open Office Gemeinde,

ich bin seit Wochen verzweifelt mit Hilfe von Google und Co. auf der Suche nach der Lösung für folgendes Problem.
Bisher leider ohne brauchbares Ergebnis und deshalb erhöffe ich mir hier die Lösung meiner Probleme :D

Ich möchte verschiedene Druckbereiche per ...

Hallo,

vielen Dank für die Lösungsansätze.
Ich mache es jetzt einfach über Einfügen und Tabelle einfügen.

Viele Grüßr

Hallo paljass,

das Makro habe ich hier bei openoffice.info gefunden und sieht wie folgt aus.

Sub Main
Dim sPath, fullPath, iVal, iResult As String
Dim r as Integer
Dim oDocument, thisDoc, oSheet, ocell1, oVal, oSrcRange, oDstRange as Object

' Start und Endposition fuer CellRangeByPosition ...