نصيحة: اللغات الأخرى مترجمة من قبل Google. يمكنك زيارة English نسخة من هذا الرابط.
تسجيل الدخول
x
or
x
x
التسجيل
x

or

كيفية إدراج صور متعددة مع اسم الملف في مستند Word؟

في مستند Word ، يمكنك إدراج صور متعددة في وقت واحد بسرعة باستخدام الدالة Insert. ولكن ، في بعض الأحيان ، تحتاج إلى إدراج مسار الملف والأسماء كتسمية توضيحية عند إدراج الصور. كيف يمكنك التعامل مع هذه المهمة في ملف Word؟

إدراج صور متعددة مع اسم الملف باستخدام التعليمات البرمجية لـ VBA

إدراج صور متعددة مع اسم الملف باستخدام Kutools لـ Word


إدراج صور متعددة مع اسم الملف في مستند Word:

مع كوتولس للكلمةيمكنك بسرعة إدراج صور متعددة من مجلد أو مجلدات متعددة في مستند Word مع مسار الملف واسمه أيضًا.

وثيقة إدراج صور مع اسم الملف 6

كوتولس للكلمة: مع أكثر من 100 مفيد الوظائف الإضافية في Word ، مجانا لمحاولة مع عدم وجود قيود في أيام 60. انقر للتحميل والتجربة المجانية الآن!


إدراج صور متعددة مع اسم الملف باستخدام التعليمات البرمجية لـ VBA

يمكن أن يساعدك رمز VBA التالي على إدراج مسار الملف واسمه كتسمية توضيحية عند إدراج الصور ، يرجى القيام بما يلي:

1. اضغط باستمرار ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. ثم انقر فوق إدراج > وحدة، انسخ والصق تحت الرمز في الوحدة الفارغة المفتوحة:

رمز VBA: إدراج صور متعددة مع اسم الملف:

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. ثم اضغط F5 مفتاح لتشغيل هذا الرمز ، يتم عرض نافذة استعراض ، يرجى تحديد المجلد الذي يحتوي على الصور التي تريد إدراجها ، راجع لقطة الشاشة:

وثيقة إدراج صور مع اسم الملف 1

4. ثم اضغط OK الزر ، تم إدراج جميع الصور في المجلد المحدد في مستند Word ، ويتم إدراج مسار الملف واسمه كإيضاح جيد ، انظر لقطة الشاشة:

وثيقة إدراج صور مع اسم الملف 2


إدراج صور متعددة مع اسم الملف باستخدام Kutools لـ Word

إذا كان لديك كوتولس للكلمة، بما لديها الصور ، يمكنك إدراج صور متعددة بسرعة بمسار الملف واسمه في مستند Word على الفور.

كوتولس للكلمة : مع أكثر من 100 مفيد الوظائف الإضافية Word ، مجانا في محاولة بلا قيود في أيام 60.

بعد تثبيت كوتولس للكلمة، يرجى القيام بذلك على النحو التالي:

1. انقر Kutools > الصور، انظر الصورة:

وثيقة إدراج صور مع اسم الملف 3

2. في برزت خارج إدراج الصور مربع الحوار ، يرجى القيام بالعمليات التالية:

  • (شنومكس.) انقر فوق إضافة ملفات or إضافة مجلد زر لاختيار الصور التي تريد إدراجها ؛
  • (شنومكس.) ثم تحقق إدراج ملف مسار كل الصور كتعليق الخيار في أسفل اليسار من مربع الحوار.
  • (شنومكس.) ثم انقر فوق إدراج .

وثيقة إدراج صور مع اسم الملف 4

3. بعد إدراج الصور ، سترى مسار ملف كل صورة ويتم إدراج الاسم أيضًا ، راجع لقطة الشاشة:

وثيقة إدراج صور مع اسم الملف 5

انقر لتنزيل Kutools for Word والتجربة المجانية الآن!



أوصت كلمة أدوات الإنتاجية

Kutools لـ Word - أكثر من 100 ميزات متقدمة لـ Word ، وفر وقتك 50٪

  • يمكن إجراء العمليات المعقدة والمتكررة لمرة واحدة خلال ثوانٍ.
  • إدراج صور متعددة عبر المجلدات في مستند Word مرة واحدة.
  • دمج ودمج ملفات Word متعددة عبر مجلدات في واحد بالترتيب المطلوب.
  • قسّم المستند الحالي إلى مستندات منفصلة وفقًا للعنوان أو فاصل المقاطع أو معايير أخرى.
  • تحويل الملفات بين Doc و Docx و Docx و PDF ، ومجموعة من الأدوات للتحويلات والتحديدات الشائعة ، وما إلى ذلك ...
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?