Usare Gif Animate nelle UserForm

Usare delle immagini per abbellire o personalizzare le nostre UserForm, è abbastanza semplice, basta intervenire sulla proprietà "Picture" della UserForm, digitando o selezionando il percorso dove risiede l'immagine che vogliamo sia inserita. Le altre "proprietà" su cui potremo intervenire per gestire come posizionare l'immagine nell'userform sono "PictureAlignment", "PictureSizeMode", che invito a scoprire nelle varie combinazioni, e la "proprietà" "PictureTiling" che andrà impostata a True se vorremo che un immagine piccola sia ripetuta fino a riempire tutta l'area della userform. Al di là dei modi di impostazione immagine, tutte le immagini che potremo inserire saranno sempre e solo "statiche". E' possibile invece inserire delle immagini in movimento, cioè le classiche Gif Animate. Questo ci permetterà di creare dei nostri Logo animati, rendendo più piacevole il nostro foglio di lavoro. Bisognerà disporre di un programma per la creazione di Gif animate, con il quale realizzare le nostre gif, oppure utilizzare una qualsiasi gif animata, di cui internet è pieno, basta solo cercare. Questo è un esempio di gif animata

Excel non dispone della possibilità diretta di accettare Gif animate, a meno che non si carichi un apposito "controllo", cioè una libreria (.dll) che si incarichi di far "dialogare" Excel con una Gif animata. Per fare questo, dall'editor di visual basic, nella casella degli strumenti disponibili per una UserForm, dovremo selezionare, con il pulsante destro del mouse, la casella stessa, e, dal menù contestuale che appare, scegliere : "Controlli aggiuntivi", oppure, meglio ancora, dalla barra dei menu, scegliere "Strumenti/Riferimenti, e apparirà questa finestra: dovremo selezionare nella finestra dei "Riferimenti disponibili", il "controllo" che ci interessa (in questo caso Gif89 1.0). Quando nella finestra "Riferimenti disponibili" non troviamo il "controllo" voluto, (perchè ancora non "caricato"), dovremo premere il pulsante "Sfoglia" per cercare la cartella dove avremo copiato la libreria (.dll) che ci interessa,

Con la pressione sul pulsante "Sfoglia", si aprirà la finestra "Aggiungi riferimento", come questa sotto, che è la classica finestra di ricerca/apri file; di default la ricerca viene eseguita nella cartella di sistema predisposta a contenere tutte le librerie, che per Windows 98x/2000/XP è la cartella System32 presente come sottocartella della cartella Windows sul vostro hard-disk. (nelle versioni precedenti detta cartella si chiama System). A questo punto basterà selezionare la libreria che ci interessa e cliccare sul pulsante "Apri". Fatto questo, troveremo nella finestra "Riferimenti disponibili" (immagine precedente) la libreria così "caricata" e potremo selezionarla mettendo un segno di spunta nel quadratino a lato.

Fatti questi passi, troveremo l'icona che rappresenta il nuovo controllo, inserita nella casella degli strumenti relativa alla userform: basterà selezionare detta icona, e cliccare e trascinare in una zona libera della userform, così come facciamo per gli altri controlli. A questo punto il "controllo" è pronto per ospitare la nostra Gif animata, dovremo solo usare la proprietà "FileName" del controllo indicando il percorso della Gif che vogliamo caricare, oppure sfruttare l'evento Activate della UserForm per fornire via codice detto percorso, sul tipo di:

Private Sub UserForm_Activate()
Gif89a1.Filename = "C:\Documenti\ennius.gif
End Sub

Nell'immagine sotto sono evidenziati :  la finestra delle proprietà del controllo inserito (Gif89a1), la proprietà FileName, e sulla form, l'oggetto (Gif Control) ancora selezionato

Credo che non tutti abbiano il tempo di rintracciare questo "controllo", che si trova disponibile per free download su molti siti che trattano VisualBasic, per cui chi vorrà lo potrà scaricare da questa pagina: Il file andrà poi copiato nella cartella System32 di Windows, per poterlo poi "caricare" dalla finestra "Aggiungi riferimento". una precisazione: il "controllo" viene riconosciuto e lavora bene su Excel XP, non l'ho provato su versioni precedenti.

Controllo da scaricare :   GIF89.zip    23 Kb