OpenOffice.info

[quote="clag"]Viel Spaß damit[/quote]

...JAAAAHHHH! Habe ich -> so eben getestet! Dafür ein ganz großes Danke!!! Damit wird's natürlich richtig elegant!!!

O.K.! Die Formel ist toll! ...aber verwenden werde ich jetzt Dein Script bzw. Deine Funktion clag!

[quote="clag"]das gemaule :wink: von

paljass hat geschrieben:
... es wird aber Rosanna - T O T O
daraus !?!

und die Tatsache das so ein Formel-Monster anfällig für Fehler ist, besonders wenn die Formel über die Eingabezeile hinausgeht
(ein Zeichen versehentlich gelöscht und schon wird es echt blöd bei der Fehlersuche).[/quote]

...das "gemaule" von... ...lieb herzlich Euer Umgangston :wink: ...der jedoch mit respektvoller Wertschätzung einhergeht: Gefällt mir! Hier bleib ich! :D Ich muss nicht nur schmunzeln, herzhaft lachen trifft es eher!

Ja, stimmt schon, so'ne Monster-Formel ist fehleranfällig. Allerdings sind die Zellen, in der diese Formel ist, gesperrt.

Aber nun sind der paljass und der Skogtroll hochzufrieden!

Danke Dir clag und Allen Anderen, die mir hier geholfen haben!

LG
Skogtroll

Hallo Karolus,

manchmal ist auch der Weg das Ziel ;)
und Skogtroll wollte ja gern etwas formelartig dynamisches da er immer wieder neue "Titel" einfügt.

Oha - was für ein Aufwand

schlicht zwei Durchgänge →Suchen und ersetzen:

