Полоса загрузки при обработке макросом - VBA (56207)

Узнай цену своей работы

Формулировка задачи:

мож кто встречал? полоса загрузки при обработке макросом ну типа как при установке программ или распаковке.

Решение задачи: «Полоса загрузки при обработке макросом»

textual
Листинг программы 
Sub IncPBWidth(ByVal perc As Double)
    
    Dim MaxLen As Long
    With UserForm1
        MaxLen = (.FrameProgress.width - 15)
        .LabelProgress.width = .LabelProgress.width + perc * MaxLen
        .FrameProgress.Caption = VBA.format(.LabelProgress.width / MaxLen, "0%")
    End With
    DoEvents
End Sub

ИИ поможет Вам:

  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

6   голосов , оценка 3.833 из 5
Похожие ответы