Generate qr code in excel

Do you want to generate a QR code in Excel?

QR codes are two-dimensional barcodes that can be read by scanners and smartphones.

QR codes are a popular way to link physical objects to digital information. When a QR code is scanned, it will link the user to a website, text, audio, or video file.

This post will show you how you can make QR codes in Excel. Download your copy of the example workbook used in this post and follow along.

Generate a QR Code with a Font

Excel allows you to use your own custom fonts for your spreadsheets. You can read this post to find out how to install a new font in Excel.

An easy way to create a QR code in Excel is to use a custom QR code font!

The AlphanumericQR Font found on FontSpace is a great option for a QR code font.

When you install the font, you’ll be able to convert individual characters to a QR code.

1. Select the range of cells that contains the text you want to turn into a QR code.
2. Go to the Home tab.
3. Select the AlphanumericQR font from the dropdown list in the Font section.
4. Increase the font size so the QR codes are easily visible.

Your text will now display as a series of QR codes!

📝 Note: This doesn’t convert the whole text in a cell to a single QR code, but rather it will convert each character of the text to a QR code.

Making a QR code for a single character is admittedly quite a useless result. But don’t worry there are better ways to get a QR code to link longer text or URLs.

Generate a QR Code with Organization Data Types

If your organization uses Power Bi, then you might avail of the Organization Data Types to create your QR codes.

The data types will allow you to contain multiple pieces of data inside a single cell. This includes images from a URL.

This means you can use data types to show an image of a QR code inside a cell, and you can generate this image from a QR Code API.

https://api.qrserver.com/v1/create-qr-code/?size=150x150&data=<yourdatagoeshere>

The above URL will generate a QR code image for whatever you append on the end place of the <yourdatagoeshere> part.

You can use this in your Org Data Type to get QR codes in Excel.

You will need an Excel table with the data you want to use to generate your QR codes. This example will create QR codes for a list of webpages.

Now you will need to create a Power BI model with the Excel data.

Open the Power BI desktop app and go to the Home tab and click on the Excel Workbook command to import the Excel data.

This will open a file picker menu where you can navigate to your saved Excel file. Select the file and press the Open button to start the import process.

📝 Note: Your Excel file needs to be closed while you are setting up the query in Power BI.

This will open the Navigator menu where you can select what data to import from your Excel file. Select the table and press the Transform Data button.

Now you will need to create a new column with the data from the Excel table appended to the end of the API URL.

Go to the Add Column tab and choose the Custom Column option in the General section.

This will open the Custom Column editor where you can add a formula for the new column.

= "https://api.qrserver.com/v1/create-qr-code/?size=150x150&data=" & [URL]

Insert the above formula into the Custom column formula editor and press the OK button.

This will append the URL column to the end of the API URL for each row in the table. This is what will be used to generate each QR code.

Now you can go to the Home tab and press the Close and Apply button to load the query.

Now you will need to set this table as a featured table.

Go to the Model view, select the table, and toggle on the Is featured table option in the bottom part of the Properties menu.

When you enable the featured table option, this will open the Set up this featured table menu.

Set the Row label and Key column.

• The Row label is the value you will see in the Excel cell for the data type.
• The Key column is a value that uniquely identifies a row in the table.

In this example, they have both been set to the URL column.

Now you will need to identify the added custom column as an image URL.

Go to the Data view and click on the custom column containing the QR Code URL and set the Data category as an Image URL.

Now you can publish the Power BI model to the Power BI service online. This will make the organization data types available in Excel.

Go to the Home tab and click on the Publish command, then choose the location to publish the model and press the Select button.

Now you can create organization data types from your Excel data. Make sure to close and reopen Excel if you don’t immediately see the featured table in your Data Types.

Now you will be able to convert text data from your table into a data type.

1. Select the cells to convert into an organization data type.
2. Go to the Data tab.
3. Click on the button to expand the Data Type tray.
4. Click on your table in the From your organization section.

The text will be converted to a data type and you will be able to tell because of the small icon to the left of the text.

= B2.[QR Code]

You can now extract the QR code image from the data type with a formula. The above formula will get the QR Code from your data type in cell B2.

Generate a QR Code with the IMAGE Function

Using the organization data types can be a bit complex to set up, and you might not even have access to the Power BI pro license that’s required.

Fortunately, there are other ways to get an image inside a cell.

