Das Clever-Excel-Forum.de - Treffen
findet vom 15. - 17. September 2017 in Thüringen / Region Großer Inselsberg statt. Hotelbuchung ab sofort möglich.


Status Bar aktuallisiert sich nicht
#1
Hallo Forum,
hab da ein problem(chen) Huh und hoffe auf eure Hilfe
Ich arbeite eine Liste mit ca 25000 Datensätzen mittels Makro ab.
damit ich sehe, dass da noch was läuft bepuschel ich die Statusbar mit
Code:
Application.Statusbar = "Satz " & X & "  wird bearbeitet"
leider hört das aktualisieren immer so bei 3000 auf .
Das Makro läuft zwar und arbeitet auch richtig aber die Aktualisierung der Status Bar bleibt stehen.

hat jemand von euch ne Idee wie man das "richtig" hinbekommt ?Undecided

Vielen dank im Vorraus

Gruß
DeBabba
to top
#2
du hast schon geprüft ob die Zeile bei > 3000 noch angesprungen wird. Wir können das nicht.

GrußformelHomepage
to top
#3
Hallo HaJo,
ja, ich mache das bei jedem Schleifendurchgang.
Alle 500 Durchgänge wird / soll das aktualisiert werden
Code:
For Schl1 = 2 To Cells(2, 1).End(xlDown).Row '17207
If Schl1 Mod 500 = 0 Then
     Application.StatusBar = "Satz " & Schl1 & "  wird bearbeitet"
End If
to top
#4
ich habe jetzt ein kompletten Code draus gemacht und es werden bei mir alle angezeigt.
Code:
'Option Explicit

Sub test()
For Schl1 = 2 To 15000 '17207
If Schl1 Mod 500 = 0 Then
     Application.StatusBar = "Satz " & Schl1 & "  wird bearbeitet"
     Application.Wait Now + TimeValue("00:00:01")
End If
Next
End Sub
Gruß Hajo
to top
#5
Danke Hajo,
werde das mal testen (muss aber jetzt in ein sch.. Meeting)
Also erst später

Gruß
DeBabba
to top
#6
Hallo HaJo
23 23 23
So funktionierts
vermutlich ist die 1 sekündige Pause der Auslöser, damit sich Excel nicht verschluckt

Nochmals Danke
28Thumbsupsmileyanim

Gruß
DeBabba
to top
#7
ich hatte die Sekunde pause nur eingbaut, damit ich es sehe, Ansonsten ist er sofort bei 15.000

Gruß Hajo
to top


Möglicherweise verwandte Themen...
Thema Verfasser Antworten Ansichten Letzter Beitrag
  Status vergeben Julzact 6 126 13.10.2016, 10:49
Letzter Beitrag: IchBinIch
  SVerweis lässt sich nicht runterziehen July0210 6 184 28.09.2016, 10:25
Letzter Beitrag: July0210
Sad Formelwerte lassen sich nicht ändern Pivo 3 208 20.09.2016, 08:59
Letzter Beitrag: Rabe
  Fehleranzeige bei Verknüpfungen, aber Status ok Denise 2 345 08.07.2016, 09:20
Letzter Beitrag: Denise
  Mit negative Werten lässt sich nicht rechnen -> #WERT Streety07 1 198 10.06.2016, 17:15
Letzter Beitrag: shift-del
  Zeitstempel lässt sich nicht im 10 minutentakt kopieren Felix_89 5 360 18.05.2016, 21:15
Letzter Beitrag: schauan
  Combobox läßt sich nicht löschen MICA 14 996 16.04.2016, 17:54
Letzter Beitrag: MICA
  Datei lässt sich nicht bearbeiten.... Martl 5 1.505 25.09.2015, 14:02
Letzter Beitrag: Peter
  Indirekt / Index lässt sich nicht ziehen xlsxvba 8 1.609 25.09.2015, 10:57
Letzter Beitrag: xlsxvba
  Diagramm passt sich nicht an Damrak2010 8 1.348 28.07.2015, 14:35
Letzter Beitrag: shift-del

Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste