Makro für Spalten ein/ausblenden

Antwort erstellen


BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet

Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Makro für Spalten ein/ausblenden

von Paule » Mo, 10.10.2005 09:56

Ja, geht einwandfrei. Danke danke danke



gruß

Paule

von Toxitom » Fr, 07.10.2005 15:58

Hey Paule,

na, wenn du doch schon das Makro für Zeilen hast.... ist ananlog anzuwenden auf Spalten, hier sogar noch etwas einfacher, da du die Spalten direkt mit Namen ansprexchen kannst.

Code: Alles auswählen

...
oSheet = ThisDocument.Sheets(0)
oSheet.getColumns().getByName("C").isVisible = false
....
blendet dir die Spalte "C" des ersten Tabellenbalttes aus. Du kannst die Spalten allerdings auch über den Index ansprechen - immer dann einfacher, wenn man mit Schleifen arbeitet.

Für dein Problem: Du benötigst natürlich eine Abfrage, um zu lesen, was denn in der Zelle steht. Beispiel:

Code: Alles auswählen

...
oSheet = ThisComponent.Sheets(0)
For i = 0 to 5
   oZelle = oSheet.getCellByPosition(i, 19)
   if oZelle.value = 0 then
      oSheet.columns(i).isVisible = false
   end if
next
....
Diese Schleife durchläuft die Zellen A18 bis F18 und blendet die jeweiligen Spalten aus, wenn der WErt der Zelle gleich Null ist (dein Strich dürfte Null bedeuten).

Ich hoffe, du kannst damit arbeiten.

Gruss
Thomas

Makro für Spalten ein/ausblenden

von Paule » Do, 06.10.2005 14:44

moin,

ich habe eine Tabelle mit mehreren Werten die in ein diagramm übernommen werden sollen. Jedoch möchte ich keine "leeren" Stellen in meinem Diagramm haben. Also möchte ich die Spalten Ausblenen lassen, am besten automatisch mit Makro.
(also: wenn in Zelle a18 = "-" dann Gesamte Spalte ausblenden.. so in der art)

Hab im Forum zwar schon ein Makro zum ausblenden von Zeilen gefunden bin aber Irgendwie nicht in der Lage das korrekt umzuschreiben.. :roll:


danke im voraus
gruß
Paule

Nach oben