Seite 1 von 1

Makro Spalte aus- und einblenden

Verfasst: Fr 30. Sep 2016, 13:11
von Tschubi
Hallo zusammen,

ich wuerde gern eine Spalte per Button aus- und wieder einblenden wollen. Aber bekomme es trotz suche nicht hin.
Mein aktueller Ansatz anhand von Recherche im Netz sieht wie folgt aus

Code: Alles auswählen

Sub spalte_umschalten ()

dim oSheet   as object
oSheet = thisComponent.sheets.getByName("Tabelle1")
oSpalte = oSheet.getColumns().getByName("M")
 
           If oSpalte.isVisible = False Then
       		oSpalte.isVisible = True
             
          Else
             oSpalte.isVisible = False
          End If
            
End Sub
Bekomme jedoch einen BASIC-Laufzeitfehler.
Es ist eine Ausnahme aufgetreten
Type: com.sun.star.container.NoSuchElementException
Message: .

Kann mir jemand sagen was ich falsch mache und Wege aufzeigen?

Danke

Re: Makro Spalte aus- und einblenden

Verfasst: Fr 30. Sep 2016, 14:22
von gerderich
Hallo Tschubi,
Tschubi hat geschrieben:.....
Bekomme jedoch einen BASIC-Laufzeitfehler.
......
Kann mir jemand sagen was ich falsch mache und Wege aufzeigen?
Deine Infos sind ein wenig spärlich. Das Makro habe ich ausprobiert. Funktioniert einwandfrei. Spalte M wird ein- resp ausgeblendet. Jetzt wäre interessant zu wissen:
Wann, resp. wo kommt die von Dir angesprochenen Fehlermeldung? Am besten, du stellst dein Calc Doku hier zur Verfügung. Dann könnte man vielleicht eine Möglichkeit finden.
Gruß
Gerd Erich

Re: Makro Spalte aus- und einblenden

Verfasst: Fr 30. Sep 2016, 14:23
von craig
Hallo,

Dein Makro funktioniert bei mir.

Das einzige was mir dazu einfällt, wäre das Dein Tabellenblattname anders heißt:

Code: Alles auswählen

oSheet = thisComponent.sheets.getByName("Tabelle1")
Du könntest auch auf den Index verweisen:

Code: Alles auswählen

oSheet = thisComponent.sheets.getByIndex(0)
Gruß

Craig

Re: Makro Spalte aus- und einblenden

Verfasst: Fr 30. Sep 2016, 18:45
von karolus
Mit python aus LO5.2 reduziert sich die Aufgabe auf schlicht drei Zeilen:

Code: Alles auswählen

def spalte_ein_aus(*_):
    doc = XSCRIPTCONTEXT.getDocument()
    col = doc.Sheets.Tabelle1.Columns.M
    col.IsVisible = not col.IsVisible

Re: Makro Spalte aus- und einblenden

Verfasst: Di 4. Okt 2016, 14:26
von Tschubi
Hallo zusammen,

vielen Dank, es war in der Tat ein nicht ganz korrekte Uebereinstimmung im Tabellenblattnamen.

Manchmal uebersieht man irgendwie die kleinsten Dinge :-(

Danke und Gruß