Come caricare un'immagine in Excel a AutoOpen tempo usando Visual Basic

Visual Basic ( VB ) è il linguaggio di programmazione della suite Microsoft Office , tra cui Excel . Con VB è possibile eseguire le stesse funzioni disponibili per gli utenti dell'interfaccia standard di Excel , tra cui l'importazione di elementi grafici quando una cartella di lavoro è aperta. Un passo nella scrittura di un programma VB per eseguire questa operazione è identificare le funzioni e gli oggetti del modello a oggetti di Excel necessaria per importare le immagini . Questo progetto richiede relativamente poche righe di codice del programma , e che lo rende un ideale introduzione alla programmazione VB per Excel . Istruzioni
1

Aprire Excel , quindi fare clic destro sulla scheda denominata " Foglio1 " nella parte inferiore dello schermo. Fare clic sulla voce "Visualizza codice" per visualizzare l'ambiente VB codifica .
2

Fare doppio clic sulla voce " ThisWorkbook " nel riquadro "Progetto" nella schermata a sinistra. Questa azione visualizza una finestra di codice bianco che fornisce uno spazio per inserire i programmi che investono l'intera cartella di lavoro
3

clic sull'elenco più a sinistra a discesa nella parte superiore dello schermo - . Che attualmente visualizzato "Generale ". Fare clic sulla voce " Cartella di lavoro " in tale elenco. L' elenco più a destra a discesa viene visualizzato un elenco di funzioni che viene eseguito quando si verificano diversi eventi che coinvolgono la cartella di lavoro . Una di queste funzioni di eventi, " aperto", viene eseguito quando la cartella di lavoro prima apertura .
4

Fare clic sulla voce "Apri " nella lista più a destra a discesa per creare una funzione di evento vuoto chiamato " Workbook_Open . " Incollare il codice riportato di seguito sopra "End Sub " L'affermazione di questa funzione : .

ActiveSheet.Pictures.Insert ( " " ) Selezionare
5

tipo sul testo " < , YOUR_PICTURE_FILENAME_HERE > " con il nome del percorso di un file di immagine sul disco rigido ( ad es ." C: \\ users \\ ClarkKent \\ Immagini \\ MyBeachParty.jpg " ) economici 6

tornare all'interfaccia standard di Excel premendo il tasto " Alt- F11 ", quindi premere " Alt + F4 " per avviare la chiusura della cartella di lavoro . Digitare un nome di file per la cartella di lavoro quando richiesto , e selezionare " cartella di lavoro con attivazione macro ( * . Xlsm )" per il tipo di file .
7

riaprire la cartella di lavoro . Il programma è stato completato nel punto 4 verrà eseguito , e caricare il file grafico è stato specificato in una cella del primo foglio di lavoro .
8

Torna al tuo programma ripetendo il passo 2 , quindi sostituire l'istruzione corrente in il programma con questo:

ActiveSheet.SetBackgroundPicture Filename : = " "
9

Ripetere il punto 5 per personalizzare il codice del programma per caricare l'immagine dal disco rigido , quindi chiudere e riaprire la cartella di lavoro . Excel visualizza una immagine di sfondo piastrelle in tutto il primo foglio di lavoro .
10

Torna al vostro programma in ambiente VB ( utilizzando le istruzioni passo di 2 ) . Sostituire la singola istruzione con questi:

Dim strFile

strFile = InputBox ( " Inserisci immagine nome di percorso " ) per

ActiveSheet.SetBackgroundPicture Filename : = strFile

11

chiudere e riaprire la cartella di lavoro . Il vostro programma vi chiederà il nome del percorso completo di un file grafico questa volta . Immettere il nome del percorso , quindi fare clic su " OK " per caricare l'immagine sul fondo del primo foglio di lavoro .