Tipp: Andere Sprachen sind Google-Übersetzungen. Sie können die English Version dieses Links.
Einloggen
x
or
x
x
Registrieren
x

or

Wie fügt man mehrere Bilder mit Dateiname in Word-Dokument ein?

In Word-Dokument können Sie mithilfe der Funktion Einfügen schnell mehrere Bilder gleichzeitig einfügen. Manchmal müssen Sie jedoch beim Einfügen der Bilder den Dateipfad und die Namen als Beschriftung einfügen. Wie können Sie mit dieser Aufgabe in Word-Dateien umgehen?

Fügen Sie mehrere Bilder mit Dateiname mithilfe von VBA-Code ein

Fügen Sie mehrere Bilder mit Dateiname mithilfe von Kutools für Word ein


Fügen Sie mehrere Bilder mit Dateiname in Word-Dokument ein:

Mit  Kutools for Word, können Sie schnell mehrere Bilder aus einem Ordner oder mehreren Ordnern in ein Word-Dokument mit dem Dateipfad und -namen einfügen.

doc fügt Bilder mit dem Dateinamen 6 ein

Kutools for Word: mit mehr als 100 handlichen Word-Add-Ins, die Sie in 60-Tagen kostenlos ausprobieren können. Klicken Sie hier, um die Testversion herunterzuladen und zu testen.


Fügen Sie mehrere Bilder mit Dateiname mithilfe von VBA-Code ein

Der folgende VBA-Code kann Ihnen helfen, den Dateipfad und den Namen als Beschriftung einzugeben, wenn Sie die Bilder einfügen:

1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

2. Und dann klicke Einsatz > Modul, kopiere und füge unterhalb Code in das geöffnete leere Modul ein:

VBA-Code: Fügen Sie mehrere Bilder mit dem Dateinamen ein:

Sub PicWithCaption()
    Dim xFileDialog As FileDialog
    Dim xPath, xFile As Variant
    On Error Resume Next
    Set xFileDialog = Application.FileDialog(msoFileDialogFolderPicker)
    If xFileDialog.Show = -1 Then
        xPath = xFileDialog.SelectedItems.Item(1)
        If xPath <> "" Then
            xFile = Dir(xPath & "\*.*")
            Do While xFile <> ""
                If UCase(Right(xFile, 3)) = "PNG" Or _
                    UCase(Right(xFile, 3)) = "TIF" Or _
                    UCase(Right(xFile, 3)) = "JPG" Or _
                    UCase(Right(xFile, 3)) = "GIF" Or _
                    UCase(Right(xFile, 3)) = "BMP" Then
                    With Selection
                        .InlineShapes.AddPicture xPath & "\" & xFile, False, True
                        .InsertAfter vbCrLf
                        .MoveDown wdLine
                        .Text = xPath & "\" & xFile & Chr(10)
                        .MoveDown wdLine
                    End With
                End If
                xFile = Dir()
            Loop
        End If
    End If
End Sub

3. Dann drücken F5 Um diesen Code zu starten, wird ein Browse-Fenster angezeigt. Bitte wählen Sie den Ordner, der die Bilder enthält, die Sie einfügen möchten, siehe Screenshot:

doc fügt Bilder mit dem Dateinamen 1 ein

4. Dann klick OK Schaltfläche, alle Bilder im ausgewählten Ordner wurden in das Word-Dokument eingefügt, und der Pfad und Name der Datei wird als Überschrift eingefügt, siehe Screenshot:

doc fügt Bilder mit dem Dateinamen 2 ein


Fügen Sie mehrere Bilder mit Dateiname mithilfe von Kutools für Word ein

Wenn Sie Kutools for WordMit seinen Bilder Funktion können Sie schnell mehrere Bilder mit Dateipfad und Namen sofort in das Word-Dokument einfügen.

Kutools for Word : mit mehr als 100 handlichen Word-Add-Ins, die Sie in 60-Tagen kostenlos ausprobieren können.

Nach der Installation Kutools for Wordmach es so:

1. Drücken Sie Kutoolen > Bilder, siehe Screenshot:

doc fügt Bilder mit dem Dateinamen 3 ein

2. In den herausgesprungenen Bilder einfügen Dialogfeld, führen Sie die folgenden Schritte aus:

  • (1.) Klicken Sie auf Dateien hinzufügen or Ordner hinzufügen Schaltfläche, um die Bilder auszuwählen, die Sie einfügen möchten;
  • (2.) Dann überprüfe Fügen Sie den Dateipfad für jedes Bild als Beschriftung ein Option am linken unteren Rand des Dialogfelds;
  • (3.) Und dann klicken Einsatz klicken.

doc fügt Bilder mit dem Dateinamen 4 ein

3. Nach dem Einfügen der Bilder sehen Sie den Dateipfad und den Namen jedes Bildes, siehe Screenshot:

doc fügt Bilder mit dem Dateinamen 5 ein

Klicken Sie hier, um Kutools for Word herunterzuladen und eine kostenlose Testversion zu erhalten!



Empfohlene Word-Produktivitätswerkzeuge

Kutools für Word - Mehr als 100 Erweiterte Funktionen Sparen Sie bei Word 50% Zeit

  • Komplizierte und wiederholte Operationen können in Sekundenschnelle einmalig ausgeführt werden.
  • Fügen Sie mehrere Bilder in verschiedenen Ordnern gleichzeitig in ein Word-Dokument ein.
  • Führen Sie mehrere Word-Dateien in Ordnern zusammen und kombinieren Sie sie in der gewünschten Reihenfolge.
  • Teilen Sie das aktuelle Dokument nach Überschrift, Abschnittswechsel oder anderen Kriterien in separate Dokumente auf.
  • Konvertieren Sie Dateien zwischen Doc und Docx, Docx und PDF, Sammlung von Tools für gemeinsame Konvertierungen und Auswahl usw.
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    jairo aguirre · 2 months ago
    buenas noches amigo me ha servido mucho su información sinembargo me surge una duda cree que es posible incertar imagenes en word de la misma manera pero dentro de celdas incertadas?