Większości z nas łatwo jest wstawiać do arkusza obrazy zapisane na komputerze. Zrób tak:

1. W arkuszu kliknij miejsce, w którym chcesz wstawić obrazy.

2. Następnie kliknij wstawka > Zdjęcia > To urządzeniezobacz zrzut ekranu:

3. W wyskoczył Wstaw zdjęcie otwórz folder zawierający obrazy, a następnie przytrzymaj Ctrl klawisz, aby wybrać obrazy, które chcesz wstawić, zobacz zrzut ekranu:

4. Następnie kliknij wstawka zaznaczone zdjęcia zostały wstawione do arkusza. Teraz możesz dostosować lub zmienić rozmiar obrazów do potrzebnych komórek, zobacz zrzut ekranu:

Jeśli masz program Excel 2013 lub nowszy, możesz wstawiać obrazy z sieci Web lub One Drive, wykonaj następujące czynności:

1. W arkuszu kliknij miejsce, w którym chcesz wstawić obrazy.

2. Następnie kliknij wstawka > Zdjęcia > Zdjęcia onlinezobacz zrzut ekranu:

3. Zostanie wyświetlone następujące okno. w Zdjęcia online wpisz to, czego szukasz w polu tekstowym, a następnie naciśnij Wchodzę klucz. Wszystkie odpowiednie zdjęcia są przeszukiwane jednocześnie, patrz zrzut ekranu:

4. Następnie wybierz żądane obrazy, a następnie kliknij wstawka przycisk. Po wstawieniu zdjęć zmień rozmiar lub dostosuj zdjęcia do potrzebnej pozycji.

Poniższy kod VBA może pomóc w wstawianiu wielu obrazów do komórek na podstawie rozmiaru komórki. Zrób tak:

1. Dostosuj rozmiar komórki, w której chcesz umieścić obraz, a następnie zaznacz komórki.

2. Następnie przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

3. Kliknij wstawka > Modułi wklej następujące makro w Moduł okno.

Kod VBA: wstaw wiele zdjęć na podstawie rozmiaru komórki

Sub InsertPictures()
'Updateby Extendoffice
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub

4. Następnie naciśnij F5 klucz do uruchomienia tego kodu. w Otwarte wybierz folder zawierający zdjęcia, następnie zaznacz obrazy, które chcesz wstawić, a następnie kliknij Otwarte przycisk, a wszystkie wybrane obrazy zostały wstawione do wyboru na podstawie rozmiaru komórki. Zobacz zrzut ekranu:

Jeśli nie znasz kodu VBA, tutaj możesz użyć funkcji zasilania - Importować zdjęcia of Kutools dla programu Excel. Dzięki tej przydatnej funkcji możesz szybko i łatwo importować wiele obrazów do komórek.

Po zainstalowaniu Kutools dla programu Excel, wykonaj następujące czynności:

1. Kliknij Kutools Plus > Import Eksport > Importować zdjęciazobacz zrzut ekranu:

2. W wyskoczył Importować zdjęcia w oknie dialogowym, wykonaj następujące czynności:

• Określ kolejność obrazów z rozwijanej listy Kolejność importu, którą możesz wybrać Wypełnij pionowo komórkę po komórce or Wypełnij poziomo komórkę za komórką;
• Następnie kliknij Dodaj , aby wybrać pliki obrazów lub folder, aby dodać obrazy do pliku Lista zdjęć;
• Kliknij Rozmiar importu przycisk w Importuj rozmiar obrazu w oknie dialogowym wybierz opcję Dopasowany rozmiar komórki opcja.
• 

3. Po zakończeniu ustawień kliknij import przycisk, a teraz kolejny Importować zdjęcia wyskoczył, określ komórki docelowe, do których zaimportujesz obraz, zobacz zrzut ekranu:

4. Następnie kliknij OK przycisk, wszystkie wybrane obrazy zostały wstawione, aby pasowały do ​​rozmiaru określonych komórek, jak pokazano na poniższym zrzucie ekranu:

Poniższy kod VBA może pomóc w szybkim wstawianiu wielu obrazów pasujących do ich nazw, wykonaj następujące czynności:

1. Przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij zrealizowaćt> Modułi wklej następujące makro w Moduł okno.

