fortlaufende Formatierung

Bild

Betrifft: fortlaufende Formatierung
von: Thomas
Geschrieben am: 17.11.2003 16:03:43

Hallo, ich möchte eine Zeilen formatieren, wie das ohne VBA geht,
weiß ich, aber da das immer weiderkehrt, soll das der Computer machen ;)

Meine Tabelle sieht folgendermaßen aus, ein sogenannter 'Datensatz'
ist 8 Zeilen groß. Ich weiß, wie viele Datensätze es gibt und ich
würde es irgendwie mit einem Array lösen wollen. Mir fehlen jedoch
die Programmierkenntnisse. Umständlich würde ich es mit If-Funktionen
auch hinbekommen, ist aber nicht so schön, da es zu verschachtelt ist.
Ich hätte nen globalen Zähler und einen Zwischenzähler. Der globale
ist für das Blatt zuständig und sagt somit, wann schluß ist. Der
Zwischenzähler soll immer nur bis 8 gehen und dann wieder bei 0
beginnen. Wenn der Zwischenzähler 1 ist, soll was passieren, natürlich
auch bei 2, 3 und den anderen Werten. Das ist doch ein Array, oder?
Kann mir da jemand weiterhelfen? Danke!

Gruß Thomas

Bild


Betrifft: AW: fortlaufende Formatierung
von: ChrisL
Geschrieben am: 17.11.2003 17:19:16

Hi Thomas

Ob es dazu ein Array braucht?

Jedenfalls würde ich in etwa so vorgehen:

Dim iZeile As Long
Dim AnzahlDatensaetze as Long

AnzahlDatensaetze = 50

For iZeile = 1 to AnzahlDatensaetze * 8 Step 8

Rows(iZeile).Interior.ColorIndex = 6
Rows(iZeile + 1).Interior.Colorindex = 15

Next iZeile


Oder wie auch immer. Rows() ist nur ein Beispiel. Kann auch Cells(Zeile, Spalte) sein etc.

Gruss
Chris


Bild


Betrifft: AW: fortlaufende Formatierung
von: Thomas
Geschrieben am: 18.11.2003 08:14:06

Hallo Chris
ich werde das mal ausprobieren, danke.

Thomas


Bild

Beiträge aus den Excel-Beispielen zum Thema " fortlaufende Formatierung"