OpenOffice.info

Karolus

@Karolus: Deine Funktion liefert fälschlich A zurück.

Welche Funktion, wie, und mit welchen Argument rufst du die auf?
Aber ist auch egal… spiel weiter!

Karolus

Hallo LO und AOO haben normalerweise verschiedene Benutzerverzeichnisse, falls du es irgendwie geschafft hast die auf den gleichen Pfad umzubiegen, hast du wohl ein Problem. Wenn du ein Benutzerverzeichnis umbenennst dann legt (LO | AOO) beim nächsten Start ein neues Benutzerverzeichnis an, welches ...

Karolus

demerzel hat geschrieben: ↑Fr, 19.07.2024 19:05 Was meinst Du mit Formelreferenz? Das habe ich nicht verstanden.

z.B. in C1 ⇒Daten⇒ ……Zellbereich A1:A100

und irgendwo im Bereich A1:A100 die Formel: =C1

Karolus

Hallo

Mit LO-calc geht:
⇒Daten⇒Gültigkeit⇒Kriterien⇒Zulassen⇒Zellbereich …<deine Wahl>
⇒⇒⇒Fehlermeldung⇒Aktion: Makro: ……

Code: Alles auswählen

function own(event)
	own = true
end function

in dem oben angegebenen Zellbereich könntest du noch optional eine Formelreferenz zur Daten-gültigkeits-zelle aufnehmen

Karolus

Hallo Deine Funktion »ColString« ist jetzt komplett kaputt, das hattest du schon besser gemacht in deinem Ausgangsbeitrag. Die Quotes innerhalb müssen verdoppelt werden, wenn du also » "" « möchtestet musst du an der Stelle » """" « schreiben. ⇒ … "=WENN(UND(JAHR($...

Karolus

Hallo Kaum hat man aus der »IST«tabelle alle sinnlosen Leerzeichen in den nur scheinbar leeren Zellen entfernt, bekommt man mit ein paar Mausklicks und Mausschubserei eine wunderhübsche Pivottabelle die IMHO wesentlich besser die Daten zusammengefasst darstellt als deine Versuche… Kd_stat_per_pivot_...

Karolus

etwas offtopic: Die Funktion »col_name« in rekursiv: '# basic ' function col_name(i) if i < 26 then col_name = chr( i + 65 ) exit function end if r = i mod 26 i = i \ 26 -1 col_name = col_name( i ) & chr( r + 65 ) end function '###################' # python: def col_name(i): if i < 26: return f&...

Karolus

Hallo Die ersten 7 Zeilen deines gezeigten Codes kann man schlicht durch: doc = thisComponent sheet = doc.sheets(0) cell = doc.getCurrentSelection() ActKdNr = cell.Value ersetzen …ohne zuerst die »Koordinaten« der aktuell selektierten Zelle zu ermitteln, um dann über die »Koordinaten« wieder auf die...

Karolus

Hallo
Aufruf der Funktion direkt:

: run_col_name.png (29.81 KiB) 9836 mal betrachtet

Aufruf indirekt via main:

: run_main.png (25.01 KiB) 9836 mal betrachtet

Du solltest IMHO aber ein paar Schritte zurückgehen und deine eigentliche Aufgabenstellung beschreiben, anstatt nach einer Lösung für ein Teilproblem zu fragen, das du gar nicht hättest …

Karolus

Hallo
Vergiss den Müll, und beschreibe/zeige einfach um was es eigentlich geht!

Code: Alles auswählen

function col_name( col_index )
   with ThisComponent.Sheets(0)
      col_name = .Columns( col_index ).Name
   end with
end function

sub main
    print(col_name( 24 ) )
end sub

Karolus

Was mache ich falsch ?

Keine Ahnung, ich kann das mit zwei Optionsfeldern per ⇒Aktion ausführen an zwei verschiedene Makros zugewiesen, nicht nachstellen!

Wäre wohl sinnvoll wenn du $Beispiel-dokument mit Optionsfeldern und Makros anhängst!

Karolus

Reginaborder hat geschrieben: ↑Sa, 15.06.2024 21:32 Hi, gibt es eine Möglichkeit in einer Liste die aus diversen Zahlen besteht?

Ja die wrd es wohl geben!

Karolus

Hast recht, habe das noch mal durchgelesen. Müsste man hier nicht einfach das Leerzeichen durch zeichen(10) ersetzen um den gewünschten Zeilenumbruch einzuleiten? ja Suchen nach \s ersetzen durch <umbruch> und danach ⇒ Text in Spalten würde für jede Spalte funktionieren, aber jede Zuordnung A : B k...

Karolus

Hallo @Holger: inwiefern lösen deine Vorschläge die Frage? abgesehen davon würde ich statt der tollen » Excel-Formel « in LO schlicht: =WENNFEHLER(REGAUS(A1;"\S+";;SPALTE(A:D));"") als Matrix-formel nehmen! @Pretender: Ich sehe da jetzt reichlich viele Variationen in Spalte A zus...

Karolus

Freitags keine Auskunft!

Ich will mal nicht so sein:

Code: Alles auswählen

sub ich_sag_nix
thisComponent.CurrentSelection.String = "Freitags keine Auskunft!"
end sub

OpenOffice.info

Die Suche ergab 7465 Treffer

Re: Fehler bei Funktionsaufruf "Argument nicht optional"

Re: Makros lassen sich unter Windows 11 nicht bearbeiten

Re: Auswahlliste oder eigenen Zellwert zulassen

Re: Auswahlliste oder eigenen Zellwert zulassen

Re: Fehler bei Funktionsaufruf "Argument nicht optional"

Re: Fehler bei Funktionsaufruf "Argument nicht optional"

Re: Fehler bei Funktionsaufruf "Argument nicht optional"

Re: Fehler bei Funktionsaufruf "Argument nicht optional"

Re: Fehler bei Funktionsaufruf "Argument nicht optional"

Re: Fehler bei Funktionsaufruf "Argument nicht optional"

Re: Makro zuweisen

Re: Zahlen Kombinationen gibt nicht

Re: Zeichen in der Zelle nach bestimmter Anzahl trennen

Re: Zeichen in der Zelle nach bestimmter Anzahl trennen

Re: Makro, das bei Druck auf Schaltfläche Text in aktuell ausgewählte Zelle schreibt