¿Cómo uso FileSystemObject en VBA?

Question

¿Hay algo a lo que necesite hacer referencia? Cómo utilizo esto:

Dim fso As New FileSystemObject 
Dim fld As Folder 
Dim ts As TextStream 

Me aparece un error porque no reconoce estos objetos.

Answer 1

dentro de Excel que necesita para establecer una referencia a la biblioteca de tiempo de ejecución VB script. El archivo correspondiente se encuentra normalmente en \Windows\System32\scrrun.dll

• Para hacer referencia a este archivo, cargar el Editor de de Visual Basic (ALT + F11)
• Seleccione Herramientas> Referencias en el menú desplegable
• Se mostrará un cuadro de lista de referencias disponibles
• Marque la casilla de verificación junto a 'Microsoft Scripting Runtime'
• El nombre completo y la ruta del archivo scrrun.dll se mostrarán debajo del cuadro de lista
• Haga clic en el botón OK.

Answer 2

Estos chicos tienen excelentes ejemplos de cómo utilizar el objeto de sistema de archivos http://www.w3schools.com/asp/asp_ref_filesystem.asp

<% 
dim fs,fname 
set fs=Server.CreateObject("Scripting.FileSystemObject") 
set fname=fs.CreateTextFile("c:\test.txt",true) 
fname.WriteLine("Hello World!") 
fname.Close 
set fname=nothing 
set fs=nothing 
%> 

Answer 3

en Excel 2013, la cadena de creación de objetos es:

Dim fso 
Set fso = CreateObject("Scripting.FileSystemObject") 

en lugar del código en la respuesta anterior:

Dim fs,fname 
Set fs=Server.CreateObject("Scripting.FileSystemObject") 

Answer 4

Después de añadir la referencia, tuve que usar

Dim fso As New Scripting.FileSystemObject