Вмъкване на снимки в Excel В тази статия ще ви покажа няколко начина за автоматично вмъкване на снимки в Excel, които се оразмеряват така, че да се поберат в клетките.

За да стане по-ясно, ще използвам лист, който представя информация за цветята в един магазин. Има 3 колони, които са Име, Цена, и Изображение .

Работна тетрадка за практикуване

Начини за автоматично вмъкване на снимки в Excel, за да се поберат в клетките

1. Как да вмъкнете снимка в клетка на Excel

Първо изберете клетката, в която искате да за вмъкване на изображението . Сега, отворете Вмъкване на tab>> Отидете на Илюстрации >> изберете Снимки >> след това изберете Това устройство (ако снимките се съхраняват в същото устройство)

Сега от устройството, в което се съхраняват изображенията, изберете снимката, която искате да Вмъкване. Накрая щракнете върху Вмъкване.

Картинката е вмъкната, но не е разположена в клетката. За да разположите картинката в клетката, трябва да промените размера на картинката.

Прочетете още: Excel VBA: Вмъкване на картина от папка (3 метода)

2. Промяна на размера на снимка

I. Използване на бърза клавишна комбинация за промяна на размера

Сега изберете снимката, чийто размер искате да промените.

Задръжте Клавиш ALT и плъзнете картинката, докато се побере в клетката. Клавиш ALT побира картинката в цялата клетка.

Или можете да използвате Клавиш SHIFT за да промените размера на картината, просто я поставете в клетка.

II. Използване на лентата за промяна на размера

Изберете снимката, чийто размер искате да промените, след което отидете на Формат на картината .

Сега намалете или увеличете Височина и Ширина от Формат на картината .

Намалих и двете Височина и Ширина за да го поберете в клетка.

3. Автоматично напасване на снимки в клетката с VBA

Първо отворете Разработчик tab>> след това изберете Visual Basic.

Сега се отваря нов прозорец на Microsoft Visual Basic за приложения ще се появи.

След това отворете Вмъкване на tab>> след това изберете Модул.

Тук Модул е отворена.

Сега напишете кода за AutoFit снимки в модула.

 Public Sub AutoFitPic() On Error GoTo NOT_SHAPE Dim PicWtoHRatio As Single Dim CellWtoHRatio As Single With Selection PicWtoHRatio = .Width / .Height End With With Selection.TopLeftCell CellWtoHRatio = .Width / .RowHeight End With Select Case PicWtoHRatio / CellWtoHRatio Case Is> 1 With Selection .Width = .TopLeftCell.Width .Height = .Width / PicWtoHRatio End With Case Else With Selection.Height = .TopLeftCell.RowHeight .Width = .Height * PicWtoHRatio End With End Select With Selection .Top = .TopLeftCell.Top .Left = .TopLeftCell.Left End With Exit Sub NOT_SHAPE: MsgBox "Изберете картина, преди да стартирате този макрос." End Sub 

След това, Запазете кода и се върнете в работния лист. След това отворете Вмъкване на tab>> Отидете на Илюстрации >> изберете Снимки >> след това изберете Това устройство

Сега от устройството, в което се съхраняват изображенията, изберете снимката, която искате да Вмъкване. Накрая щракнете върху Вмъкване.

Картината ще бъде вмъкнат в избраната клетка.

Вече отворен Вижте таб>> след това отидете в Макроси >> изберете Преглед на макроси.

Сега, а диалогов прозорец ще се появи прозорец. Той показва запазените Име на макроса. Сега изберете AutoFitPic и работния лист, в който искам да приложа Макроси. Накрая щракнете върху Работете.

Вмъкнатата снимка ще AutoFit в клетката.

След вмъкване на останалите снимки и след стартиране на AutoFitPic Macro поставите тези снимки в съответните клетки.

Заключване на картината с клетката в Excel

Заключване на картината е необходим, когато искаме да изпълняваме някакви функции с лист, в който са вмъкнати снимки.

За да заключите снимка, изберете снимката, след което щракнете с десния бутон на мишката върху дясната страна на мишката. След това изберете Формат на картината

От Формат на картината >> изберете Размер & Свойства >> след това изберете Свойства. Отбележете опцията Преместване и оразмеряване с клетки.

Следваше Формат на картината за останалите снимки Филтър.

Първо, отворете Данни tab>> след това изберете Филтър.

След прилагане на Филтър сега изберете заглавие на колона, след което щракване с десния бутон на мишката за да видите опциите за сортиране.

Избрах Черешов цвят и Роза.

Сега тя ще покаже избраните редове без припокриващи се изображения, тъй като вече съм заключил изображенията до Преместване и оразмеряване с клетки.

Заключение

В тази статия обясних няколко начина за автоматично вмъкване на снимки в Excel, за да се поберат в клетките. Надявам се, че тези различни подходи ще ви помогнат автоматично да поберете снимки в клетка. За всякакъв вид предложения, идеи, обратна връзка сте добре дошли. Чувствайте се свободни да коментирате по-долу.