This method will use the IMAGE function along with the QR Code API to generate a QR code image inside a cell.

= IMAGE ( "https://api.qrserver.com/v1/create-qr-code/?size=150x150&data=" & B3 )

The above function will append the value in cell B3 onto the end of the QR code API URL. This will create a QR code for the value in cell B3.

Conclusions

QR codes are a popular way to create scannable hyperlinks and now you can easily make them in Excel.

Using a custom QR code font will only allow you to generate a QR code for a single character, which might not be that useful.

Organization data types used with a QR code API will allow you to create a QR code for any text or URL data you need, but it does require a Power BI pro license and is complex to set up.

The easiest option is to generate a QR code using the IMAGE function along with the QR code API.

Did you know you could make your own QR codes in Excel?

Вы знаете, как создать QR-код на основе определенного значения ячейки в Excel? В этой статье мы подробно расскажем, как этого добиться.

Создайте QR-код на основе значения ячейки с помощью Barcode Control и кода VBA
Легко создавайте сразу несколько QR-кодов на основе значений ячеек с помощью замечательного инструмента.

Создайте QR-код на основе значения ячейки с помощью Barcode Control и кода VBA

Элемент управления штрих-кодом может помочь вам быстро создать QR-код на основе значения ячейки в Excel. Пожалуйста, сделайте следующее.

1. Откройте рабочий лист, содержащий значение ячейки, на основе которого вы создадите QR-код.

2. Нажмите Застройщик > Вставить > Больше контроля. Смотрите скриншот:

3. в Больше элементов управления окно, проверьте наличие Контроль штрих-кода Microsoft 16.0 or Контроль штрих-кода Microsoft 15.0.

4. Если вы не нашли элемент управления штрих-кодом в окне «Дополнительные элементы управления» или элемент управления штрих-кодом не соответствует версии 16.0 или 15.0, вам необходимо загрузить файл управления штрих-кодом, щелкнув следующие ссылки: скачать контроль штрих-кода. Если в окне дополнительных элементов управления есть Barcode Control 16.0 или 15.0, просто перейдите на страницу ниже. шаг 10.

После загрузки файла распакуйте его, а затем обновите элемент управления штрих-кодом, используя загруженный элемент управления штрих-кодом в Excel, как показано ниже.

5. Закройте все книги Excel, перейдите в Start раздел, найдите Excel app и щелкните его правой кнопкой мыши, затем выберите Запуск от имени администратора из контекстного меню. Смотрите скриншот:

6. В дебюте Контроль учетных записей диалогового окна, нажмите Да кнопку.

7. Затем создается новая книга. Пожалуйста, нажмите Застройщик > Вставить > Больше контроля. Смотрите скриншот:

8. в Больше элементов управления окна, нажмите Зарегистрироваться Custom кнопку, найдите и выберите один из загруженных файлов OCX с qr-кодом, а затем щелкните Откройте кнопка. Смотрите скриншот:

9. Нажмите OK кнопку, когда он возвращает Больше элементов управления для завершения обновления элемента управления штрих-кодом. Затем снова откройте книгу, содержащую значения ячеек, на основе которых вы создадите QR-коды.

10. Щелкните правой кнопкой мыши вкладку листа и щелкните Просмотреть код из контекстного меню, чтобы открыть Microsoft Visual Basic для приложений окно. Затем скопируйте и вставьте ниже код VAB в окно кода. И наконец нажмите другой + Q ключи для выхода из Microsoft Visual Basic для приложений окно.

Код VBA: создать QR-код в Excel

