Jak rychle vložit stejný obrázek do více listů?
Za normálních okolností můžeme obrázek rychle vložit do listu pomocí funkce Vložit v aplikaci Excel, ale pokusili jste se někdy vložit stejný obrázek do všech listů sešitu? V tomto článku vám představím užitečnou metodu řešení této práce.
Vložte stejný obrázek do všech listů sešitu s kódem VBA
Vložte stejný obrázek do všech listů sešitu s kódem VBA
Následující kód VBA vám pomůže snadno vložit obrázek do všech listů, udělejte to takto:
1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.
2, klikněte Vložit > Modula vložte následující kód do Modul Okno.
Kód VBA: Vložte stejný obrázek do všech pracovních listů:
Sub InsertLogo()
Dim I As Long
Dim xPath As String
Dim xShape As Shape
Dim xRg As Range
xPath = "C:\Users\DT168\Desktop\pic\logo.png"
If Dir(xPath) = "" Then
MsgBox "Picture file was not found in path!", vbInformation, "KuTools for Excel"
Exit Sub
End If
For I = 1 To ActiveWorkbook.Sheets.Count
Set xRg = Sheets(I).Range("A1")
Set xShape = Sheets(I).Shapes.AddPicture(xPath, True, True, xRg.Left, xRg.Top, xRg.Width, xRg.Height)
Next
End Sub
Poznámka: Ve výše uvedeném kódu, C:\Users\DT168\Desktop\pic\logo.png je cesta a název vašeho obrázku a A1 in Range("A1") je buňka, kam chcete vložit obrázek, změňte je prosím na své vlastní.
3. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a poté byl konkrétní obrázek vložen do každé buňky A1 všech listů najednou. Viz snímek obrazovky:
Poznámka: Vložený obrázek bude upraven tak, aby odpovídal velikosti buňky.
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!