Note: The other languages of the website are Google-translated. Back to English
ล็อกอิน  \/ 
x
or
x
สมัครสมาชิก  \/ 
x

or

 จะแทรกเส้นทางไฟล์และชื่อไฟล์ที่ไม่มีนามสกุลในเอกสาร Word ได้อย่างไร?

โดยปกติเราสามารถแทรกชื่อไฟล์หรือเส้นทางไฟล์และชื่อในเอกสาร Word ได้โดยใช้ฟังก์ชันฟิลด์ชื่อไฟล์ แต่ชื่อไฟล์ที่แทรกนี้รวมถึงนามสกุลไฟล์ docx หรือ doc คุณจะแทรกชื่อไฟล์หรือพา ธ ไฟล์และชื่อที่ไม่มีนามสกุลได้อย่างไร?

แทรกเส้นทางไฟล์และชื่อหรือชื่อไฟล์ที่ไม่มีนามสกุลโดยใช้รหัส VBA


แทรกเส้นทางไฟล์และชื่อหรือชื่อไฟล์ที่ไม่มีนามสกุลโดยใช้รหัส VBA

หากต้องการแทรกชื่อไฟล์ที่ไม่มีนามสกุลในเอกสาร Word โปรดใช้รหัส VBA ต่อไปนี้:

1. วางเคอร์เซอร์ไว้ในตำแหน่งที่คุณต้องการแทรกเส้นทางไฟล์และชื่อที่ไม่มีนามสกุล

2. จากนั้นกดไฟล์ ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

3. จากนั้นคลิก สิ่งที่ใส่เข้าไป > โมดูลคัดลอกและวางโค้ดด้านล่างลงในโมดูลเปล่าที่เปิดอยู่

รหัส VBA: แทรกเส้นทางไฟล์และชื่อโดยไม่มีนามสกุล:

Sub InsertFileNameAndPath()
    Dim xPathName As String
    Dim xDotPos As Integer
    With Application.ActiveDocument
        If Len(.Path) = 0 Then .Save
        xDotPos = VBA.InStrRev(.FullName, ".")
        xPathName = VBA.Left(.FullName, xDotPos - 1)
    End With
    Application.Selection.TypeText xPathName
End Sub

4. จากนั้นกด F5 คีย์เพื่อเรียกใช้รหัสนี้และเส้นทางไฟล์และชื่อถูกแทรกลงในเอกสารโดยไม่มีนามสกุลดูภาพหน้าจอ:

doc ใส่ชื่อไฟล์ที่ไม่มีนามสกุล 1

หมายเหตุ: หากคุณต้องการเพียงแค่แทรกชื่อไฟล์ที่ไม่มีนามสกุลลงในเอกสารคุณควรใช้รหัสนี้:

รหัส VBA: ใส่ชื่อไฟล์โดยไม่มีนามสกุลเท่านั้น:

Sub InsertFileNameOnly()
    Dim xPathName As String
    Dim xDotPos As Integer
    With Application.ActiveDocument
        If Len(.Path) = 0 Then .Save
        xDotPos = VBA.InStrRev(.Name, ".")
        xPathName = VBA.Left(.Name, xDotPos - 1)
    End With
    Application.Selection.TypeText xPathName
End Sub



เครื่องมือเพิ่มประสิทธิภาพคำแนะนำ

 

Kutools For Word - คุณสมบัติขั้นสูงมากกว่า 100 รายการสำหรับ Word ประหยัดเวลา 50%

  • การดำเนินการที่ซับซ้อนและซ้ำ ๆ สามารถดำเนินการครั้งเดียวในไม่กี่วินาที
  • แทรกภาพหลาย ๆ โฟลเดอร์ลงในเอกสาร Word พร้อมกัน
  • ผสานและรวมไฟล์ Word หลาย ๆ ไฟล์ในโฟลเดอร์เข้าด้วยกันตามลำดับที่คุณต้องการ
  • แยกเอกสารปัจจุบันออกเป็นเอกสารแยกตามหัวข้อตัวแบ่งส่วนหรือเกณฑ์อื่น ๆ
  • แปลงไฟล์ระหว่าง Doc และ Docx, Docx และ PDF ชุดเครื่องมือสำหรับการแปลงและการเลือกทั่วไปและอื่น ๆ ...

Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.