Microsoft Excel

Herbers Excel/VBA-Archiv

Fortschrittsbalken erstellen

Betrifft: Fortschrittsbalken erstellen
von: Patrick
Geschrieben am: 16.05.2004 13:10:46

Ok, also mein Problem ist ein wenig umfangreicher befürchte ich :/

Ich habe mir eine Excel-Tabelle angelegt, in der ich Daten zu einem Onlinespiel eintrage, um die Übersicht nicht zu verlieren. Unter anderem ist ein Wert eingetragen, der wöchentlich steigt und bei einem bestimmten (bekannten) Endwert ankommen soll! Nun soll eben dieser laufende Wert als Prozentwert in einem Fortschrittsbalken dargestellt werden, wobei der ENdwert dann die 100% darstellt!

Ich habe das ganze mit einem Makro probiert, nur tauchen bei einige Probleme auf, z.B. dass
1. ich in VB keinen FOrtschrittsbalken gefunden habe
2. nicht wirklich viel Erfahrung mit VB habe und darum eine sehr detailierte Anleitung brauchen würde, was ich tuen muss.
3. ich mich frage, ob man zusätzlich noch den aktuellen Fortschritt als Zahl in den Balken eintragen kann (wäre aber nicht so schlimm wenn nicht).
4. ich hoffe, dass sich jemand erbarmt und sich die Zeit nimmt mir zu helfen, da ich denke, dass es etwas umfangreicher sein wird!

ALs Beispiel:
laufender Wert: E7
Endwert: C7
Fortschrittsbalken: H7

Also im ENdeffekt bräuchte ich jetzt von euch die ANleitung, welche Werkzeuge ich in VB benutzten muss, wie man das ganze dann in Excel einbindet und den Programmcode in VB!
WIe gesagt, ich weiss dass es viel Arbeit macht, doch vielleicht bekomm ich so auch einen Einblick in das ganze Zeugs und vielleicht macht sich ja sogar einer von euch die Arbeit es mir zu zeigen! Danke schonmal!!

mfg Patrick!

  


Betrifft: AW: Fortschrittsbalken erstellen
von: Josef Ehrensberger
Geschrieben am: 16.05.2004 13:21:01

Hallo Patrick!

Das geht auch ohne VBA!

Tabelle2
 CDEFGH
71250 850  ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
8     68,00%
Formeln der Tabelle
H7 : =WIEDERHOLEN("|";GANZZAHL((E7/C7)*100))
H8 : =E7/C7
 
Diagramm - Grafik - Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download  


Wobei du mit dem Zeichen und der Formatierung der Zelle (Schriftart, Größe, ..)
experimentieren kannst!



Gruß Sepp


  


Betrifft: Sorry,..;-)
von: Ramses
Geschrieben am: 16.05.2004 13:27:51

Hallo Sepp,

ich glaube ich muss öfters aktualisieren ;-)

Gruss Rainer


  


Betrifft: AW: danke
von: Patrick
Geschrieben am: 16.05.2004 13:48:15

klappt wirklcih super und sieht auchnoch genial aus! Manchmal ist die Lösung eben ganz einfach :)

Danke nochmal!!!


  


Betrifft: Merci :-)) Geschlossen o.T.
von: Ramses
Geschrieben am: 16.05.2004 20:24:53

...


  


Betrifft: AW: Merci :-)) Geschlossen o.T.
von: andre
Geschrieben am: 16.05.2004 20:52:53

Hallo,
warum nimmst Du kein Diagramm?
Sieht dann so aus:

Wenn Du die rechten Anteile nicht sehen willst, formatierst Du die Datenreihe einfach um - ohne Rahmen und ohne Inhalt.
Beispieldatei:
http://www.herber.de/bbs/user/6421.xls

Grüße, André ( andre)






  


Betrifft: .....
von: Ramses
Geschrieben am: 16.05.2004 22:36:55

Hallo Andre

weil die Frage lautete:

"...Fortschrittsbalken: H7..."

Wie soll ich das Diagramm da reinpacken ? ;-)

Gruss Rainer


  


Betrifft: AW: Fortschrittsbalken erstellen
von: Ramses
Geschrieben am: 16.05.2004 13:26:26

Hallo

mal ohne VBA um den Aufwand klein zu halten

Tabelle1
 ABC
1Laufender WertEndwertFortschrittsbalken
21250IIIIIIIIIIII                                      I
3Laufender WertEndwert 
42950IIIIIIIIIIIIIIIIIIIIIIIIIIIII                     I
5Laufender WertEndwert 
64750IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII   I
Formeln der Tabelle
C2 : =WIEDERHOLEN("I";A2)&WIEDERHOLEN(" ";B2-A2)&WENN(A2=B2;"";"I")
C4 : =WIEDERHOLEN("I";A4)&WIEDERHOLEN(" ";B4-A4)&WENN(A4=B4;"";"I")
C6 : =WIEDERHOLEN("I";A6)&WIEDERHOLEN(" ";B6-A6)&WENN(A6=B6;"";"I")
Bedingte Formatierungen der Tabelle
ZelleNr.: / BedingungFormat
C21. / Formel ist =A2/B2<0.5Abc
C22. / Formel ist =A2/B2<0.9Abc
C23. / Formel ist =A2/B2>0.9Abc
C41. / Formel ist =A4/B4<0.5Abc
C42. / Formel ist =A4/B4<0.9Abc
C43. / Formel ist =A4/B4>0.9Abc
C61. / Formel ist =A6/B6<0.5Abc
C62. / Formel ist =A6/B6<0.9Abc
C63. / Formel ist =A6/B6>0.9Abc
 
Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download  


Das Zeichen ganz rechts in der Spalte C definiert den restlichen "Weg" der noch vor dir liegt ;-)

Die Schriftart in Spalte C ist "Courier" oder "Fixed Sys" oder eine andere Schriftart mit fixer Zeichenbreite, ansonsten wandert der "End-Balken2 einfach ein wenig.

Gruss Rainer


  


Betrifft: das is ja einfach...
von: ransi
Geschrieben am: 16.05.2004 13:52:35

hallo


...und ich Blödmann plage mich mit label und width und doevents rum.
Hätte ich das vorher gewusst.

thx