Visual Basic for Application, skrátene VBA, je forma Visual Basic 6 integrovaná do programov balíka Microsoft Office. Prostredníctvom kódovania vám VBA umožňuje automatizovať úlohy v programoch balíka Office vrátane Excelu. V niektorých prípadoch môžete dokonca pridať nové funkcie do Excelu pomocou VBA.

Aj keď na používanie VBA musíte pracovať s kódom, neznamená to, že VBA sú všetky písmená a čísla. Pomocou jazyka VBA v Exceli môžete vytvoriť makro, ktoré vám umožní vložiť obrázky do bunky alebo rozsahu buniek. Čítajte ďalej a dozviete sa všetko!

Ako vložiť obrázok do bunky pomocou VBA v Exceli

Na vytvorenie makra na vkladanie obrázkov do buniek Excelu pomocou jazyka VBA v skutočnosti nepotrebujete žiadne pokročilé znalosti jazyka Visual Basic. Všetko, čo musíte urobiť, je povoliť nástroje pre vývojárov, vytvoriť makro a vložiť správny kód.

Ak však máte záujem naučiť sa VBA a niekedy si napísať vlastný kód, v tretej časti sme rozpísali kód VBA. Samozrejme, môžete tiež vkladať obrázky do Excelu bez použitia VBA. Ale tento článok je o tom, ako to urobiť cez VBA. Dajme sa do práce!

instagram viewer

Ak chcete používať VBA v Exceli, musíte v Exceli povoliť nástroje pre vývojárov. Tým povolíte kartu Vývojár na páse s nástrojmi, ktorá je predvolene vypnutá.

  1. Otvorte Excel.
  2. Choďte na Súbor Ponuka.
  3. Kliknite na možnosti v spodnej časti obrazovky. Tým sa otvorí okno Možnosti programu Excel.
  4. V možnostiach Excelu prejdite na Prispôsobiť pásku tab.
  5. Pod Hlavné karty, skontrolujte Vývojár.

Teraz sú pre vás povolené nástroje pre vývojárov vrátane prístupu k VBA. Nemusíte to robiť zakaždým, keď chcete použiť VBA v Exceli. Vývojárske nástroje zostanú povolené, kým ich nezakážete.

2. Vytvorenie makra a vloženie kódu

Teraz je čas pristúpiť k vytvoreniu makra. Prípadne by ste tiež mohli vytvorte tlačidlo pomocou VBA pre túto úlohu, ale zostaneme pri makrách.

  1. V Exceli prejdite na Vývojár tab.
  2. V kód sekciu, vyberte Makrá.
  3. V novom okne zadajte názov pre svoje makro Názov makra. Ideme použiť vložiťPhotoMacro.
  4. Kliknite Vytvorte.

Po kliknutí na tlačidlo Vytvoriť sa otvorí okno VBA a zobrazí sa kód pre vaše makro. Práve teraz bude kód pozostávať z dvoch riadkov: A Sub na spustenie makra a an End Sub aby som to ukončil.

Pridajme do tohto makra nejaký kód. Medzi dva riadky pridajte nasledujúci kód:

Stlmiť názov fotografie a cesta Ako Varianta
Stmaviť fotografiu Ako Obrázok
photoNameAndPath = Aplikácia. GetOpenFilename (Title:="Vyberte Fotografia doVložiť")
Ak photoNameAndPath = Nepravdivé Potom VÝCHOD Sub
Set fotografia = ActiveSheet. Obrázky. Vložiť (názov fotografie a cesta)
s fotografiu
 .Left = ActiveSheet. Rozsah("A1").Vľavo
 .Top = ActiveSheet. Rozsah("A1").Nahor
 .Šírka = ActiveSheet. Rozsah("A1").Šírka
 .Výška = ActiveSheet. Rozsah("A1").Výška
 .Umiestnenie = 1
Koniecs

Váš konečný kód by mal byť niečo ako nižšie:

Nemusíte si robiť starosti s ukladaním svojho postupu. Každá zmena, ktorú vykonáte vo VBA, sa okamžite uloží.

Teraz je čas vidieť kód v práci.

  1. Zatvorte okno VBA.
  2. Choďte na Vývojár kartu v Exceli.
  3. Vyberte Makrá z kód oddiele.
  4. Zvýraznite makro, ktoré ste práve vytvorili.
  5. Kliknite Bežať.

