Thema Datum  Von Nutzer Rating
Antwort
11.11.2003 12:37:09 Wolfgang
NotSolved
11.11.2003 13:58:16 Rasta
NotSolved
11.11.2003 15:59:46 Wolfgang
NotSolved
Blau Aw:Aw:Aw:Progressbar
11.11.2003 18:17:23 rasta
NotSolved
11.11.2003 18:19:53 rasta
NotSolved

Ansicht des Beitrags:
Von:
rasta
Datum:
11.11.2003 18:17:23
Views:
1177
Rating: Antwort:
  Ja
Thema:
Aw:Aw:Aw:Progressbar
hallo wolfgang,

ein anwendungsfall wäre beispielsweise wenn du 10 dokumente zu speichern hast, eine progressbar mitlaufen zu lassen.

da activeWorkbook.save
nur aus einem schritt besteht, macht eine progressbar wirklich keinen sinn.

mit doevents gibst du lediglich während der verarbeitung etwas prozessorzeit an andere applikationen weiter(kannst du auch verwenden, damit deine applikation refresht wird-- ich empfehle aber den expliziten refresh)

ich habe dir ein kleines beispiel geschrieben, das eine minute lang die progressbar volllaufen lässt.....

(im übrigen, wenn du deine email angibst, wirst du über eine nachricht automatisch per mail informiert. spammer haben keine chanche da die beiträge pro abruf aus einer datenbank generiert werden)

gruß

rasta

Wolfgang schrieb am 11.11.2003 15:59:46:

Hallo Rasta,

Danke für deine Info. Ich weiß, dass es nicht sinnvoll ist das so zu programmieren, mich hat nur gereizt zu erfahren wie und ob generell der Speichervorgang gleichzeitig zur Progressbar laufen kann. Es müsste auch nicht hundertprozentig zeitlich stimmen. Wenn du mir trotzdem noch einen Tip geben kannst wäre ich dir sehr dankbar.

Gruß
Wolfgang

Rasta schrieb am 11.11.2003 13:58:16:

Hallo Wolfgang,

meiner Meinung nach funktioniert das nicht so, wie Du Dir das vorgestellt hast.

Die Programmierung einer Progressbar ist nur dann sinnvoll, wenn du weisst, wieviele Verarbeitungsschritte du hast.(Beispiel updaten einer db-tabelle)

du könntest höchstens stoppen, wie lange ein speichervorgang braucht und danach die progressbar füllen-- was aber meiner meinung nach blödsinn ist

wenn du trotzdem in dieser richtung weitermachen möchtest, helfe ich dir aber gerne :-)

gruß

rasta

Wolfgang schrieb am 11.11.2003 12:37:09:

Hallo,

Ich habe ein UserForm mit Progressbar eingerichtet. Nun möchte ich die Fortschrittsanzeige parallel zum Befehl activeWorkbook.save laufen lassen. Bisher arbeitet es Schritt für Schritt ab so dass erst die Fortschrittsanzeige und dann das Speichern erfolgt.
Leider habe ich schon mehrer Möglichkeiten mit DoEvents ausprobiert und habe es nicht hinbekommen. Vielleicht kann mir ja jemand weiterhelfen? Oder es geht vielleicht gar nicht wie ich mir das vorgestellt habe.
–Danke -

Mein Code für die Progressbar bisher:

Private Sub CommandButton1_Click()
Dim i As Integer

Me!ProgressBar1.Min = 0
Me!ProgressBar1.Max = 20000

For i = Me!ProgressBar1.Min To Me!ProgressBar1.Max
Me!ProgressBar1.Value = i
i = i + 1
Next
activeWorkbook.save
Me!ProgressBar1.Value = 0

End Sub

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
11.11.2003 12:37:09 Wolfgang
NotSolved
11.11.2003 13:58:16 Rasta
NotSolved
11.11.2003 15:59:46 Wolfgang
NotSolved
Blau Aw:Aw:Aw:Progressbar
11.11.2003 18:17:23 rasta
NotSolved
11.11.2003 18:19:53 rasta
NotSolved