BITTE helfen Sie uns HEUTE mit einer SPENDE
Das LibreOffice Forum braucht jetzt Ihre Hilfe!
> KEINE WERBUNG FÜR REGISTRIERTE BENUTZER!<
Ihre Spende wird für die Deckung der laufenden Kosten sowie den Ausbau 🌱 des LibreOffice Forums verwendet.
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗
Übernahme eines Excel Makros: wie?
Übernahme eines Excel Makros: wie?
So, nachdem ich belehrt wurde, daß ich im falschen Unterforum war, daß MS-Konten gut sind usw., erhoffe ich mir hier mal problembezogene Hilfe.
Ich habe einen neuen PC. Office 2013 Installation klappte nicht - nach einem Tag habe ich es aufgegeben.
Also doch wieder zu LO, was fast alles genausogut kann - fast. Denn es hing an einem Makro, weswegen ich zu Office wollte, obwohl mir LO besser gefällt.
Ich habe eine xls, die aus zwei Blättern besteht; nach der Arbeit auf Blatt 1 kopiere ich das auf Blatt 2, wo ich dann ein Makro ausführe, welches mir die Zeilen löscht, die "Leer" sind. Leer bedeutet hier: steht in Spalte A irgendwas, dann ist sie nicht leer.
Das Makro in Excel sah so aus:
Rem Attribute VBA_ModuleType=VBADocumentModule
Option VBASupport 1
Sub Leerzeilen_loeschen()
Dim lngSpalte As Long
'** Spalte, die auf Leerzeichen geprüft werden soll
lngSpalte = 1
For a = ActiveSheet.Cells(Rows.Count, lngSpalte).End(xlUp).Row To 1 Step -1
If ActiveSheet.Cells(a, 1).Value = "" Then
Rows(a).Delete shift:=xlUp
End If
Next a
End Sub
In LO klappt das natürlich nicht. Wie kriege ich das genau so hin (inklusive Makrobutton) wie in Excel.
Entweder treibt mich Office oder LO in den Wahnsinn - rettet mich
Thx schon mal (und gesucht habe ich schon)
Ich habe einen neuen PC. Office 2013 Installation klappte nicht - nach einem Tag habe ich es aufgegeben.
Also doch wieder zu LO, was fast alles genausogut kann - fast. Denn es hing an einem Makro, weswegen ich zu Office wollte, obwohl mir LO besser gefällt.
Ich habe eine xls, die aus zwei Blättern besteht; nach der Arbeit auf Blatt 1 kopiere ich das auf Blatt 2, wo ich dann ein Makro ausführe, welches mir die Zeilen löscht, die "Leer" sind. Leer bedeutet hier: steht in Spalte A irgendwas, dann ist sie nicht leer.
Das Makro in Excel sah so aus:
Rem Attribute VBA_ModuleType=VBADocumentModule
Option VBASupport 1
Sub Leerzeilen_loeschen()
Dim lngSpalte As Long
'** Spalte, die auf Leerzeichen geprüft werden soll
lngSpalte = 1
For a = ActiveSheet.Cells(Rows.Count, lngSpalte).End(xlUp).Row To 1 Step -1
If ActiveSheet.Cells(a, 1).Value = "" Then
Rows(a).Delete shift:=xlUp
End If
Next a
End Sub
In LO klappt das natürlich nicht. Wie kriege ich das genau so hin (inklusive Makrobutton) wie in Excel.
Entweder treibt mich Office oder LO in den Wahnsinn - rettet mich
Thx schon mal (und gesucht habe ich schon)
Re: Übernahme eines Excel Makros: wie?
Hallo,
an dem Makro sollte es nicht scheitern.
Du weißt, wie eine Schaltfläche eingefügt und mit einem Makro gekoppelt wird?
Andererseits bleibt noch die Frage zu klären, ob es denn unbedingt ein Makro sein muss? Ein Standardfilter würde das gleiche leisten und (einmalig definiert) auch nur einen Klick bedeuten.
an dem Makro sollte es nicht scheitern.
Code: Alles auswählen
Sub zeilen_loeschen
odoc=Thiscomponent
otab=odoc.CurrentController.ActiveSheet
spalte=0
obereiche= otab.Columns(spalte).queryEmptyCells
for i=obereiche.count-1 to 0 step -1
bereichszeilen=obereiche(i).Rows
bereichszeilen.removeByIndex(0,bereichszeilen.count)
next
End Sub
Andererseits bleibt noch die Frage zu klären, ob es denn unbedingt ein Makro sein muss? Ein Standardfilter würde das gleiche leisten und (einmalig definiert) auch nur einen Klick bedeuten.
- Dateianhänge
-
- makro_zeilenlöschen.ods
- (11.7 KiB) 182-mal heruntergeladen
Gruß,
mikele
mikele
Re: Übernahme eines Excel Makros: wie?
Danke, ich versuche es mal; ich könnte auch die Datei mal hochladen; nur hab ich noch nicht rausgekriegt, wo ...
Re: Übernahme eines Excel Makros: wie?
Hallo Shervane,
Datei hochladen: Gruß
David
Datei hochladen: Gruß
David
Gruß
David
___________________
WIN 10 PRO
LO 7.4.5.1 (x64)
David
___________________
WIN 10 PRO
LO 7.4.5.1 (x64)
Re: Übernahme eines Excel Makros: wie?
PATSCH = Hand vor die Stirn knall
So, das Makro von oben hab ich mal probiert, da tut sich garnix. So, da ist sie. Wie gesagt, wenn in Zellen der Spalte A nichts steht (im rechten Tab), dann soll die weg.
Haut rein, Leutz
So, das Makro von oben hab ich mal probiert, da tut sich garnix. So, da ist sie. Wie gesagt, wenn in Zellen der Spalte A nichts steht (im rechten Tab), dann soll die weg.
Haut rein, Leutz
Re: Übernahme eines Excel Makros: wie?
Hallo,
erstens: Wenn du LO nutzen willst, dann speichere die Dateien auch als .ods
zweitens:
erstens: Wenn du LO nutzen willst, dann speichere die Dateien auch als .ods
zweitens:
Wie hast du das gemacht? In der Datei ist das Makro nicht enthalten.So, das Makro von oben hab ich mal probiert, da tut sich garnix.
Gruß,
mikele
mikele
Re: Übernahme eines Excel Makros: wie?
Ja, ne, ich habs von oben reinkopiert, und danach; nix.
Re: Übernahme eines Excel Makros: wie?
Hallo,
ich habe mal eine .ods daraus gemacht. Es klappt beides (Makro und Standardfilter).
ich habe mal eine .ods daraus gemacht. Es klappt beides (Makro und Standardfilter).
- Dateianhänge
-
- einkaufsliste.ods
- (64.99 KiB) 193-mal heruntergeladen
Gruß,
mikele
mikele
Re: Übernahme eines Excel Makros: wie?
Hallo Shervane,
Bei mir funktioniert das Makro.
Ich denke, Du weißt noch nicht wie man Makros in LO einbindet.
Calc_Gesamthandbuch_4_1.pdf
In diesem Buch wird alles ab Seite 422 beschrieben.
Wenn Du noch Fragen hast, kein Problem.
Gruß
David
Bei mir funktioniert das Makro.
Ich denke, Du weißt noch nicht wie man Makros in LO einbindet.
Calc_Gesamthandbuch_4_1.pdf
In diesem Buch wird alles ab Seite 422 beschrieben.
Wenn Du noch Fragen hast, kein Problem.
Gruß
David
Gruß
David
___________________
WIN 10 PRO
LO 7.4.5.1 (x64)
David
___________________
WIN 10 PRO
LO 7.4.5.1 (x64)
Re: Übernahme eines Excel Makros: wie?
Klar.
LO verlangte eine JRE-Umgebung bla bla bla, also Java installiert.
Neu gestartet, verlangt es das immer noch, es tut sich weiterhin nichts.
Nachtrag
Nach Ändern der Makrosicherheit geht es jetzt, aber: nach der Schwarzen Johannisbeere in Zeile 11 werden die Zeilen gestaucht; irgendeine Idee, wieso?
LO verlangte eine JRE-Umgebung bla bla bla, also Java installiert.
Neu gestartet, verlangt es das immer noch, es tut sich weiterhin nichts.
Nachtrag
Nach Ändern der Makrosicherheit geht es jetzt, aber: nach der Schwarzen Johannisbeere in Zeile 11 werden die Zeilen gestaucht; irgendeine Idee, wieso?
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 ❤️