Telefonszámunk: 1-472-0679

progress bar -a valós folyamat mutatása

Kezdőlap Fórumok Excel programozás progress bar -a valós folyamat mutatása

Ennek a témakörnek tartalma 0 hozzászólás, 1 résztvevő. Utolsó frissítés:  Potus 1 hét, 4 napja telt el a bejegyzés óta.

1 / 1 bejegyzés megtekintése
  • Szerző
    Bejegyzés
  • #5227

    Potus
    Résztvevő

    Sziasztok!
    Van egy munka lapom amire kb.: 10-12 internetes oldalról érkeznek rss hírek. Amikor belépek erre a lapra először mindig frissíti a híreket. Ez akár több perces folyamat is lehet. Már megoldottam azt, hogy ne a frissülő, vibráló, ugráló képernyőt kelljen nézni, betettem egy számomra tetszetős kékes árnyalatú a hír témába vágó képet. Ami ,remélem nem véletlen, az egész folyamat alatt látszik…. Kivéve, ha az Excel program nem válaszol. ( egyébként meg lehet oldani, hogy akkor is ez a kép látszódjon? Gondolom nem…. Már mag a kérdés is hülyeség, ugye???!!!!!)
    No, de a lényeg….
    A frissitési folyamat alatt a képen szeretnék futtatni egy valós folyamatot tükröző progress bart. Olyan progres bar-om van ami kamu, ezt is belehetne illeszteni valahogy a frissitési folyamat előre haladását mutatandó? Próbálkoztam vele, de valószínűleg rossz helyre illesztettem be, mutatta a %-ot meg a csík is mozgott, de iszonyú lassú lett tőle az egész folyamat. Talán egy óra is… 🙂
    Tudna valaki ebben segíteni?

    Private Sub Worksheet_Activate()
    UserForm10.show
    End Sub

    Private Sub CommandButton1_Click()
    Application.screenupdating = False
    ThisWorkbook.RefreshAll
    Application.screenupdating = True
    Unload Me
    Userform14.show
    End Sub
    Private Sub UserForm_Activate()
    Dim i As Long, j As Long
    For i = 2 To 100 Step 2
    For j = 1 To 4000000: Next
    DoEvents
    Userform14.Caption = i & “% komplett”
    Label1.Width = i * 2
    Next

    Unload Me
    End Sub

    Üdv.: Potus

1 / 1 bejegyzés megtekintése

Be kell jelentkezni a hozzászóláshoz.