Sub setQR()
'Updated by Extendoffice 2018/8/22
    Dim xSRg As Range
    Dim xRRg As Range
    Dim xObjOLE As OLEObject
    On Error Resume Next
    Set xSRg = Application.InputBox("Please select the cell you will create QR code based on", "Kutools for Excel", , , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    Set xRRg = Application.InputBox("Select a cell to place the QR code", "Kutools for Excel", , , , , , 8)
    If xRRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    Set xObjOLE = ActiveSheet.OLEObjects.Add("BARCODE.BarCodeCtrl.1")
    xObjOLE.Object.Style = 11
    xObjOLE.Object.Value = xSRg.Text
    ActiveSheet.Shapes.Item(xObjOLE.Name).Copy
    ActiveSheet.Paste xRRg
    xObjOLE.Delete
    Application.ScreenUpdating = True
End Sub

11. Нажмите Застройщик > Вставить > Кнопка (элемент управления формой) как показано ниже.

12. Нарисуйте кнопку на текущем листе. В всплывающем Назначить макрос диалоговое окно, выберите установитьQR в поле, а затем щелкните OK кнопку.

13. Выключите Режим проектирования кликнув Застройщик > Режим проектирования.

14. Нажмите кнопку в открывшемся Kutools for Excel выберите ячейку, на основе которой будет создан QR-код, и нажмите OK.

15. В секунду Kutools for Excel выберите ячейку для размещения QR-кода. Смотрите скриншот:

Тогда QR-код будет немедленно вставлен в указанную ячейку. Повторите шаги с 14 по 15, чтобы завершить создание всех QR-кодов. Смотрите скриншот:

Легко создавайте сразу несколько QR-кодов на основе значений ячеек с помощью замечательного инструмента.

Честно говоря, описанный выше метод не прост в использовании, поскольку у него есть свои ограничения. Здесь настоятельно рекомендуется Вставить QR-код особенность Kutools for Excel. Эта функция может помочь вам быстро вставить QR-коды в большом количестве на основе указанных значений ячеек в Excel всего за несколько щелчков мышью. Пожалуйста, сделайте следующее, чтобы это сделать.

1. Во-первых, подготовьте свои значения, на основе которых вы хотите создать QR-код.

2. Нажмите Кутулс > Вставить > Вставить QR-код.

Советы: Если вы не можете найти объект по этому пути, нажмите другой + S клавиши одновременно, чтобы открыть Поиск функций Kutools коробка, введите вручную QR код в поле поиска, тогда вы увидите Вставить QR-код функция указана в списке, просто нажмите, чтобы активировать эту функцию. Смотрите скриншот:

Теперь панель «Вставить QR-код» отображается в правой части книги.

3. в Вставить QR-код панели необходимо настроить следующим образом.

4. Затем Kutools for Excel появится диалоговое окно, щелкните ОК.

5. Затем одновременно создаются QR-коды. Вам нужно вручную закрыть Вставить QR-код панель, если завершите создание всех QR-кодов.

Нажмите, чтобы узнать больше об этой функции …

Связанная статья:

• Как легко вставить штрих-код в ячейки с помощью шрифта штрих-кода в Excel?

Today we will be discussing about 3 Free QR Code generators for Microsoft Excel. These Generators gather info from a single cell (or even from multiple cells in case you are doing bulk generation) from the Excel Sheet and encode them into QR Codes which are then placed in the sheet itself. In a previous article we discussed 5 QR code generator for Google Sheets, you can check out that article here.

Let’s look at these free QR code generators for Microsoft Excel below:

1. QR4Office

This is Excel Add-in available from the Office Store. Click on ‘Insert’  and then click on ‘Add-ins  to search and install it from the store. Once installed, it appears in the ‘My Add-ins’ list in Office Add-ins and can be executed from there.

The type of Information to be encoded like URL, Email id, SMS message, Tel number etc. can be selected from the drop down. Specify the foreground and background colors of the QR Code, its size and error correction values. The QR code will be automatically generated in real time in the ‘Preview’ window. You can insert it into the sheet at the desired location by clicking on ‘Insert’ or Copy-Paste the QR Image in any cell that you desire.

Overall this is a good tool to Generate and Insert QR Codes in an Excel Spreadsheet. The Insert function doesn’t at times in which case you can Copy-Paste the QR Image in the sheet.

2. Generate QR Code using Free Excel Spreadsheet

This is a pre-built Excel Worksheet that you can download and customize to generate QR Codes for any information value that you desire. It contains a User Defined Function in VBA and uses Google Chart API to generate the QR Code.

Just type the information values to be encoded, in the cells A1 to A6. Next click on the drop down in Cell A10 and select the specific value for which you wish to generate a QR Code. In just a matter of seconds the value that you selected in the drop down will be converted to a QR Code using the Google Chart API.

Summarily, this is a good readymade worksheet to generate QR Codes in Excel. In order to increase the number of information values in the drop down, you need to understand and edit the VBA code.

Click here to download this Excel worksheet.

3. Generate QR Code using Free Excel Spreadsheet

Like the previous Generator this too is a ready-made Excel Worksheet that you can download and use to encode QR Codes for any information value that you wish.

Just type the information value to be encoded, in the cell A1. In just a few seconds, the QR Code will be seamlessly generated and displayed on the Excel spreadsheet in real time.

Every time you need to generate a new QR Code, you will have to change the information in the cell A1 with the new value and the QR Code will be updated dynamically.

All in all, this is an fair QR Code Generator for Excel with an inbuilt function to generate QR Codes in real time. It lacks any customizations of color or size of the QR image.

Click here to download this Excel worksheet.

If you need data values and their QR codes in one doc then QR Code Generators for Microsoft Excel does a great job.

4. QR Code Tracker

This cool QR Code Generator is a Microsoft Office Add-in that works for Excel 2016 or later versions of Office 365 and Excel 2013 or later in Windows. It allows you to easily generate multiple QR Codes from a range of values in your Excel sheet. Once the QR codes are generated, they are pasted to the same cells on your sheet that carried the original values.

Just click on the link provided below and fulfil the steps to install the Office Add-in. Once installed, QR Code Tracker will be directly accessible from the toolbar. Simply click on it, specify the Width and Height of the QR codes as required, select the range of cells in the Excel sheet that carry the values (data) and click the ‘Generate QR Code’ button. The QR codes will be generated almost instantly and pasted to the same cells that carried the data. The original values will also be displayed below each QR Code for easy reference.

In addition to QR Code generation, this tool can also use your webcam, read QR codes and transform them into data that is then stored on your Excel sheet.

Click here to install QR Code Tracker Add-in.

5. Using Excel built-in IMAGE function

This method does not make use of any 3^rd party software or add-in to generate QR codes in Excel. Excel has a built-in ‘Image’ function that inserts a picture in a cell by way of a URL using a very simple formula. The URL employs a QR Code API to generate a QR code image inside a cell in the spreadsheet.

The formula is as follows:

=IMAGE(“https://api.qrserver.com/v1/create-qr-code/?size=150×150&color=0000ff&bgcolor=FF0000&data=”&B3)

The above function uses the value in the cell B3 of the spreadsheet to generate a QR code in blue color (0000ff) with the background color as Red (FF0000) using the API. The QR code is inserted in the same cell where you use the Image function. You can change the values of the parameters to generate a colored QR code from any data in the spreadsheet.

Click here to find out the RGB values of various colors to be used in the ‘color’ and ‘bgcolor’ parameters. To learn about more parameters that this API uses, click here

You can spend some time with each of the website or method above and see which one of them best suits your requirements and needs. My personal vote will be cast in favor of QR Code Tracker due to its ease of use and the fact that it can take values directly from the spreadsheet and turn them into QR codes.

Уже несколько лет в Google Sheets существует функция IMAGE, позволяющая вставлять в ячейки листа картинки по ссылке из интернета. Что, впрочем, вполне естественно, поскольку Google-таблицы изначально заточены под работу онлайн — им сам бог велел такую возможность использовать.

У Excel же ничего подобного долго не было. И вот, наконец, осенью 2022 года Microsoft начала среди добровольцев-тестировщиков из программы Office Insider обкатку своего аналога —  новой функции ИЗОБРАЖЕНИЕ (IMAGE), также позволяющей вставлять по веб-ссылке картинки из интернета прямо в ячейки листа Microsoft Excel. В начале 2023 года эту функцию уже стали потихонечку разливать с обновлениями подписчикам Office 365 и недавно она, наконец, добралась и до меня. А значит я могу вам о ней рассказать на нескольких практических примерах.

Если же последней версии Office у вас пока (или уже) не предвидится, то не расстраивайтесь — в конце этой статьи я покажу как при помощи короткого макроса можно сделать упрощённый аналог этой функции уже сегодня.

Синтаксис функции ИЗОБРАЖЕНИЕ (IMAGE)

Тут всё предельно просто:

=ИЗОБРАЖЕНИЕ(источник; [замещающий_текст]; [изменение_размера]; [высота]; [ширина])

Первым и единственным обязательным аргументом новой функции должна быть текстовая ссылка на файл изображения из интернета. Причем это должна быть именно веб, а не локальная ссылка на файл на жестком или сетевом диске. Если доступа в интернет сейчас нет, то вместо картинки будет ошибка #СОЕДИНЕНИЕ! (если нет интернета) или #ЗАБЛОКИР! (если ваши настройки безопасности не дают загрузить картинку). Если вы хотите подстраховаться на такой случай, то вторым аргументом как раз можно ввести замещающий текст, который будет отображен вместо отсутствующей картинки.

Третий аргумент отвечает за размеры и пропорции изображения и может принимать значения:

• 0 — вписать изображение в ячейку с сохранением пропорций
• 1 — заполнить всю площадь ячейки не сохраняя пропорции картинки
• 2 — сохранить исходный размер изображения (тут оно запросто может вылезти за пределы ячейки)
• 3 — задать высоту и ширину изображения принудительно (тогда их надо обязательно прописать в четвертом и пятом аргументе функции)

Большим преимуществом новой функции является то, что картинка будет не просто вставлена на лист, а именно вписана в конкретную ячейку, т.е. будет вместе с ней двигаться, сжиматься и растягиваться. Это принципиально отличается от классической вставки картинок командой Вставка — Рисунки (Insert — Pictures), когда изображение и лист находились, по сути, в разных слоях и вы могли запросто случайно сдвинуть или даже удалить картинку после вставки. Здесь же всё чётко.

Также если щёлкнуть по вставленному функцией изображению правой кнопкой мыши и выбрать команду Показать сведения об изображении (Show image properties), то во всплывающем окне можно будет увидеть картинку в оригинальном разрешении.

Теперь давайте рассмотрим несколько вкусных примеров использования новой функции ИЗОБРАЖЕНИЕ на практике.

Пример 1. Создание штрих-кодов и QR-кодов

Этикетки для маркировки товаров, ценники, бланки, наклейки — всё это требует формирования штрих-кодов различного типа. Теперь для этого можно не использовать специальные программы, а реализовать всё в Excel.

Идём на сайт австрийской компании TEC-IT, где можно легко создать штрих-код любого стандарта с заданным содержимым:

Ссылка, по которой формируется изображение штрих-кода висит на кнопке Download и выглядит так:

_ttps://barcode.tec-it.com/en/Тип_штрихкода?data=Наше_содержимое_кода

Например, для распространенного типа Code-128, который кодирует строку «ABC-abc-1234» ссылка будет выглядеть как:

_ttps://barcode.tec-it.com/en/Code128?data=ABC-abc-1234

Так что просто подклеиваем справа от последнего знака «равно» наши артикулы, заворачиваем всё в функцию ИЗОБРАЖЕНИЕ и получаем автоматизированное создание штрих-кодов для любого количества товаров:

Красота.

Если нужен не линейный, а квадратный QR-код, то можно использовать другой бесплатный сайт — QR Code Generator:

Здесь ссылка для формирования QR-кода выглядит следующим образом:

ttps://api.qrserver.com/v1/create-qr-code/?data=Наши_данные&size=100×100

Опять же, подставляем туда адреса ячеек с исходными данными и получаем возможность массово клепать QR-коды в любом количестве:

Пример 2. Логотипы компаний

Ещё одна любопытная возможность — это автоматизированная загрузка логотипов известных компаний с помощью веб-сервиса https://logo.clearbit.com. Идея та же — подклеиваем адрес сайта нужной нам компании в конец ссылки — и получаем от сервиса изображение логотипа заданной компании, которое выводит на лист наша функция ИЗОБРАЖЕНИЕ:

Можно использовать в дашбордах по анализу рынка, для визуализации инвестиционного портфеля, в прайс-листах и т.д. — у кого на сколько фантазии хватит.

Пример 3. Нестандартные диаграммы

На сайте QuickChart.io можно в режиме онлайн-конструктора создавать разнообразные диаграммы по вашим данным и использовать их затем в ваших проектах. Нюанс в том, что помимо стандартных диаграмм (которые Excel и сам неплохо умеет строить), здесь есть несколько весьма симпатичных нестандартных, например, спидометры и прогресс-бары, диаграммы Санкей для визуализации связей и т.д.

Для получения, например, круговой диаграммы-шкалы прогресса, нам потребуется сформировать вот такую веб-ссылку:

ttps://quickchart.io/chart?c={type:’radialGauge’,data:{datasets:[{data:[Значение_параметра],backgroundColor:’green’}]}}

И визуализировать её затем с помощью нашей новой функции ИЗОБРАЖЕНИЕ (IMAGE):

Или можно, например, сформировать и вывести изображение вот такого нарядного спидометра со стрелкой:

Здесь ссылка чуть похитрее, т.к. в неё уже зашиты размеры трёх диапазонов шкалы и их цвета, а также положение стрелки:

ttps://quickchart.io/chart?c={ type: ‘gauge’, data: { datasets: [ { data: [10, 40, 60], value: Позиция_стрелки, backgroundColor: [‘green’, ‘gold’, ‘lightcoral’] } ] } } 

Названия цветов для заливки сегментов диаграммы можно взять из справочника.

Пример 4. Скриншоты сайтов

Если вы работаете с интернет-ресурсами или в области SEO-SMM, то вам пригодится возможность быстро формировать скриншоты заданных веб-страниц и вставлять их на лист Excel в виде изображений. Это можно сделать с помощью веб-сервиса https://mini.s-shot.ru, добавив к его адресу ссылку на интересующую страницу.

Подставляем её в нашу функцию ИЗОБРАЖЕНИЕ и получаем:

При большом количестве ссылок и скриншотов вся эта история может первый раз ощутимо подтормаживать — не пугайтесь.

Пример 5. Географические карты

Опять же, вставлять на лист интерактивные географические карты Excel уже давно умеет (через Вставка — Карты Bing, например), но можно это сделать и с помощью новой функции ИЗОБРАЖЕНИЕ, если найти веб-сервис, который по заданным координатам или названию населенного пункта будет формировать для нас скриншот карты в нужном месте. Обычно такие сервисы платные и используют API — специальный механизм запросов для общения с ними. 

Например, на одном из таких сайтов Geoapify.com ссылка для получения нужного фрагмента карты случае формируется из:

• долготы (longtitude)
• широты (latitude)
• коэффициента масштаба (zoom)
• ключа API — длинного буквенно-цифрового кода, который вы получаете в личном кабинете в качестве вашего личного идентификатора:

Обратите внимание, что в качестве разделителя между целой и дробной частью должна быть использована точка, поэтому дополнительно придётся использовать функцию ПОДСТАВИТЬ (SUBSTITUTE), чтобы её подменить.

Аналог функции IMAGE на VBA

Если приведенные выше примеры вас заинтриговали, но последней версии Excel у вас пока нет, то можно относительно легко склепать на коленке упрощенный аналог этой функции на Visual Basic. Только вставлять картинки он будет не по ссылке из интернета, а по пути к файлу с жесткого диска вашего ПК (что в некоторых случаях может быть даже предпочтительнее — интернет у нас не везде бывает).

Откройте редактор макросов сочетанием клавиш Alt+F11 или кнопкой Visual Basic на вкладке Разработчик (Developer). Вставьте новый пустой модуль командой меню Insert — Module и скопируйте туда текст следующего макроса:

Sub InsertPictures()
    Dim pic As Shape
    Dim cell as Range, imageCell as Range
    
    'проходим по выделенным непустым ячейкам
    For Each cell In Selection
        If Not IsEmpty(cell) Then
            Set imageCell = cell.Offset(0, 1)       'определяем ячейку справа для вставки картинки
        
            'вставляем картинку
            Set pic = ActiveSheet.Shapes.AddPicture(cell.Value, False, True, imageCell.Left, imageCell.Top, -1, -1)
                
            pic.LockAspectRatio = True              'фиксируем соотношение сторон
            pic.Height = imageCell.Height           'подгоняем по высоте под ячейку
        End If
    Next cell

End Sub

Теперь останется ввести в ячейки листа пути к файлам картинок, а затем выделить эти ячейки и запустить наш макрос командой Разработчик — Макросы (Developer — Macros) или сочетанием клавиш Alt+F8. Макрос пробежит по всем выделенным ячейкам и вставит в каждую картинку из указанного файла, вписав её в по размерам в каждую ячейку.

Картинки, правда, будут не внутри ячеек, как в случае с функцией IMAGE, а — как обычно — в отдельном слое, так что изменение высоты строк не приведёт к автоматической подгонке размеров изображений.

Если нужно будет подгонять размер картинок не по высоте, а по ширине ячеек, то замените в коде свойство Height на Width.

Ссылки по теме

• Выпадающий список с показом изображений
• Картинка в примечании к ячейке
• Создание печатной подложки в Excel