Not: Web sitesinin diğer dilleri Google tarafından çevrilmiştir. İngilizceye dön
Oturum aç  \/ 
x
or
x
Kaydol  \/ 
x

or

 Word belgesine uzantı olmadan dosya yolu ve dosya adı nasıl eklenir?

Normalde, dosya adını veya dosya yolunu ve adını, Dosya adı alanı işlevini kullanarak Word belgesine ekleyebiliriz, ancak bu eklenen dosya adı docx veya doc dosya uzantısını içerir. Dosya adını veya dosya yolunu ve adını uzantı olmadan nasıl ekleyebilirsin?

VBA kodunu kullanarak dosya yolunu ve adını veya dosya adını uzantı olmadan ekleyin


VBA kodunu kullanarak dosya yolunu ve adını veya dosya adını uzantı olmadan ekleyin

Dosya adını uzantı olmadan Word belgesine eklemek için lütfen aşağıdaki VBA kodunu uygulayın:

1. İmleci, dosya yolunu ve adını uzantı olmadan eklemek istediğiniz yere götürün.

2. Sonra, basılı tutun ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

3. Ve sonra tıklayın Ekle > modül, aşağıdaki kodu kopyalayıp açılan boş modüle yapıştırın.

VBA kodu: Uzantı olmadan dosya yolu ve adı ekleyin:

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. Daha sonra tuşuna basın. F5 Bu kodu çalıştırmak için anahtar ve dosya yolu ve adı uzantı olmadan belgeye eklenmiştir, ekran görüntüsüne bakın:

doc uzantısı 1 olmadan dosya adı ekleyin

not: Yalnızca uzantı olmadan dosya adını belgeye eklemek istiyorsanız, bu kodu uygulamalısınız:

VBA kodu: Yalnızca uzantı olmadan dosya adını girin:

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



Önerilen Word Üretkenlik Araçları

 

Kutools For Word - Word İçin 100'den Fazla Gelişmiş Özellik,% 50 Zaman Kazanın

  • Karmaşık ve tekrarlanan işlemler saniyeler içinde tek seferlik işlem yapılabilir.
  • Klasörler arasında birden çok görüntüyü aynı anda Word belgesine ekleyin.
  • Birden çok Word dosyasını klasörler arasında istediğiniz sırada birleştirin ve birleştirin.
  • Geçerli belgeyi başlık, bölüm sonu veya diğer kriterlere göre ayrı belgelere bölün.
  • Dosyaları Doc ve Docx, Docx ve PDF, ortak dönüştürme ve seçim için araçlar koleksiyonu vb. Arasında dönüştürün ...

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.