Как быстро вставить одно и то же изображение на несколько листов?
Обычно мы можем быстро вставить изображение в рабочий лист с помощью функции «Вставить» в Excel, но пробовали ли когда-нибудь вставить одно и то же изображение во все рабочие листы вашей книги? В этой статье я представлю вам полезный метод решения этой задачи.
Вставьте одно и то же изображение во все рабочие листы книги с кодом VBA
Вставьте одно и то же изображение во все рабочие листы книги с кодом VBA
Следующий код VBA может помочь вам легко вставить изображение на все рабочие листы. Сделайте следующее:
1. Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. Нажмите Вставить > Модулии вставьте следующий код в Модули Окно.
Код VBA: вставьте одно и то же изображение во все рабочие листы:
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
Внимание: В приведенном выше коде C:\Users\DT168\Desktop\pic\logo.png путь и имя вашего изображения, и A1 in Range("A1") это ячейка, в которую вы хотите вставить изображение, пожалуйста, измените их на свои собственные.
3, Затем нажмите F5 ключ для запуска этого кода, а затем конкретное изображение было вставлено в каждую ячейку A1 всего рабочего листа сразу. Смотрите скриншот:
Внимание: Вставленное изображение будет скорректировано по размеру ячейки.
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!