Vi kan søke VB makroer for å endre størrelsen på et valgt bilde til å passe en enkelt celle, men ikke manuelt endre størrelsen på et bilde bredde og høyde. Du kan gjøre det med følgende:
Trinn 1: Sett bildene inn i et regneark, og velg et bilde som du vil endre størrelsen til å passe en enkelt celle
<. p> Trinn 2: Hold nede ALT + F11-tastene, og det åpner Microsoft Visual Basic for Applications vindu
Trinn 3:. Klikk på Insert > Modul, og lim inn følgende makroen i modulen Window
VBA:.. Resize et valgt bilde for å passe en celle
Public Sub FitPic () On Error GoTo NOT_SHAPEDim PicWtoHRatio Som SingleDim CellWtoHRatio Som SingleWith SelectionPicWtoHRatio =. Bredde /.HeightEnd WithWith Selection.TopLeftCellCellWtoHRatio = .Width /.RowHeightEnd WithSelect sak PicWtoHRatio /CellWtoHRatioCase Is > 1with Selection.Width = .TopLeftCell.Width.Height = .Width /PicWtoHRatioEnd WithCase ElseWith Selection.Height = .TopLeftCell.RowHeight.Width = .Height * PicWtoHRatioEnd WithEnd SelectWith Selection.Top = .TopLeftCell.Top.Left = .TopLeftCell.LeftEnd WithExit SubNOT_SHAPE: MsgBox "Velg et bilde før du kjører denne makroen." End Sub
Trinn 4:. Trykk F5 for å kjøre denne makroen
Trinn 5: Gjenta trinnene over for å endre størrelsen på andre bilder til å passe enkelt celle.
Nå er alle innsatte bildene er endret størrelse og passer inn i cellene. Se følgende skjermbilde:
Merk: Du kan endre størrelsen på bare ett bilde en gang. Hvis du velger mer enn ett bilde en gang, vil en dialogboks med en advarsel dukke opp.
Resize inn bilder for å passe celler med Kutools for Excel
Hvis du har Kutools for Excel installert, kan du anvende sin Import Pictures verktøy for å endre størrelsen på alle bildene for å passe celler eller med fast høyde under sette inn bilder.
Kutools for Excel omfatter mer enn 120 praktiske Excel-verktøy. Gratis å prøve uten begrensning i 30 dager. Få den nå
Trinn 1:. Velg celleområdet du vil sette inn bilder, og klikk på Enterprise > Import /Export > Importer bilder. Se følgende skjermbilde:
Trinn 2: I Import Pictures dialogboksen velger innførings orden i rullegardinlisten, og klikk på Legg til-knappen for å legge til bilder du trenger fra fil eller mappen, og klikk deretter Størrelse knappen. Se skjermbilde:
Trinn 3: Kontroller matchende celle størrelse alternativet. Klikk deretter på OK > Importere for å lukke dialogbokser. Se skjermbilde:
Nå kan du se bildene er satt til å passe cellene
. Merk: Du kan også angi cellen høyde og Bredden i trinn 3 for å endre størrelsen på bildene.
Hvis du vil vite mer om dette Importer bilde funksjonen, kan du gå hit.