Using animated gif's in Excel userforms

tmanger

Board Regular
Joined
Jul 15, 2002
Messages
101
Is there any way to use animated gif's in an Excel spreadsheet or userform without saving to an HTML format? I would like to ultimately incorporate a moving logo onto a splash screen as the workbook loads.

Thanks for any ideas.

Tom
 

Excel Facts

Links? Where??
If Excel says you have links but you can't find them, go to Formulas, Name Manager. Look for old links to dead workbooks & delete.
Thanks. I opted to use a webbrowser insert, which works well but.....

Any idea how to get rid of the vertical scroll bars and make the "window" appear flat (i.e. more like a straight image)? The gif image is small, and the bars are inactive, but there is no property value that I can find that seems to influence either display issue.

Thanks in advance.

Tom.
 
Upvote 0
Create a shape and rename the "WordArt 1" to what ever your shape is named

This code will make the shape run from right to left when the sheet is activated.


Code Follows:

Private Sub Worksheet_Activate()
Dim x As Single, y As Single, t As Single, i As Integer, n As Integer
With ActiveSheet.Shapes("WordArt 1")
.Top = 100
.Left = 400
n = 20
Wait 0.3
For i = 1 To n
.Left = 400 + (72.75 - 400) * i / n
Wait 0.1
Next i
End With
End Sub
Sub Wait(tSecs As Single)

Dim t As Single

t = Timer + tSecs

Do While Timer < t
DoEvents
Loop

End Sub
 
Upvote 0
Sounds slick!

I can't seem to make it work. I get a run time error that tells me "the item with the specified name wasn't found".

Perhaps I named it incorrectly. I drew a rectangle on my sheet, went to Insert and Name and defined that rectangle as WordArt1. Is there another way to do it?

Tom.
 
Upvote 0

Forum statistics

Threads
1,224,427
Messages
6,178,585
Members
452,859
Latest member
dallasazcat

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top