Satura rādītājs
Šī apmācība parādīs, kā izveidot teksta failu ar VBA.
Izveidojiet teksta failu
Šajā nodarbībā tiek izmantots FileSystemObject. Lai to izmantotu, jums būs jāiestata atsauce uz VB skripta izpildes laika bibliotēku.
Lai izveidotu teksta failu, varat izmantot šo kodu zemāk ar CreateTextFile metode.
| 12345678 | Sub FSOCreateTextFile ()Dim FSO kā objektsIestatīt FSO = CreateObject ("Scripting.FileSystemObject")Aptumšojiet teksta failu kā objektuIestatīt TextFile = FSO.CreateTextFile ("C: \ Test \ TestFile.txt")Beigu apakš |
Izvēles argumentus varat nodot CreateTextFile metodei:
- Ja iestatāt argumentu “pārrakstīt” uz patiesu, var tikt pārrakstīts arī jau esošs fails.
- Iestatot argumentu “unikods” patiesu, tiek izveidots unikoda fails, pretējā gadījumā (vai, ja arguments tiek izlaists), rezultāts būs ASCII fails.
Šajā piemērā esošs TestFile.txt fails tiks pārrakstīts ar unikoda failu:
| 1 | Iestatīt TextFile = FSO.CreateTextFile ("C: \ Test \ TestFile.txt", True, True) |
Rakstīšana teksta failā
Pēc teksta faila izveides varat rakstīt failā tekstu, izmantojot vienu koda rindu:
| 1 | TextFile.Write "saturs" |
Noklikšķiniet uz saites, lai uzzinātu vairāk par rakstīšanu teksta failos, izmantojot metodes Write, WriteLine, WriteBlankLines.