[list]1. suche [size=150][color=#FF0000][A-Z]+|-[/color][/size] ersetzen durch [size=150][color=#FF0000]<Leertaste>$0[/color][/size]
[list][x]regulärer Ausdruck
[x]Gross/Kleinschreibung[/list]

2. suche [size=150][color=#FF0000]^<Leertaste>[/color][/size] ersetzen durch nichts[/list]

Ja - `[i]<Leertaste>[/i]` meint die Eingabe eines Leerzeichens an dieser Stelle

Hallo TrueColor,

[quote="TrueColor"][b]Als (1 AND 2) OR 3[/b] [/quote] ist was ich beabsichtigte

das [b]or[/b] habe ich noch nachträglich rein gewürgt um eine weiteren Code zu vermeiden :wink:

Hallo Clag,

nur zum Verständnis:

wie ist [quote="clag"][code]if mDiff(i)>0 and mDiff(i-1)=0 or mid(mytxt,i,1)= "-"then[/code][/quote]
zu lesen?

Als [b](1 AND 2) OR 3[/b] oder als [b]1 AND (2 OR 3)[/b]?

Ich hab da immer meine Schwierigkeiten, da ja Logikoperatoren m.W.n. gleichrangig sind.

Danke!

Function CAPSPACER(mytxt as string)
	iLmax = len(mytxt)
	dim mMyTxt(1 to iLmax)
	dim mLoTxt(1 to iLmax)
	dim mDiff(1 to iLmax)
	for i=1 to len(mytxt)
		mMyTxt(i) = ASC(mid(mytxt,i,1))
		mLoTxt(i) = ASC(mid(lcase(mytxt),i,1))
		mDiff(i) = mLoTxt(i)-mMyTxt(i) 
	next
	for i=ubound(mDiff)-1 to 2 step -1
		if mDiff(i)>0 and mDiff(i-1)=0 or mid(mytxt,i,1)= "-"then
		mytxt = left(mytxt,i-1) & " " & right(mytxt,(len(mytxt)-i+1))
		end if
	next
	if mytxt="0" then mytxt=""
	CAPSPACER=mytxt
End Function

Hallo Skogtroll,

das gemaule :wink: von [quote="paljass"]... es wird aber Rosanna - T O T O
daraus !?! [/quote]
und die Tatsache das so ein Formel-Monster anfällig für Fehler ist, besonders wenn die Formel über die Eingabezeile hinausgeht
(ein Zeichen versehentlich gelöscht und schon wird es echt blöd bei der Fehlersuche).

Aus diesem Gründen habe ich mal eine Funktion [color=#0000FF]CAPSPACER()[/color] erstellt die nur dem ersten Großbuchstaben einer Reihe ein Leerzeichen voranstellt, also Gruppennamen oder Titel in Großbuchstaben werden nicht auseinandergerissen

[code]
Function CAPSPACER(mytxt as string)
iLmax = len(mytxt)
dim mMyTxt(1 to iLmax)
dim mLoTxt(1 to iLmax)
dim mDiff(1 to iLmax)
for i=1 to len(mytxt)
mMyTxt(i) = ASC(mid(mytxt,i,1))
mLoTxt(i) = ASC(mid(lcase(mytxt),i,1))
mDiff(i) = mLoTxt(i)-mMyTxt(i)
next
for i=ubound(mDiff)-1 to 2 step -1
if mDiff(i)>0 and mDiff(i-1)=0 or mid(mytxt,i,1)= "-"then
mytxt = left(mytxt,i-1) & " " & right(mytxt,(len(mytxt)-i+1))
end if
next
if mytxt="0" then mytxt=""
CAPSPACER=mytxt
End Function
[/code]

copiere den obigen Code und füge ihn unter
[color=#008000]Menü - Extras - Makros - Makros Verwalten - OpenOfficeBasic - Standard - Funktionen[/color] dort komplett ein.

Danach kannst du diese wie jede andere Funktion nutzen also [color=#0000FF]CAPSPACER(B4) [/color]

[attachment=0]Capspacer.png[/attachment]

Viel Spaß damit

[quote="WiM"]Bitte achtet auf notwendige Angaben und Pro Thread ein Thema[/quote]

...ja so soll es auch sein und so bleibt es übersichtlich! Manchesmal ergibt sich halt immer das eine aus dem anderen... :D

Das mit meinem JAVA hat sich geklärt: Ich hatte JAVA installiert, aber aus irgend welchen Gründen fehlerhaft -> deinstalliert -> neu installiert -> jetzt wird es automatisch von OO erkannt!!!

-----

Back to the roots: Gemäß meiner Eingangsfrage hat sich mein Problem dank Eurer Hilfe erledigt! Die Formel funktioniert wunderbar!!

Danke Euch Allen nochmals!

LG
Skogtroll

[quote="Skogtroll"]Wie aktiviere ich denn Java für OO?[/quote]
OO erkennt normalerweise, ob JRE installiert ist.

[quote]Ist "JRE" etwas spezielles[?][/quote]
http://de.wikipedia.org/wiki/Java-Laufzeitumgebung

[quote]wo sehe ich denn, dass ich dieses auf meinem Rechner habe?[/quote]
In den inst. Programmen als "Java" oder "Java Runtime Environment". Wenn du nicht aufgeräumt hast, existiert sogar ein Eintrag im Startmenü.

[quote]Und wenn nicht, wo kriege ich das her?[/quote]
von oracle.com oder java.com

[quote]Ich hatte schon seinerzeit via Google gesucht, aber nix gefunden.[/quote]
Wann war denn "seinerzeit"? ;-)
Google listet (bei mir) sowohl mit "JRE" als auch mit "Java Runtime Environment" sofort unzählige Downloadmöglichkeiten auf der ersten Seite auf.

[quote="paljass"]... es wird aber Rosanna - T O T O[/quote]

...ja, da kann man mal sehen, wie gut es läuft!!! :wink: ...kleiner Scherz!!!

Ja! Du hast Recht! ...aber es stört mich in diesem Falle auch nicht! Ich könnte natürlich in der Primärzelle "Toto" anstatt "TOTO" schreiben, dann würde auch "Toto" dabei rauskommen.

Ist aber alles O.K.! Die Leerzeichenin dem Bandnamen stören mich jetzt nicht!

-----

Etwas zum Hintergrund meines Threads: Ihr habt es vielleicht bemerkt -> ich mache Musik und spiele in einer Coverband. Ich arbeite mit einem kleinen Tablet am Mikrofoständer welcher mir mit einer einfachen html-Datei in einem I-Browser die Songlisten, Hinweise zu den Songs (welche Sounds ich schalten muss) und mir PDF-Datein in einem neuen Tab öffnet.
Und dazu brauche ich das html-Format: Alle aufgelisteten Songs sind verlinkt zu PDF-Dateien (wenn ich mal einen Blick auf die Harmonien und/oder den Ablauf eines Songs luschern muss :wink: )

Da ich keine Lust habe, immer den kpl. html-Quellcode neu schreiben, hatte ich die Idee, mir das Ganze mit einer Tabellencalculation "ausrechnen/zusammensetzen" zu lassen. Ich sortiere mir schnell die Songs in meiner *.ods-Datei und dann kopiere ich mir aus der Ergebnisspalte den html-Body Quelltext kpl. fertig raus -> eingefügt in den Body meiner html-Vorlage, neuer Name für die html-Datei und schon ist es ein schönes Proben bzw. schöner Auftritt.

Vorher hatte ich einen einfachen DIN-A4 Ordner, prall gefüllt mit Blättern in Klarsichtfolie... ...sagen wir mal so: 1. ist ein Tablet wesentlich (!) kleiner, 2. passen auf einem Tablet ein paar hundert (...und noch mehr!) DIN-A4 Ordner drauf und 3. finde ich jetzt ein Script/PDF und Sunds zu einem Stück in einem Bruchteil der Zeit... ...sucht mal den [b][i][u]jetzt[/u][/i][/b] zu probenden Song aus so einem Stapel DIN-A4 Blätter raus...

-----

@Wim: ...ahhh JAAAHHH!!!

O.K., so geht das in OO!! Danke Dir Wim!

Allerdings:

[quote]OpenOffice benötigt eine Java-Laufzeitumgebung(JRE), um diese Aufgabe durchführen zu können. Bitte installieren Sie eine JRE und starten Sie dann OpenOffice neu.[/quote]

...diese Meldung hatte ich schon öfters (auch in Writer)... ...ich verstehe sie nur nicht: Ich habe Java installiert und kriege da nix eingerichtet :shock:

Wie aktiviere ich denn Java für OO? Ist "JRE" etwas spezielles, wo sehe ich denn, dass ich dieses auf meinem Rechner habe? Und wenn nicht, wo kriege ich das her?

Ich hatte schon seinerzeit via Google gesucht, aber nix gefunden.

-----

Noch eine andere Frage: In der Hauptsache arbeite ich mit OO an einem normalen Rechner/NB. Ich habe jetzt ganz aktuell auch ein Tablet, hier muss ich nun nicht in der Hauptsache mit OO arbeiten, habe es dennoch für kleinere Arbeiten in OO installiert.

Hier macht der rechte Bildlauf extreme Probleme, wenn ich versuche ihn mit dem Finger "zu fassen"! Hat das einen Grund? ...oder gibt es eine Systemeinstellung, in der man diesen rechten Bildlauf verbreitern kann?!

Danke Euch Allen nochmals!

LG
Skogtroll

Hi Skogtroll,
[quote]Dank der Mega-Formel läuft's bei mir vorzüglich!!![/quote]Verstehe ich jetzt nicht ganz!
[quote] "Rosanna-TOTO" ...aus dem soll dann "Rosanna - TOTO" werden.[/quote]... es wird aber Rosanna - T O T O
daraus !?!

Gruß
paljass

Danke für Deinen Hinweis Chris!

[quote="ChristianAC"]nachdenkliche Grüsse, Chris[/quote]

...weil es keine Events für Tabellenblätter usw. wie in Excel gibt?! Na ja, VBA in Excel ist schon sehr mächtig... ...aber für meine Zwecke reicht mir OO.

Außerdem habe ich keine Lust mehr, mich dem MS-Diktat in Sachen Programm-Layouts zu unterwerfen. Verschlimmbessern, das können die sehr gut! Ganz zu schweigen von den Kosten...

Mir reicht OO völlig und bis auf ein paar Kleinigkeiten (in Writer) gefällt mir das Programmlayout sehr sehr gut! Kann man besser mit arbeiten, als mit diesem "Registerkarten-System"... :D

Euch Allen nochmals herzlichen Dank! Dank der Mega-Formel läuft's bei mir vorzüglich!!!

LG
Skogtroll

zu erreichen über Extras - Makros - Makros verwalten...
und dann ein Modul bearbeiten,dann kommt das BASIC-Fenster

unter Extras - Anpassen gibt es Events wie öffnen,speichern des Docs,Programmstart/ende...

(zumindest war das in Version 3.0.0 noch so,die ich nutz')

zu den ganzen Worksheet-Events gibt es aber,wenn ich da richtig liege,keine Alternative im OpenOffice.

nachdenkliche Grüsse, Chris

Danke für Eure Antworten!!!

@Clag: KLAPPT!!! Vielen Vielen Dank! ...da hat mal jemand um eine Ecke mehr gedacht: "Soviel geklammertes wie es Großbuchstaben gibt und dann mach da mal ein Leerzeichen rein" ...mal so grob quergedacht gesagt... :D

By the way: Ich hatte die Suche hier im Forum bemüht, aber leider bin ich Deinen erwähnten Beitrag nicht gestoßen. Dank Deiner Aufmerksamkeit bin ich nun weiter gekommen! Danke!

-----

@Winfried: Auch Dir ein großes Danke! ...aber mir ist die Formel-Lösung in diesem Fall symphatischer! Dein Vorschlag wäre aber keine Formel ...oder?!

In Excel kenne ich den VBA-Editor, dort kann man Makros oder Skript-Anweisungen in den Tabellenblättern und/oder global in der Tabelle hinterlegen. Hat OO-Calc auch so etwas? Ich bin da noch nicht so bewandert.

Danke Euch Allen nochmals!!!

LG
Skogtroll

([a-z])([:upper:])(.*)

$1 $2$3

Was 'ne Formel, LOL

Es geht auch mit [color=#0040FF]Suchen & Ersetzen[/color]:

[b]Suchen nach: [/b][code]([a-z])([:upper:])(.*)[/code]
[b]Ersetzen durch:[/b] [code]$1 $2$3[/code]

Optionen Groß-/Kleinschreibung und Regulärer Ausdruck müssen gesetzt sein.

So oft die Taste "Ersetze alle" drücken, bis die Meldung "Suchbegriff nicht gefunden" ausgegeben wird (maximal die maximale Anzahl der Grossbuchstaben in einer Zelle)

Den Bindestrich bekommste auch schnell mit der Ersetzen-Funktion weg^^

n'Abend Skogtroll,

hahah das Thema hatten wie gerade guckst du [url=http://de.openoffice.info/viewtopic.php?f=2&t=65667#p254861][b] hier [/b][/url]
oder nimmst gleich folgendes Formel-Monster,
welches aber genau das tut was du möchtest
[color=#0000FF]
=GLÄTTEN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(WECHSELN(B4;"A";" A");"B";" B");"C";" C");"D";" D");"E";" E");"F";" F");"G";" G");"H";" H");"I";" I");"J";" J");"K";" K");"L";" L");"M";" M");"N";" N");"O";" O");"P";" P");"Q";" Q");"R";" R");"S";" S");"T";" T");"U";" U");"V";" V");"W";" W");"X";" X");"Y";" Y");"Z";" Z");"Ä";" Ä");"Ö";" Ö");"Ü";" Ü");"-";" -"))[/color]

viel Spaß :)

PS
es sollte klar sein das die Formel nur zum Umwandeln dient und danach der neue Titel kopiert und als Text eingefügt wird.