Ako načítať obrázok do programu Excel na AutoOpen čas pomocou jazyka Visual Basic

Visual Basic ( VB ) je programovací jazyk balíka Microsoft Office , vrátane Excel . S VB môžete vykonávať rovnaké funkcie dostupné pre užívateľov štandardné rozhranie programu Excel , vrátane importu grafiky pri otvorení zošita . Jeden krok v písaní VB program realizácie tejto úlohy je určenie funkcií a objektov modelu objektu Excel potreba importovať obrázky . Tento projekt si vyžaduje relatívne pár riadkov programového kódu , a preto je ideálny úvod do VB programovania pre Excel . Návod dovolená 1

Otvorte aplikáciu Excel , kliknite pravým tlačidlom myši na záložku označenú " Hárok1 " v dolnej časti obrazovky . Kliknite na " Zobraziť kód " položku zobrazíte VB prostredie pre písanie kódu .
2

Double - kliknite na " ThisWorkbook " položku v podokne " projektu " na ľavej strane obrazovky . Táto akcia sa zobrazí prázdne okno kód poskytujúca priestor pre vstup programy , ktoré ovplyvňujú celý zošit
3

Kliknite najviac vľavo rozbaľovacieho zoznamu v hornej časti obrazovky - . , Ktoré V súčasnej dobe sa zobrazí " generál. " Kliknite na " zošit " položku v tomto zozname . Najviac vpravo zoznam drop - down sa zobrazí zoznam funkcií , ktoré bežia pri rôzne udalosti nastanú zahŕňajúce zošit . Jednou z týchto funkcií udalostí , " Otvoriť " , beží , keď je zošit otvorený po prvýkrát .
4

Kliknite na tlačidlo " Otvoriť " položku v pravom rozbaľovacom zozname vytvoriť prázdnu funkciu pre organizovanie podujatí s názvom " Workbook_Open . " Vložte nasledujúci kód uvedený Táto funkcia je " End Sub " vyhlásenie : .

ActiveSheet.Pictures.Insert ( " " ) Vyberte
5

prepíšte text " < ; YOUR_PICTURE_FILENAME_HERE > " s názvom cesta k súboru s obrázkom na pevnom disku ( napr. " C : \\ Users \\ ClarkKent \\ Pictures \\ MyBeachParty.jpg " )
6

Späť na štandardné rozhranie programu Excel . stlačením " Alt - F11 " a stlačte tlačidlo " Alt - F4 " pre začatie zatvorením zošita . Zadajte názov súboru zošita , kedy sa zobrazí výzva , vyberte " zošit makier ( * . Xlsm ) " pre typ súboru .
7

znova otvorte zošit . Program , ktorý dokončil v kroku 4 bude vykonávať , a načítať súbor grafického ste zadali do bunky na prvom liste .
8

Vráťte sa k svojmu programu , opakovaním kroku 2 , potom nahradí súčasné vyhlásenia , vo program s tymto :

ActiveSheet.SetBackgroundPicture súboru : = " "
9

Opakujte krok 5 pre prispôsobenie programového kódu načítať obrázok z vášho pevného disku , zatvorte a znova otvorte zošit . Excel zobrazí obrázok pozadia cez prvého listu kachľové .
10

Späť na programe v prostredí VB ( pomocou kroku 2 v návode ) . Vymeňte jeden príkaz s nimi :

Dim strFile

strFile = InputBox ( " Zadajte obrazu cestu " )

ActiveSheet.SetBackgroundPicture Meno súboru : = strFile

11

Zatvorte a znova otvorte zošit . Váš program vás vyzve na zadanie úplného názvu cesty grafického súboru tentoraz . Zadajte názov cesty a kliknite na tlačidlo " OK " načítať obrázok na pozadí prvom liste je .

• Predchádzajúca strana: Ako spustiť tabuľky programu Excel ako služba 
• Ďalšia strana: Ako importovať viac ako 65.536 riadkov v programe Excel 2003