[gelöst]Excel Databar - formatieren

Hallo zusammen,

ich habe einen optimierten Excel-Buffer gebastelt, um schöne Excel Exporte zu erstellen.
Nun würde ich auch gerne DataBars mit "bedingter Formatierung" einfügen.

Erstellen lassen sich diese ganz einfach:

XlRange:=XlWrkSht.Range('A1');
XlRange.FormatConditions.AddDatabar();

Nun möchte ich eigendlich nur noch..
MinWert auf = 0
MaxWert auf = 100
Farbe auf = grün

Kann mir jemand helfen? So ganz ist mir die Ansteuerung der "Automation" noch nicht klar, und ich hab schon ganz viel ausprobiert.

Vielen Dank in Voraus

Gruß
Matthias

Zuletzt geändert von himi81 am 2. Oktober 2015 08:13, insgesamt 1-mal geändert.

Hallo zusammen,
Ich hab es selber herausgefunden.

Hier das Ergebis, falls nochmal jemand vor hat Fortschrittsbalken oder ähnliches in Excel umzusetzen.

Code:

 {
 Sheet           Automation      'Microsoft Excel 15.0 Object Library'.Worksheet
 Datab       Automation      'Microsoft Excel 15.0 Object Library'.Databar   
 Db_Color       Automation      'Microsoft Excel 15.0 Object Library'.FormatColor
 }
 Datab:=Sheet.Range('A4').FormatConditions.AddDatabar;//Erstellt die Databar
 Datab.MinPoint.Modify(4,1);  //Format(4) Formel! , MinWert(1)
 Datab.MaxPoint.Modify(4,100);//Format(4) Formel! , MaxWert(100)
 Db_Color:=Datab.BarColor; //Farbenobjekt
 Db_Color.ColorIndex:=3; //Farbe hier 3 = rot


Gruß Matthias