von Stephan » Di, 25.10.2016 11:10
z.B. Ordne folgendes Makro dem Tabellenereignis "Auswahl geändert" zu:
Code: Alles auswählen
Sub ausblenden()
tca = ThisComponent.CurrentController.ActiveSheet
If tca.getCellRangeByName("J3").String = "" AND tca.getCellRangeByName("J3").Value = 0 THen
tca.Columns(9).isVisible = False
Else
tca.Columns(9).isVisible = True
End If
If tca.getCellRangeByName("M3").String = "" AND tca.getCellRangeByName("M3").Value = 0 THen
tca.Columns(12).isVisible = False
Else
tca.Columns(12).isVisible = True
End If
End Sub
Hinweis: Das eigentlich besser passende Ereignis "Inhalt geändert" dürfte nicht gehen weil es nicht auf Inhaltsänderungen reagiert die von Formeln ausgelöst werden.
Gruß
Stephan
z.B. Ordne folgendes Makro dem Tabellenereignis "Auswahl geändert" zu:
[code]Sub ausblenden()
tca = ThisComponent.CurrentController.ActiveSheet
If tca.getCellRangeByName("J3").String = "" AND tca.getCellRangeByName("J3").Value = 0 THen
tca.Columns(9).isVisible = False
Else
tca.Columns(9).isVisible = True
End If
If tca.getCellRangeByName("M3").String = "" AND tca.getCellRangeByName("M3").Value = 0 THen
tca.Columns(12).isVisible = False
Else
tca.Columns(12).isVisible = True
End If
End Sub
[/code]
Hinweis: Das eigentlich besser passende Ereignis "Inhalt geändert" dürfte nicht gehen weil es nicht auf Inhaltsänderungen reagiert die von Formeln ausgelöst werden.
Gruß
Stephan