Opomba: Drugi jeziki spletnega mesta so prevedeni z Googlom. Nazaj na angleščino
Vpiši se  \/ 
x
or
x
Registracija  \/ 
x

or

 Kako v Wordov dokument vstaviti pot do datoteke in ime datoteke brez končnice?

Običajno lahko v datoteko Word vstavimo ime datoteke ali pot in ime datoteke s funkcijo polja Ime datoteke, vendar to vstavljeno ime datoteke vključuje razširitev datoteke docx ali doc. Kako lahko vstavite ime datoteke ali pot in ime datoteke brez končnice?

Vstavite pot do datoteke in ime ali ime datoteke brez končnice s kodo VBA


Vstavite pot do datoteke in ime ali ime datoteke brez končnice s kodo VBA

Če želite v datoteko Word vstaviti ime datoteke brez pripone, uporabite naslednjo kodo VBA:

1. Kazalec postavite na mesto, kamor želite vstaviti pot in ime datoteke brez končnice.

2. Nato držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

3. In nato kliknite Vstavi > Moduli, kopirajte in prilepite spodnjo kodo v odprti prazen modul.

Koda VBA: Vstavite pot in ime datoteke brez pripone:

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. Nato pritisnite F5 ključ za zagon te kode in pot do datoteke sta bila vstavljena v dokument brez končnice, glejte posnetek zaslona:

doc vstavi ime datoteke brez končnice 1

Opombe: Če želite v dokument samo vstaviti ime datoteke brez pripone, uporabite to kodo:

Koda VBA: Vstavite samo ime datoteke brez pripone:

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



Priporočena orodja za produktivnost besed

 

Kutools za Word - več kot 100 naprednih funkcij za Word prihranite 50% časa

  • Zapletene in ponavljajoče se operacije je mogoče enkrat obdelati v nekaj sekundah.
  • V Wordov dokument hkrati vstavite več slik v mape.
  • Združite in združite več datotek Word v mapah v eno z želenim vrstnim redom.
  • Trenutni dokument razdelite na ločene dokumente glede na naslov, prelom odseka ali druga merila.
  • Pretvarjanje datotek med dokumenti Doc in Docx, Docx in PDF, zbirka orodij za pogoste pretvorbe in izbiro itd. ...

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.