Kod VBA: wstaw wiele zdjęć pasujących do ich nazw

Sub InserPictureByName()
'Updateby Extendoffice
Dim xFDObject As FileDialog
Dim xStrPath, xStrPicPath As String
Dim xRgName, xRgInser, xRg, xRgI As Range
Dim xFNum As Integer
Set xFDObject = Application.FileDialog(msoFileDialogFolderPicker)
With xFDObject
    .Title = "Please select the folder:"
    .InitialFileName = Application.ActiveWorkbook.Path
    .Show
    .AllowMultiSelect = False
End With
On Error Resume Next
xStrPath = ""
xStrPath = xFDObject.SelectedItems.Item(1)
If xStrPath = "" Then
Exit Sub
End If
Set xRgName = Application.InputBox("Please select the cells contain the image name:", "Kutools for Excel", , , , , , 8)
If xRgName Is Nothing Then
    MsgBox "No cells are select, exit operation! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
Set xRgInser = Application.InputBox("Please select the cells to output the images", "Kutools for Excel", , , , , , 8)
If xRgInser Is Nothing Then
    MsgBox " No cells are select, exit operation.! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
For xFNum = 1 To xRgName.Count
    Set xRg = xRgName.Item(xFNum)
    Set xRgI = xRgInser.Item(xFNum)
    xStrPicPath = xStrPath & "\" & xRg.Text & ".png"
    If Not Dir(xStrPicPath, vbDirectory) = vbNullString Then
        With xRgI.Parent.Pictures.Insert(xStrPicPath)
            .Left = xRgI.Left
            .Top = xRgI.Top
            .ShapeRange.LockAspectRatio = msoFalse
            .ShapeRange.Height = 60
            .ShapeRange.Width = 60
        End With
    End If
Next
End Sub

Note: W powyższym kodzie możesz zmienić wysokość i szerokość obrazu w skryptach „.ShapeRange.Wysokość = 60",".ZakresKształtów.Szerokość = 60”Do twoich potrzeb.

3. Następnie naciśnij F5 klucz do uruchomienia tego kodu, aw otwartym oknie wybierz folder zawierający obrazy, które chcesz wstawić, zobacz zrzut ekranu:

4. A następnie kliknij OK przycisk, pojawi się okienko zachęty, wybierz komórki zawierające nazwy obrazów, zobacz zrzut ekranu:

5. Kliknij dalej OK i następuje kolejne okno zachęty, wybierz komórki, które chcesz wyprowadzić obrazy, zobacz zrzut ekranu:

6. Nareszcie kliknij OK, a obrazy zostały wstawione do komórek na podstawie ich nazw naraz, patrz zrzut ekranu:

Jeśli Kutools dla programu Excel, Z siedzibą w Dopasuj importowane obrazy możesz szybko i łatwo wstawiać obrazy na podstawie nazw obrazów.

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

1. Kliknij Kutools Plus > Import Eksport > Dopasuj importowane obrazyzobacz zrzut ekranu:

2. W wyskoczył Dopasuj importowany obraz w oknie dialogowym, wykonaj następujące operacje:

• Określ kolejność obrazów z rozwijanej listy Kolejność importu, którą możesz wybrać Wypełnij pionowo komórkę po komórce or Wypełnij poziomo komórkę za komórką;
• Następnie z Zakres dopasowania pole tekstowe, wybierz nazwy obrazów, na podstawie których chcesz wstawić obrazy;
• A następnie kliknij Dodaj , aby wybrać pliki obrazów lub folder, aby dodać obrazy do pliku Lista zdjęć;
• Następnie należy określić rozmiar obrazu. Proszę kliknąć Rozmiar importu przycisk w Importuj rozmiar obrazu W oknie dialogowym wybierz jeden rozmiar obrazu według potrzeb.
• 

3. Po zakończeniu ustawień kliknij import wybierz jedną komórkę lub listę komórek, aby zlokalizować obrazy z wyskakującego okienka Dopasuj importowane obrazy okno dialogowe, zobacz zrzut ekranu:

4. Następnie kliknij OKi wszystkie zdjęcia, których nazwy pasowały do ​​wartości komórek, zostały wstawione, patrz zrzut ekranu:

Zastosuj następujący kod VBA, aby wstawić obrazy na podstawie listy adresów URL.