Teraz sa otvorí výzva, aby ste našli súbor obrázka, ktorý chcete vložiť. Vyberte svoj obrázok a potom kliknite OTVORENÉ. Teraz by ste mali vidieť svoju fotografiu v bunke A1!

Všimnite si, že vložený obrázok je zmenšený, aby sa zmestil do bunky A1. Môžete to zmeniť a tiež zmeniť kód tak, aby sa obrázok vložil do iných buniek alebo dokonca do rozsahu buniek. V ďalšej časti rozoberieme kód a vysvetlíme parametre pri práci.

3. Prelomenie Kódexu

Aby vám tento kód VBA fungoval tak, ako chcete, musíte mu porozumieť. Akonáhle to urobíte, môžete zmeniť kód na vloženie fotografií do ľubovoľnej bunky akejkoľvek veľkosti. Prejdeme si kód kúsok po kúsku, aby sme ho ľahšie pochopili.

Sub insertPhotoMacro()
Stlmiť názov fotografie a cesta Ako Varianta
Stmaviť fotografiu Ako Obrázok
photoNameAndPath = Aplikácia. GetOpenFilename (Title:="Vyberte Fotografia doVložiť")
Ak photoNameAndPath = Nepravdivé Potom VÝCHOD Sub
Set fotografia = ActiveSheet. Obrázky. Vložiť (názov fotografie a cesta)
s fotografiu
.Left = ActiveSheet. Rozsah("A1").Vľavo
.Top = ActiveSheet. Rozsah("A1").Nahor
.Šírka = ActiveSheet. Rozsah("A1").Šírka
.Výška = ActiveSheet. Rozsah("A1").Výška
.Umiestnenie = 1
Koniecs
Koniec Sub

Po spustení kódu použijeme Dim na určenie typu premennej. Máme tu dve premenné: photoNameAndPath a fotografiu sám. Prvý sme určili ako a Varianta a druhý ako a Fotografia.

Odtiaľ sa spustí premenná photoNameAndPath a otvorí aplikáciu na získanie miesta pobytu súboru obrázka. Toto sa robí cez Aplikácia. GetOpenFileName. The Názov parameter je voliteľný a obsah v ňom sa zobrazuje ako názov okna.

Použitím Ak photoNameAndPath = False, potom Exit Sub, špecifikujeme, že ak je zadaná neplatná alebo prázdna adresa, proces by sa mal ukončiť. Ak sa však podáva správny súbor, potom Nastaviť fotografiu = ActiveSheet. Obrázky. Vložiť (názov fotografie a cesta) označuje, že obrázok by mal byť nastavený ako premenná fotografie, ktorú sme definovali predtým, a mal by byť vložený do aktívneho hárka.

Nakoniec použitie S fotkou a päť riadkov, ktoré za ním nasledujú, rozpracúvame umiestnenie obrázka. .Vľavo a .Top označte miesta štartu, pričom .Šírka a .Výška označte koncové miesta. Ak chcete vložiť obrázok do iných buniek alebo do rozsahu, potom by ste mali zmeniť tieto riadky.

.Umiestnenie označuje, či má byť veľkosť obrázka s bunkami alebo vložená vo voľnej forme. Nastavenie na 1 veľkosť to s bunkami.

V konečnom dôsledku používame Koniec s a potom End Sub na zatvorenie makra. Všimnite si, že môžete zmeniť photoNameAndPath a fotografiu premenné na akýkoľvek iný názov, ktorý sa vám páči. Len nezabudnite udržiavať názvy konzistentné v celom kóde.

Urobte viac v Exceli s VBA

Excel je skutočne skvelý nástroj na organizáciu a analýzu údajov, ale to neznamená, že Excel je nešikovný, pokiaľ ide o grafiku. Hoci fotografie a bitmapy nie sú najsilnejšou stránkou Excelu, Excel si s nimi stále dokonale poradí.

Aj keď môžete vložiť obrázky do Excelu pomocou rozhrania ako v iných aplikáciách balíka Office, môžete to urobiť aj pomocou VBA. Pomocou VBA môžete túto úlohu automatizovať a dokonca ju spojiť s inými úlohami, aby sa spúšťali súčasne. Možnosti s VBA v Exceli sú nekonečné.