LibreOffice-Forum

Hallo,

ich habe ein Dokument (Calc) erstellt, in dem ich in einer Zelle die Formel

=GROSSSCHREIBUNG(J5:J35)

eingefügt habe. Dadurch wird bei Änderungen im Bereich J5:J35 ein Makro gestartet, welches die kleinen Buchstaben in Großbuchstaben ändert. Das Makro funktioniert auch.

Leider bekomme ich beim Öffnen der Datei aber eine Fehlermeldung: "Objektvariable nicht belegt". Nach dem Wegklicken funktioniert alles wie es soll.
Ich gehe davon aus, dass beim Öffnen diese Zelle ausgeführt werden soll, aber die Makros noch nicht geladen sind, oder so... (da hören meine Vorstellungen über den Ablauf auf, wie man merkt...)

Vielleicht hat jemand eine Idee, wie ich die Fehlermeldungen wegbekomme.... Es nervt, da ich das in 12 Tabellenblättern drin habe und die Fehlermeldung deshalb 12 mal kommt... Gerade festgestellt, wenn ich warte, muss ich sie nur einmal wegdrücken. Trotzdem blöd, irritiert andere Nutzer....

Zur Vollständigkeit:
Betriebssystem: TUXEDO OS 1
KDE-Plasma-Version: 5.24.7
KDE-Frameworks-Version: 5.92.0
Qt-Version: 5.15.3
Kernel-Version: 5.15.0-10053-tuxedo (64-bit)
Grafik-Plattform: X11
Prozessoren: 16 × 12th Gen Intel® Core™ i7-1260P
Speicher: 62,5 GiB Arbeitsspeicher
Grafikprozessor: Mesa Intel® Graphics

LibreOffice 1.7.3.7

Vielen Dank

jkl

Zur Vollständigkeit:
<…irrelevante Mitteilungen…>

Wenn du jetzt noch den Code deiner GROSSBUCHSTABEN-funktion postest könnte man da ansetzen!

Moin,
wozu ein Makro?
Es gibt in Calc die Funktion =GROSS()
Beispiel anbei.
Gruß R

Hallo

Speicher: 62,5 GiB Arbeitsspeicher

Ich fürchte es liegt an dem lächerlich kleinen Arbeitsspeicher, man braucht doch mindestens 128 GB um mit GROSSBUCHSTABEN zu arbeiten

Hier der Code:

Code: Alles auswählen

Function Grossschreibung(x)
	
myDoc=ThisComponent.currentcontroller.activesheet
For i = 5 to 36
myDoc.getCellRangeByName("J"&i).string = UCase(myDoc.getCellRangeByName("J"&i).string)	
Next i

End Function

Ich brauche eine Funktion, die Eingaben in der gleichen Zelle umwandelt und nicht an einer anderen Stelle. Vielleicht gibt es ja auch hier eine einfachere Lösung, habe ich aber nicht gefunden.

Danke auf jeden FAll... Die 62,5 GiB sind übrigens XXL-GiB, extra für Großbuchstaben.

Hallo

Code: Alles auswählen

Function Grossschreibung(x)

on Error goto ex

sheet = ThisComponent.CurrentController.Activesheet
with sheet
	for i = 5 to 36
	.getCellRangeByName("J"&i).String = ucase( .getCellRangeByName("J"&i).String )	
	Next i
end with
ex:
End Function

Super! Vielen Dank. Das Thema Fehler etc. habe ich leider immer verschludert... Muss mich wohl mal damit beschäftigen...
Danke

jkl

LibreOffice-Forum

Gelöst: Fehler beim Öffnen eines Dokuments

Gelöst: Fehler beim Öffnen eines Dokuments

Re: Fehler beim Öffnen eines Dokuments

Re: Fehler beim Öffnen eines Dokuments

Re: Fehler beim Öffnen eines Dokuments

Re: Fehler beim Öffnen eines Dokuments

Re: Fehler beim Öffnen eines Dokuments

Re: Fehler beim Öffnen eines Dokuments