Come ridimensionare le immagini per adattarle alle celle in Excel?
Le immagini normalmente inserite fluttuano sulle celle e la maggior parte delle volte un'immagine copre molte celle. Se un foglio di lavoro ha un numero elevato di immagini, potresti voler inserire ciascuna immagine in una singola cella. Ma come affrontarlo? In realtà, ci sono diversi modi complicati per aiutarci a ridimensionare le immagini per adattarle rapidamente alle dimensioni delle celle.
Ridimensiona un'immagine selezionata per adattarla a una singola cella con VB Macro
Ridimensiona le immagini inserite per adattarle alle celle con Kutools per Excel
Ridimensiona un'immagine selezionata per adattarla a una singola cella con VB Macro
Possiamo applicare le macro VB per ridimensionare un'immagine selezionata per adattarla a una singola cella, ma non ridimensionare manualmente la larghezza e l'altezza di un'immagine. Puoi farlo con i seguenti passaggi:
Passaggio 1: inserisci le immagini in un foglio di lavoro e seleziona un'immagine che ridimensionerai per adattarla a una singola cella.
Passo 2: tieni premuto il tasto ALT + F11 chiavi e apre il file Microsoft Visual Basic, Applications Edition finestra.
Passo 3: fare clic inserire > Modulie incolla la seguente macro nella finestra del modulo.
VBA: ridimensiona un'immagine selezionata per adattarla a una cella.
Public Sub FitPic()
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 "Select a picture before running this macro."
End SubPasso 4: premere il tasto F5 chiave per eseguire questa macro.
Passaggio 5: ripetere i passaggi precedenti per ridimensionare altre immagini per adattarle a una singola cella.
Ora tutte le immagini inserite vengono ridimensionate e si adattano alle celle. Vedi lo screenshot seguente:
Note:: È possibile ridimensionare solo un'immagine una volta. Se selezioni più di un'immagine una volta, verrà visualizzata una finestra di dialogo di avviso.
Ridimensiona le immagini inserite per adattarle alle celle con Kutools per Excel
Se si dispone di Kutools for Excel installato, puoi applicarlo Importa immagini strumento per ridimensionare tutte le immagini per adattarle alle celle o con altezza fissa durante l'inserimento delle immagini.
Kutools for Excel include più di 300 utili strumenti Excel. Prova gratuita senza limitazioni per 30 giorni. Get it Now.
Passaggio 1: selezionare le celle dell'intervallo in cui si desidera inserire le immagini e fare clic su Impresa >Import / Export > Importa immagini. Vedi lo screenshot seguente:
Passaggio 2: in Importa immagini finestra di dialogo, selezionare l'ordine di inserimento nell'elenco a discesa e fare clic su Aggiungi pulsante per aggiungere le immagini necessarie dal file o dalla cartella, quindi fare clic su Taglia pulsante. Vedi screenshot:
Passo 3: controllare Dimensione della cella corrispondente opzione. Quindi fare clic Ok > Importare per chiudere le finestre di dialogo. Vedi screenshot:
Ora puoi vedere che le immagini sono inserite per adattarsi alle celle.
Note:: Puoi anche specificare l'altezza e la larghezza della cella nel passaggio 3 per ridimensionare le immagini.
Se vuoi saperne di più su questo Importa immagine caratteristica, visita qui.
Articolo correlato:
Come ridimensionare più celle per adattare rapidamente le immagini sopra di esse in Excel?
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
