Facebook Starting progress in excel VBA Userform

Опубликовано: 22 Июнь 2026
на канале: Excel Vba Automation

More From this channel:-
#,Circular Image control in excel VBA UserForm :-   • Image control(Circular) in excel VBA UserForm
#, Rotate Picture(clockwise and counter clockwise)in excel vba UserForm :-   • Rotate Picture(clockwise and counter clock...
#, Rotate image/Picture in excel vba userform image control:-   • Rotate image/Picture in excel vba userform...
#, Invalid Picture, in vba userform :-   • Invalid  Picture error message, in Excel v...

Source code ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::-
Private Sub UserForm_Activate()
Dim a, b As Integer

For b = 1 To 5
UserForm1.Controls.Item("Image" & b).Picture = LoadPicture("D:\excel\For Youtube\FaceBook starting progress\CircularPics\white brown.jpeg")
Next b

For a = 1 To 5
UserForm1.Controls.Item("Image" & a).Picture = LoadPicture("D:\excel\For Youtube\FaceBook starting progress\CircularPics\color.jpeg")
Application.Wait (Now + TimeValue("00:00:3"))
DoEvents
Next

Call closeMe
End Sub

Module...................................................................................
Sub closeMe()
Unload UserForm1
UserForm2.Show
End Sub