BITTE helfen Sie uns HEUTE mit einer SPENDE
Helfen Sie das LibreOffice Forum zu erhalten!

❤️ DANKE >><< DANKE ❤️

> KEINE WERBUNG FÜR REGISTRIERTE BENUTZER!<
Ihre Spende wird für die Deckung der laufenden Kosten sowie den Erhalt und Ausbau 🌱 des LibreOffice Forums verwendet.
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗

[Gelöst] Feststellen, ob eine Zelle leer ist

CALC ist die Tabellenkalkulation, die Sie immer wollten.
Antworten
Mike24
Beiträge: 11
Registriert: Fr 8. Okt 2021, 17:13

[Gelöst] Feststellen, ob eine Zelle leer ist

Beitrag von Mike24 » Mo 11. Okt 2021, 18:50

Hei,

irgendwie bekomme ich das nicht hin. :?
Wie kann ich per Makro feststellen, ob eine bestimmte Zelle (z.B. A1) in calc leer ist?

Viele Grüße
Mike24 :)

P.S. Wurde zwischenzeitlich von mir gelöst.

Benutzeravatar
Roland1
Beiträge: 50
Registriert: Sa 15. Jan 2022, 11:01

Re: [Gelöst] Feststellen, ob eine Zelle leer ist

Beitrag von Roland1 » Sa 15. Jan 2022, 11:32

und wie ?
Möchte das selbe haben, das mit einem Makro immer die nächst frei zelle beschrieben wird.
Gruß Roland
Windows 11, Libre 7.5.9

craig
Beiträge: 1137
Registriert: Do 21. Apr 2016, 11:42

Re: [Gelöst] Feststellen, ob eine Zelle leer ist

Beitrag von craig » Sa 15. Jan 2022, 11:47

Hallo Roland,

beschreib mal näher was Du brauchst.
Beispieldokument... :?:
Gruß

Craig

Nie die Sicherungskopie vergessen!

════════════════════════════════════════════════
WIN 10 Pro 64-Bit • LO 7.4.5.1 (x64) • AOO 4.1.8

Benutzeravatar
Roland1
Beiträge: 50
Registriert: Sa 15. Jan 2022, 11:01

Re: [Gelöst] Feststellen, ob eine Zelle leer ist

Beitrag von Roland1 » Sa 15. Jan 2022, 11:51

Hallo craig

Hallo, meine Suche ergab leider nicht das was ich suche. Oder ich verstehe es nicht.

Ich habe eine Tabelle mit Namen, Datum, Betrag.
Das sind alles "Feld" und "wenn dann" Befehle.
funktioniert soweit.

Nun möchte ich in einer anderen Tabelle (Liste) Name, Datum, und Betrag mit einem Klick mit einem Makro listen.

Ich ab es nun aufgenommen (erst mal nur "Betrag") den formatiere ich wenn das Makro den Betrag eingefügt hat als Zahl
(selectformat, 1) so das keine Formel auf die Liste kommt, sondern der Betrag.

Nun möchte ich, das bei jedem klicken auf das Makro die nächste freie Zelle (c3.....c4,c5) beschrieben wird.

Ich hab das mit "Row+1" gelesen, bekomme es aber nicht hin.

Ich Liste mal was ich habe, eventuell kann mir auch jemand sagen wie ich dann noch Name und Datum dazu bekomme.
Das Datenblatt (Aktive Sheet) ist 2, die Liste ist 5, Der Rechnungswert ist K48,
Der Name wäre Tabellle2, A11
Das Datum wäre Tabelle2, K13.

nun noch was ich als Makro habe.

sub Rechnungliste
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Nr"
args1(0).Value = 2

dispatcher.executeDispatch(document, ".uno:JumpToTable", "", 0, args1())

rem ----------------------------------------------------------------------
dim args2(0) as new com.sun.star.beans.PropertyValue
args2(0).Name = "ToPoint"
args2(0).Value = "$K$48"

dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args2())

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:Copy", "", 0, Array())

rem ----------------------------------------------------------------------
dim args4(0) as new com.sun.star.beans.PropertyValue
args4(0).Name = "Nr"
args4(0).Value = 5

dispatcher.executeDispatch(document, ".uno:JumpToTable", "", 0, args4())


rem ----------------------------------------------------------------------
dim args5(0) as new com.sun.star.beans.PropertyValue
args5(0).Name = "ToPoint"
args5(0).Value ="$C$3"


dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args5())


rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:Paste", "", 0, Array())

rem ----------------------------------------------------------------------
dim args7(0) as new com.sun.star.beans.PropertyValue
args7(0).Name = "SelectedFormat"
args7(0).Value = 1
dispatcher.executeDispatch(document, ".uno:ClipboardFormatItems", "", 0, args7())


end sub
Gruß Roland
Windows 11, Libre 7.5.9

Mondblatt24
Beiträge: 2837
Registriert: Fr 3. Mär 2017, 17:12

Re: [Gelöst] Feststellen, ob eine Zelle leer ist

Beitrag von Mondblatt24 » Sa 15. Jan 2022, 18:38

Hier geht es mit der Frage von @Roland1 weiter
Win 11 (x64) ▪ LO 24.2.1.2 (x64) ▪ AOO Portable 4.1.15
Wenn Eure Frage zutreffend beantwortet wurde, seid so nett und fügt dem Betreff der Eingangsfrage [GELÖST] hinzu.

An alle, die das LibreOffice-Forum nutzen:


Bitte beteiligen Sie sich mit 7 Euro pro Monat und helfen uns bei unserem Budget für das Jahr 2024.
Einfach per Kreditkarte oder PayPal.
Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet.

❤️ Vielen lieben Dank für Ihre Unterstützung ❤️

Antworten