Seite 1 von 1

Re: Wie Makro im Hintergund laufen lassen?

Verfasst: Fr, 25.04.2014 06:14
von F3K Total
Hi,
wenn deine Daten auf "Tabelle1" stehen, kannst Du mit folgendem Makro die Spalten "B","C" und "F" ausblenden

Code: Alles auswählen

Sub hide_Columns
    osheet = Thiscomponent.sheets.getbyname("Tabelle1")
    aC = array("B","C","F")
    for i = 0 to ubound(aC)
        oC = osheet.columns.getbyname(aC(i))
        oC.IsVisible = false
    next i
end Sub
und mit diesem

Code: Alles auswählen

Sub show_Columns
    osheet = Thiscomponent.sheets.getbyname("Tabelle1")
    aC = array("B","C","F")
    for i = 0 to ubound(aC)
        oC = osheet.columns.getbyname(aC(i))
        oC.IsVisible = true
    next i
end Sub
die Spalten "B","C" und "F" wieder einblenden.
HTH R