1. Najpierw dostosuj rozmiar sąsiedniej komórki, w której chcesz zlokalizować obrazy.

2. Przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

3. Kliknij wstawka > Modułi wklej następujące makro w Moduł okno.

Kod VBA: wstaw zdjęcia z listy adresów URL

Sub URLPictureInsert()
'Updateby Extendoffice
Dim Pshp As Shape
Dim xRg As Range
Dim xCol As Long
On Error Resume Next
Application.ScreenUpdating = False
Set Rng = ActiveSheet.Range("A2:A5")
For Each cell In Rng
filenam = cell
ActiveSheet.Pictures.Insert(filenam).Select
Set Pshp = Selection.ShapeRange.Item(1)
If Pshp Is Nothing Then GoTo lab
xCol = cell.Column + 1
Set xRg = Cells(cell.Row, xCol)
With Pshp
.LockAspectRatio = msoFalse
If .Width > xRg.Width Then .Width = xRg.Width * 2 / 3
If .Height > xRg.Height Then .Height = xRg.Height * 2 / 3
.Top = xRg.Top + (xRg.Height - .Height) / 2
.Left = xRg.Left + (xRg.Width - .Width) / 2
End With
lab:
Set Pshp = Nothing
Range("A2").Select
Next
Application.ScreenUpdating = True
End Sub

Uwagi: W powyższym kodzie, A2: A5 to zakres komórek zawierających adresy URL, z których chcesz wyodrębnić obrazy, należy zmienić odniesienia do komórek zgodnie z potrzebami.

4. Następnie naciśnij F5 klucz do uruchomienia tego kodu, pasujące obrazy zostaną wyodrębnione z adresów URL do sąsiedniej kolumny i umieszczone w środku komórek, patrz zrzut ekranu:

Kutools dla programu Excel ma niesamowitą funkcję - Wstaw obrazy ze ścieżki (URL). Dzięki temu narzędziu odpowiednie obrazy zostaną wyodrębnione z adresów URL szybko i łatwo.

Po zainstalowaniu Kutools dla programu Excel, wykonaj następujące czynności:

1. Kliknij Kutools > wstawka > Wstaw obrazy ze ścieżki (URL)zobacz zrzut ekranu:

2. W wyskoczył Wstaw obrazy ze ścieżki (URL) w oknie dialogowym, ustaw następujące operacje:

• Wybierz listę komórek URL i zakres komórek, w których chcesz umieścić obrazy;
• Określ wymagany rozmiar obrazów z pliku Rozmiar obrazu
• 

3. A następnie kliknij Ok przycisk, a wszystkie obrazy zostały wyodrębnione z adresów URL, patrz zrzut ekranu:

Możesz zastosować następujący kod VBA do wstawiania obrazów na podstawie ścieżek plików obrazów.

1. Przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Moduł, a następnie wklej następujący kod w Moduł Okno.

Kod VBA: wstaw obrazy z szeregu ścieżek plików

