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. 🤗

Tabellenblatt mit Makro auswählen/aktivieren

CALC ist die Tabellenkalkulation, die Sie immer wollten.
Antworten
Helles58
Beiträge: 82
Registriert: Mo 17. Jul 2017, 19:51

Tabellenblatt mit Makro auswählen/aktivieren

Beitrag von Helles58 » Fr 14. Jun 2019, 20:13

Hallo zusammen,

ich hänge hier an einem Problem fest.
Wie kann ich mit Makro ein Tabellenblatt auswählen?
Ich habe es hiermit probiert (StarBasic / OpenOffice.org Basic FAQ):

Sub JumpToSheetsName( myDoc as Objekt, sheetsname as String)
myView = myDoc.CurrentController
mySheet = myDoc.Sheets.getByName(Start)
myView.setActiveSheet(mySheet)
End Sub
Bekomme aber Fehler in der zweiten Zeile: Argument ist nicht optional

Zweiter Versuch (aus dem Basic Handbuch):

sub tabwahl
Dim Doc as object
Dim Sheet as Object
Doc = StarDesktop.CurrentComponent
Sheet = Doc. Sheets (0)
End Sub
kommt Fehlermeldung in der 5 Zeile: Eigenschaft oder Methode nicht gefunden:Sheets

Bin für jede Hilfe dankbar.

Gruß Helles58

HeritzP
Beiträge: 898
Registriert: Mo 9. Dez 2013, 19:08

Re: Tabellenblatt mit Makro auswählen/aktivieren

Beitrag von HeritzP » Fr 14. Jun 2019, 20:49

Hallo,

bei Dannenhöfer funktionieren die 2.

Code: Alles auswählen

Sub Main
  myDoc = ThisComponent
     myView = myDoc.CurrentController
     mySheet = myDoc.Sheets.getByName("Tabelle2")
     myView.setActiveSheet(mySheet)
End Sub


und

Code: Alles auswählen

Sub Main
   myDoc = ThisComponent
     myView = myDoc.CurrentController
     mySheet = myDoc.Sheets(1)
     myView.setActiveSheet(mySheet)
End Sub
Gruß HeritzP
HeritzP

alles nur geklaut

Helles58
Beiträge: 82
Registriert: Mo 17. Jul 2017, 19:51

Re: Tabellenblatt mit Makro auswählen/aktivieren

Beitrag von Helles58 » Fr 14. Jun 2019, 22:42

Hallo HeritzP,

danke für deine schnelle Hilfe.
Das funktioniert.
Wünsch dir ein frohes Wochende.

Gruß Helles58

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