Paveikslėlių įterpimas programoje "Excel lengva, tačiau sunku paveikslėlius sutalpinti į ląstelę. Šiame straipsnyje parodysiu kelis būdus, kaip įterpti paveikslėlius į "Excel", kad jie automatiškai tilptų į ląstelę.

Kad būtų aiškiau, naudosiu lapą, kuriame pateikiama informacija apie parduotuvės gėles. Yra 3 stulpeliai, tai Pavadinimas, kaina, ir Vaizdas .

Praktikos sąsiuvinis

Būdai, kaip įterpti paveikslėlius į "Excel", kad jie automatiškai tilptų į langelius

1. Kaip įterpti paveikslėlį į "Excel" ląstelę

Pirmiausia pasirinkite ląstelę, kurioje norite įterpti paveikslėlį . Dabar atidarykite Įdėkite skirtukas>> Eiti į Iliustracijos >> pasirinkti Nuotraukos >> tada pasirinkite Šis įrenginys (jei nuotraukos saugomos tame pačiame įrenginyje)

Dabar įrenginyje, kuriame saugomi vaizdai, pasirinkite norimą paveikslėlį. Įdėkite. Galiausiai spustelėkite Įdėkite.

Paveiksliukas įterptas, bet netelpa į langelį. Kad paveikslėlis tilptų į langelį, turite pakeisti jo dydį.

Skaityti daugiau: "Excel VBA": paveikslėlio įterpimas iš aplanko (3 metodai)

2. Paveikslėlio dydžio keitimas

I. Naudojant klaviatūros spartųjį klavišą dydžiui keisti

Dabar pasirinkite paveikslėlį, kurio dydį norite pakeisti.

Laikykite ALT klavišas ir vilkite paveikslėlį, kol jis tilps į langelį. ALT klavišas paveikslėlis telpa į visą langelį.

Arba galite naudoti SHIFT klavišas norėdami pakeisti paveikslėlio dydį, tiesiog įdėkite jį į langelį.

II. Lentelės naudojimas keičiant dydį

Pasirinkite paveikslėlį, kurio dydį norite pakeisti, tada eikite į Paveikslėlio formatas .

Dabar sumažinkite arba padidinkite Aukštis ir Plotis iš Paveikslėlio formatas .

Sumažinau tiek Aukštis ir Plotis kad tilptų į langelį.

3. Automatinis paveikslėlių pritaikymas ląstelėje naudojant VBA

Pirmiausia atidarykite Kūrėjas skirtukas>> tada pasirinkite "Visual Basic".

Dabar naujas langas "Microsoft Visual Basic for Applications pasirodys.

Tada atidarykite Įdėkite skirtukas>> tada pasirinkite Modulis.

Čia Modulis yra atidarytas.

Dabar parašykite kodą "AutoFit" modulyje esantys paveikslėliai.

 Public Sub AutoFitPic() On Error GoTo NOT_SHAPE Dim PicWtoHRatio As Single Dim CellWtoHRatio As Single With Selection PicWtoHRatio = .Width / .Height End With 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 With End Select With Selection .Top = .TopLeftCell.Top .Left = .TopLeftCell.Left End With Exit Sub NOT_SHAPE: MsgBox "Pasirinkite paveikslėlį prieš paleisdami šį makrokomandą." End Sub 

Po to, Išsaugoti kodą ir grįžkite į darbalapį. Tada atidarykite Įdėkite skirtukas>> Eiti į Iliustracijos >> pasirinkti Nuotraukos >> tada pasirinkite Šis įrenginys

Dabar įrenginyje, kuriame saugomi vaizdai, pasirinkite norimą paveikslėlį. Įdėkite. Galiausiai spustelėkite Įdėkite.

Paveikslas bus įdėta į pasirinktą langelį.

Dabar atidaryta Peržiūrėti skirtukas>> tada eikite į Makrokomandos >> pasirinkti Peržiūrėti makrokomandas.

Dabar, a dialogo langas pasirodys langas. Jame rodomas išsaugotas Makro pavadinimas. Dabar pasirinkite "AutoFitPic" ir darbalapį, kuriame noriu taikyti Makrokomandos. Galiausiai spustelėkite Bėgti.

Įterptas paveikslėlis bus "AutoFit" į ląstelę.

Įdėjus likusias nuotraukas ir paleidus "AutoFitPic Macro pritaikė šiuos paveikslėlius atitinkamose ląstelėse.

Paveikslėlio užrakinimas "Excel" ląstelėje

Paveikslėlio užraktas reikia, kai norime atlikti kokias nors funkcijas su lapu, į kurį įterpti paveikslėliai.

Jei norite užrakinti paveikslėlį, pasirinkite paveikslėlį, tada dešiniuoju pelės klavišu spustelėkite dešinėje pelės pusėje. Tada pasirinkite Formatas Nuotrauka

Iš Formatas Nuotrauka >> pasirinkti Dydis & amp; Savybės >> tada pasirinkite Savybės. Pažymėkite parinktį Perkelkite ir nustatykite dydį su ląstelėmis.

Sekė Formatas Nuotrauka likusiems paveikslėliams atlikti Filtras.

Pirmiausia atidarykite Duomenys skirtukas>> tada pasirinkite Filtras.

Pritaikius Filtras dabar pasirinkite bet kurio stulpelio antraštę, tada dešiniuoju pelės klavišu norėdami pamatyti rūšiavimo parinktis.

Pasirinkau Vyšnių žiedai ir Rožė.

Dabar bus rodomos pasirinktos eilutės be persidengiančių paveikslėlių, nes aš jau užrakinau paveikslėlius į Perkelkite ir nustatykite dydį su ląstelėmis.

Išvada

Šiame straipsnyje paaiškinau kelis būdus, kaip įterpti paveikslėlius į "Excel" automatiškai dydžio, kad tilptų į ląsteles. Tikiuosi, kad šie skirtingi metodai padės jums automatiškai pritaikyti paveikslėlius į ląstelę. Bet kokio pobūdžio pasiūlymų, idėjų, atsiliepimų esate labai laukiami. Drąsiai komentuokite žemiau.