Sub InsertPicFromFilePath()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xVal As String
    On Error Resume Next
    Set xRg = Application.InputBox("Please select file path cells:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xVal = xCell.Value
        If xVal <> "" Then
            ActiveSheet.Shapes.AddPicture xCell.Value, msoFalse, msoTrue, _
            xCell.Offset(0, 1).Left, xCell.Top, xCell.Height, _
            xCell.Height
        End If
    Next
    Application.ScreenUpdating = True
End Sub

3. Po wpisaniu powyższego kodu naciśnij F5 klucz do uruchomienia tego kodu, a następnie wyskakuje okienko zachęty, wybierz komórki ścieżki pliku, zobacz zrzut ekranu:

4. Następnie kliknij OK przycisk, wszystkie obrazy oparte na ścieżkach plików zostały wyświetlone w następnej kolumnie, jak pokazano na poniższym zrzucie ekranu:

Kutools dla programu Excel'S Wstaw obrazy ze ścieżki (URL) Funkcja może również pomóc w wyświetlaniu względnych obrazów ze ścieżki pliku.

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

1. Kliknij Kutools > wstawka > Wstaw obrazy ze ścieżki (URL), w wyskakującym oknie dialogowym określ zakres ścieżki pliku, zakres do wyprowadzania obrazów, rozmiar obrazu według potrzeb, zobacz zrzuty ekranu:

2. Po ustawieniu opcji kliknij Ok przycisk, obrazy zostaną wstawione do wybranych komórek naraz, patrz zrzut ekranu:

Tips: Czasami może się okazać, że obraz nakłada się na obszar danych arkusza roboczego, jak pokazano na poniższym zrzucie ekranu. Dzieje się tak, ponieważ obraz jest zbyt duży i nie zostanie zmieniony w celu automatycznego dopasowania do zakresu sekcji nagłówka lub stopki.

Aby rozwiązać ten problem, wystarczy zmienić rozmiar obrazu w nagłówku lub stopce, wykonaj następujące czynności:

1. Kliknij sekcję nagłówka lub stopki, w której znajduje się obraz, a następnie kliknij Formatuj zdjęcie pod Wnętrze tab, zobacz zrzut ekranu:

2, w Formatuj zdjęcie okno dialogowe w obszarze Rozmiar tab, dostosuj rozmiar obrazu, aby pasował do pola sekcji nagłówka lub stopki, patrz zrzut ekranu:

3. A następnie kliknij OK, otrzymasz taki wynik, jakiego potrzebujesz.

1. Otwórz arkusz roboczy, w którym chcesz wstawić obraz tła.

2. Następnie kliknij Układ strony > Tłozobacz zrzut ekranu:

3. W wyskoczył Wstaw zdjęcia okno, wybierz jedno zdjęcie z komputera, strony internetowej lub OneDrive, jak potrzebujesz, zobacz zrzut ekranu:

4. Teraz obraz został wstawiony do arkusza roboczego jako tło, jak pokazano na poniższym zrzucie ekranu:

Dzięki powyższej metodzie nie można zmienić przezroczystości wstawionego obrazu tła, więc jeśli kolor obrazu tła jest ciężki, odczytanie danych arkusza nie będzie wygodne. W tej sekcji omówię, jak wstawić przezroczysty obraz za komórkami.

1. Kliknij wstawka > Kształtyi wybierz kształt prostokąta, zobacz zrzut ekranu:

2. Następnie narysuj kształt tak duży, jak potrzebujesz w aktywnym arkuszu.

3. Po narysowaniu kształtu a Narzędzia do rysowania na wstążce zostanie wyświetlona karta, a następnie kliknij utworzony > Kontur kształtu > Bez konturuzobacz zrzut ekranu:

4. Następnie kliknij prawym przyciskiem myszy kształt i wybierz Formatuj kształt z menu kontekstowego, zobacz zrzut ekranu:

5. W rozszerzonym Formatuj kształt okienko, pod Wypełnij i wyrównaj wykonaj następujące czynności:

• Pod Wypełniać sekcja, wybierz Wypełnienie obrazem lub teksturą opcja;
• Kliknij wstawka przycisk od źródło obrazui wybierz jedno zdjęcie, które chcesz wstawić;
• Następnie dostosuj przezroczystość obrazu do swoich potrzeb z pliku Przezroczystysekcja y.
• 

6. Następnie zobaczysz kształt wypełniony obrazami, który wygląda jak obraz tła, jak pokazano na powyższym zrzucie ekranu.

Note: Po wstawieniu tego typu obrazu tła nie będzie można wprowadzać żadnego tekstu z zakresu obrazu.

Obie powyższe metody mają swoje ograniczenia, pierwsza metoda nie może zmienić przezroczystości obrazu, druga metoda nie pozwala na wprowadzanie tekstu do komórek wewnątrz obszaru obrazu. Aby rozwiązać te problemy, Kutools dla programu Excel'S Wstaw znak wodny funkcja może wyświadczyć ci przysługę.

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

1. Kliknij Kutools > wstawka > Wstaw znak wodnyzobacz zrzut ekranu:

2. W wyskoczył Wstaw znak wodny okno dialogowe, wybierz Znak wodny ze zdjęciem, A następnie kliknij Wybierz zdjęcie przycisk, aby wybrać obraz, który chcesz wstawić, a następnie określ skalę obrazu i zaznacz opcję Washout, zobacz zrzut ekranu:

3. Następnie kliknij Ok przycisk, obraz został wstawiony do arkusza jako obraz tła.

W programie Excel możesz użyć Skopiuj jako obrazek funkcja kopiowania i wstawiania zakresu komórek jako obrazu.

1. Wybierz zakres komórek, które chcesz skopiować i wstawić jako obraz.

2. Następnie kliknij Strona główna > Skopiuj > Skopiuj jako obrazekzobacz zrzut ekranu:

3. W wyskoczył Skopiuj zdjęcie dialog, wybierz Obrazek z utworzony sekcja, patrz zrzut ekranu:

4. Następnie kliknij OK przycisk, teraz wystarczy nacisnąć Ctrl + V wkleić obraz w dowolnym miejscu skoroszytu.

W programie Excel jest plik Aparat fotograficzny narzędzie, które może pomóc Ci zrobić zdjęcie dla wybranych danych, a następnie wkleić je jako obraz. Gdy oryginalne dane ulegną zmianie, skopiowany obraz zostanie zmieniony dynamicznie.

Najpierw powinieneś wyświetlić plik Aparat fotograficzny na wstążce, a następnie zastosuj go.

1. Kliknij Dostosuj pasek narzędzi Szybki dostęp ikonę, a następnie kliknij Więcej poleceń opcja, patrz zrzut ekranu:

2. W otwartym Opcje programu Excel w oknie dialogowym, wykonaj następujące operacje:

• Wybierz Wszystkie polecenia z Wybierz polecenia z upuścić;
• Następnie przewiń, aby wybrać Aparat fotograficzny z pola listy;
• A następnie kliknij Dodaj przycisk, aby dodać to narzędzie do pliku Dostosuj pasek narzędzi Szybki dostęp;
• Nareszcie kliknij OK aby zamknąć to okno dialogowe.
• 

3. I to Aparat fotograficzny narzędzie zostało wyświetlone na wstążce, zobacz zrzut ekranu:

4. Następnie wybierz zakres komórek, w których chcesz umieścić obraz.

5. A następnie kliknij Aparat fotograficzny narzędzie, a następnie przejdź do arkusza roboczego i kliknij w dowolnym miejscu, zakres danych zostanie wstawiony jako obraz, jak pokazano poniżej:

Jeśli Kutools dla programu Excel, Z siedzibą w Biblioteka zasobów możesz zapisać wybrane dane do pliku Biblioteka zasobów, a następnie użyj go jako obrazu lub tekstu na przyszłość, jak chcesz.

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

1. Wybierz zakres danych, który chcesz wstawić jako obraz.

2. Następnie kliknij Kutools > Nawigacjazobacz zrzut ekranu:

3. W rozszerzonym Nawigacja okienko, kliknij Biblioteka zasobów ikonę, a następnie kliknij Dodaj wybraną zawartość do biblioteki zasobów ikona, zobacz zrzut ekranu:

4, w Nowy wpis w bibliotece zasobów w oknie dialogowym określ nazwę tego elementu, a następnie wybierz grupę, do której chcesz dodać. Zobacz zrzut ekranu:

5. Następnie kliknij Dodaj przycisk, aby go dodać Biblioteka zasobów szkło. Jeśli chcesz wstawić ten zakres jako obraz, wystarczy kliknąć komórkę, aby zlokalizować obraz, a następnie znaleźć zapisany element z Biblioteka zasobów okienko i kliknij Wstaw jako > Obraz (EMF) z rozwijanej listy pozycji. Zakres danych zostanie wstawiony do arkusza jako obraz, patrz zrzuty ekranu:

Zwykle w programie Excel można utworzyć dynamiczny nazwany zakres, a następnie użyć połączonego obrazu do rozwiązania tego zadania w programie Excel.

1. Najpierw należy utworzyć dwie kolumny zawierające nazwy produktów i obrazy względne, patrz zrzut ekranu:

2. Następnie utwórz listę rozwijaną dla wartości komórek. Kliknij komórkę, aby wyświetlić listę rozwijaną, a następnie kliknij Dane > Walidacja danych > Walidacja danychzobacz zrzut ekranu:

3. W wyskoczył Walidacja danych okno dialogowe w obszarze Ustawienia kartę, wybierz Lista z Dopuszczać listy rozwijanej, a następnie wybierz komórki, które chcesz utworzyć listę rozwijaną z pliku Źródło pole tekstowe, patrz zrzut ekranu:

4. Kliknij OK, a rozwijana lista z wartościami komórek została utworzona, wybierz jeden element z rozwijanej listy, zobacz zrzut ekranu:

5. Następnie kliknij Wzory > Zdefiniuj nazwęzobacz zrzut ekranu:

6, w Nowe imie w oknie dialogowym, wykonaj następujące operacje:

• Wprowadź nazwę o nazwie myimage do pliku Imię pole tekstowe;
• Następnie skopiuj i wklej tę formułę: =INDEX(Sheet11!$A$2:$B$6,MATCH(Sheet11!$E$2,Sheet11!$A$2:$A$6,0),2) w polu tekstowym Odnosi się do.

Note: W powyższym wzorze:

• Arkusz11! 2 $ A: 6 $ B: to arkusz roboczy i zakres zawierający wartości i obrazy, których chcesz użyć;
• Arkusz11! $ E $ 2: to komórka w arkuszu, w której utworzono listę rozwijaną;
• Arkusz11! 2 $ A $: 6 $ A $ XNUMX: to lista komórek, na podstawie których utworzono listę rozwijaną;
• Zmienna liczba 2 to numer kolumny zawierającej obrazy. Jeśli Twoje obrazy znajdują się w kolumnie C, wpisz 3.

7. A następnie kliknij OK przycisk, a następnie skopiuj i wklej odpowiedni obraz na podstawie wartości komórki w E2 z oryginalnego zakresu do komórki F2, patrz zrzut ekranu:

8. Następnie wybierz obraz w komórce F2, a następnie wprowadź tę formułę = myimage (mój obraz to nazwa zakresu utworzona w kroku 6) na pasku formuły, patrz zrzut ekranu:

9. Po wprowadzeniu wzoru naciśnij Wchodzę klucz, a teraz, gdy wybierzesz jedną pozycję z rozwijanej listy, jej obraz względny zostanie natychmiast wyświetlony. Zobacz zrzut ekranu:

Powyższa metoda może być trudna dla większości z nas, tutaj przedstawię przydatną funkcję - Lista rozwijana obrazów of Kutools dla programu Excel, dzięki temu użytecznemu narzędziu możesz utworzyć wiele list rozwijanych z ich względnymi obrazami za pomocą zaledwie kilku kliknięć.

Po zainstalowaniu Kutools dla programu Excel, wykonaj następujące czynności:

1. Najpierw należy utworzyć dwie kolumny zawierające nazwy produktów i obrazy względne w arkuszu.

2. A następnie kliknij Kutools > Lista rozwijana > Lista rozwijana obrazówzobacz zrzut ekranu:

3, w Lista rozwijana obrazów W oknie dialogowym, jeśli utworzyłeś kolumny wartości komórek i obrazów, zignoruj ​​krok 1, a następnie wybierz oryginalne dane i zakres obrazu oraz zakres wyjściowy, patrz zrzut ekranu:

4. A następnie kliknij Ok przycisk, rozwijane listy z obrazami zostały utworzone w wybranych komórkach, a po wybraniu elementu z rozwijanej komórki, odpowiedni obraz zostanie wyświetlony od razu, patrz poniżej demo:

Zwykle możesz użyć Zapisz jako funkcja, aby zapisać wszystkie obrazy ze skoroszytu, wykonaj następujące czynności:

1. Kliknij filet > Zapisz jako, W Zapisz jako określ folder, w którym zostaną umieszczone wyeksportowane pliki, a następnie wybierz Strona internetowa (*. Htm; *. Html) z Zapisz jako Wpisz listę rozwijaną, zobacz zrzut ekranu:

2. A następnie kliknij Zapisz przycisk, przejdź do określonego folderu, zobaczysz dwa pliki, jeden to plik w formacie HTML, a drugi to folder zawierający obrazy, wykresy lub inne obiekty ze skoroszytu. Zobacz zrzut ekranu:

3. Następnie możesz przeciągnąć tylko obrazy do innego folderu, zgodnie z potrzebami.

Note: Używając tego Zapisz jako funkcja, każde zdjęcie zostanie wyświetlone dwa razy, jedno jest mniejsze, a drugie większe, dzięki czemu można zapisać obrazy w wyższej rozdzielczości zgodnie z potrzebami.

Aby zapisać wszystkie obrazy z pliku Excel, możesz również zmienić rozszerzenie pliku na RAR. Zrób tak:

1. Zmień rozszerzenie pliku xlsx do rar jak pokazano na poniższym zrzucie ekranu:

2. Następnie rozpakuj plik, a zobaczysz 3 foldery i 1 plik w folderze, zobacz zrzut ekranu:

3. Następnie kliknij, aby otworzyć plik xl folder, a następnie otwórz plik głoska bezdźwięczna folder, zobaczysz, że wszystkie obrazy są tutaj przechowywane bez duplikatów, zobacz zrzut ekranu:

Jeśli Kutools dla programu Excel, Z siedzibą w Eksportuj grafikę możesz szybko wyeksportować określone obiekty, takie jak obrazy, wykresy, kształty do formatu obrazu, zgodnie z potrzebami.

Po zainstalowaniu Kutools dla programu Excel, wykonaj następujące czynności:

1. Kliknij Kutools Plus > Import Eksport > Eksportuj grafikęzobacz zrzut ekranu:

2, w Eksportuj grafikę w oknie dialogowym wykonaj następujące operacje:

• Dodaj Zdjęcia opcja z rodzaje Lista rozwijana;
• Określ folder do zapisania eksportowanych obrazów;
• Następnie kliknij listę rozwijaną z pliku Format eksportu aby wybrać jeden format dla swoich zdjęć.
• 

3. Nareszcie kliknij Ok przycisk, wszystkie obrazy w bieżącym skoroszycie zostały zapisane w określonym folderze, zobacz zrzut ekranu:

Aby usunąć obrazy z bieżącego arkusza roboczego, poniższy kod VBA może ci pomóc, wykonaj następujące czynności:

1. Aktywuj arkusz zawierający obrazy, które chcesz usunąć.

2. Przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

3. Kliknij wstawka > Modułi wklej następujące makro w Moduł Okno.

Kod VBA: Usuń wszystkie zdjęcia z bieżącego arkusza roboczego

Sub DeleteAllPics()
'Updateby Extendoffice
Dim Pic As Object
For Each Pic In ActiveSheet.Pictures
Pic.Delete
Next Pic
End Sub

4. Następnie naciśnij F5 klucz do uruchomienia tego kodu, a wszystkie obrazy w aktywnym arkuszu zostaną usunięte jednocześnie.

Jeśli chcesz usunąć obrazy tylko z zakresu komórek, oto inny prosty kod, który może ci pomóc.

1. Przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujące makro w Moduł Okno.

Kod VBA: usuń obrazy z szeregu komórek

Sub DeletePic()
'Updateby Extendoffice
    Dim xPicRg As Range
    Dim xPic As Picture
    Dim xRg As Range
    Application.ScreenUpdating = False
    Set xRg = Range("B4:C6")
    For Each xPic In ActiveSheet.Pictures
        Set xPicRg = Range(xPic.TopLeftCell.Address & ":" & xPic.BottomRightCell.Address)
        If Not Intersect(xRg, xPicRg) Is Nothing Then xPic.Delete
    Next
    Application.ScreenUpdating = True
End Sub

Note: W powyższym kodzie, B4: C6 to zakres, z którego chcesz usunąć zdjęcia.

3. Następnie naciśnij F5 klucz do uruchomienia tego kodu, a zdjęcia w wybranym zakresie zostaną natychmiast usunięte, patrz zrzuty ekranu:

Jeśli Kutools dla programu Excel, Z siedzibą w Usuń ilustracje i obiekty funkcja, możesz szybko usunąć obrazy z arkusza roboczego, niektórych wybranych arkuszy lub całego skoroszytu.

Po zainstalowaniu Kutools dla programu Excel, wykonaj następujące czynności:

1. Kliknij Kutools > Usuń > Usuń ilustracje i obiektyzobacz zrzut ekranu:

2. W otwartym Usuń ilustracje i obiekty okno dialogowe, zaznacz Zdjęcia z Usuń , a następnie określ zakres, z którego chcesz usunąć obrazy w obszarze zaglądać sekcja, patrz zrzut ekranu:

3. Następnie kliknij Ok przycisk, a wszystkie obrazy zostaną usunięte z arkusza roboczego, wybranych arkuszy roboczych lub całego skoroszytu, jak określono.