Kuidas kopeerida kõigi kaustas olevate failinimede loend Exceli töölehel VBA kaudu

Exceli lahendused Oktoober 3, 2025

Kõigi failinimede kogumine töölehel on teie töö jaoks väga oluline. Selles artiklis tutvustame meetodit kõigi failinimede sisestamiseks töölehel VBA makro abil.

Meie eelmises artiklis 2 meetodit kõigi kaustas olevate failinimede loendi kopeerimiseks oma Exceli tööle, oleme kasutusele võtnud kaks meetodit kõigi kaustas olevate failinimede loetlemiseks töölehel. Ja nüüd oleme leidnud teise meetodi. Selle ülesande lõpetamiseks võite kasutada ka VBA makrot. Järgige allolevaid samme ja vaadake, kuidas seda kasutada.

Kopeerige kõigi kaustas olevate failinimede loend

  1. Avage töövihik, mida vajate failinimede sisestamiseks.
  2. Seejärel vajutage Visual Basicu redaktori avamiseks klaviatuuril kiirklahve "Alt + F11".
  3. Pärast seda klõpsake tööriistaribal vahekaarti "Lisa".
  4. Järgmisena valige ripploendist valik "Moodul". Seetõttu olete redaktorisse lisanud uue mooduli.Sisesta moodul
  5. Selles etapis kopeerige uude moodulisse järgmised koodid:
Sub ListAllFileNames()
  Dim strTargetFolder As String, strFileName As String, nCountItem As Integer

  '  Initialization
  nCountItem = 1
  strTargetFolder = "C:\Users\Sample\Desktop\Sales Volume" & "\"
  strFileName = Dir(strTargetFolder, vbDirectory)

  '  Get the file name
  Do While strFileName <> ""
    If strFileName <> "." And strFileName <> ".." Then
      Cells(nCountItem, 1) = strFileName
      nCountItem = nCountItem + 1
    End If
    strFileName = Dir
  Loop
End Sub

Selles makros peate sihtkausta vastavalt oma tegelikule vajadusele muutma. Ja me sisestame failinimed töölehe A-veergu. Kui teil on vaja failinimed sisestada mõnda teise vahemikku, saate ka koode muuta.

  1. Pärast seda käivitage see makro. Selle makro käivitamiseks võite klõpsata tööriistaribal nuppu "Run Sub" või vajutada klaviatuuril nuppu "F5".
  2. Järgmisena tulge tagasi töölehe juurde. Näete, et kõik kaustas olevad failinimed on juba veerus A ilmunud.Tulemus

Võrreldes artiklis toodud kahe teise meetodiga 2 meetodit kõigi kaustas olevate failinimede loendi kopeerimiseks oma Exceli tööle, näete, et VBA makro kasutamine on väga mugav. Kuid teisest küljest, kui te pole Exceli VBA-ga tuttav, kohtate koodide muutmisel vigu. Seetõttu võite vastavalt oma tegelikule vajadusele kasutada ühte kolmest meetodist.

Pöörake tähelepanu ohtlikule tarkvarale

Kindlasti installite oma arvutisse palju tarkvara. Ja need rakendused võivad teid teie töös palju aidata. Mõned neist on aga ohtlikud rakendused. Kui olete need oma arvutisse installinud, koguvad nad teie isikuandmeid. Mis veelgi hullem, need kahjustavad ka teie Exceli faile. Sel hetkel desinstallige ohtlik tarkvara kohe. Lisaks peate selleks kasutama ka taastamistööriista kahjustatud xlsx-faili parandamine. Nii saate veenduda, et teie Exceli failid on turvalised.

Autori sissejuhatus:

Anna Ma on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas parandage Wordi docx-faili probleem ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom

Kommentaarid on suletud.