Come estrarre immagini dai commenti in Excel?

In Excel, puoi inserire un'immagine in un commento facilmente, ma hai mai considerato di estrarre le immagini dalle caselle dei commenti nelle celle o in una cartella specifica? In questo articolo, parlerò di come estrarre le immagini dai commenti.

Estrai e salva immagini dai commenti in una cartella con la funzione Salva con nome

Estrai immagini dai commenti nelle celle con il codice VBA

Estrai e salva immagini dai commenti in una cartella con la funzione Salva con nome

Se desideri estrarre e salvare le immagini dai commenti in una cartella, procedi nel seguente modo:

1. Copia il foglio che contiene i commenti con le immagini che desideri salvare in una nuova cartella di lavoro vuota.

2. Quindi fai clic su File > Salva con nome per salvare questa nuova cartella di lavoro in formato Pagina Web in una cartella specifica, vedi screenshot:

3. Quindi fai clic sul pulsante Salva per salvare il file, poi vai alla cartella specifica per visualizzare le immagini salvate; nella cartella sono stati generati due file, uno è il file html e l'altro è una cartella che contiene tutte le immagini e altri file, vedi screenshot:

Sblocca la Magia di Excel con Kutools AI

• Esecuzione Intelligente: Esegui operazioni sulle celle, analizza i dati e crea grafici — tutto guidato da semplici comandi.
• Formule Personalizzate: Genera formule su misura per ottimizzare i tuoi flussi di lavoro.
• Codifica VBA: Scrivi e implementa codice VBA senza sforzo.
• Interpretazione delle Formule: Comprendi facilmente formule complesse.
• Traduzione del Testo: Superare le barriere linguistiche all'interno dei tuoi fogli di calcolo.

Potenzia le tue capacità di Excel con strumenti alimentati dall'IA. Scarica Ora ed esperisci un'efficienza mai vista prima!

Estrai immagini dai commenti nelle celle con il codice VBA

Se desideri estrarre le immagini dai commenti nelle celle come mostrato nello screenshot seguente, posso creare un codice VBA per te, procedi nel seguente modo:

1. Tieni premuti i tasti ALT + F11 per aprire la finestra di Microsoft Visual Basic for Applications.

2. Fai clic su Inserisci > Modulo e incolla il seguente codice nella finestra del Modulo.

Codice VBA: Estrai immagini dai commenti nelle celle:

Sub CommentPictures()
'Updateby Extendoffcie
    Dim cmt As Comment
    Dim xRg As Range
    Dim visBool As Boolean
    Dim cmtTxt As String
    Dim jpgPath As String
    Dim shpHeight As Integer, shpWidth As Integer
    Application.ScreenUpdating = False
    For Each cmt In ActiveSheet.Comments
        With cmt
            cmtTxt = .Text
            shpHeight = .Shape.Height
            shpWidth = .Shape.Width
            .Text Text:="" & Chr(10) & ""
            visBool = .Visible
            .Visible = True
            On Error Resume Next
            Set xRg = .Parent.Offset(0, 1)
            .Shape.CopyPicture _
              Appearance:=xlScreen, Format:=xlPicture
            xRg.PasteSpecial
            Selection.ShapeRange.LockAspectRatio = msoFalse
            Selection.Width = xRg.Width
            Selection.Height = xRg.Height
            .Visible = visBool
            .Text Text:=cmtTxt
        End With
    Next cmt
    Application.ScreenUpdating = True
End Sub

3. Quindi premi il tasto F5 per eseguire questo codice, e tutte le immagini dei commenti nel foglio di lavoro corrente verranno estratte nelle celle della colonna successiva, vedi screenshot: