Unlock a world of possibilities! Login now and discover the exclusive benefits awaiting you.
Buen Día Comunidad, por favor requiero de su apoyo en verificar la siguiente rutina para creación de un archivo plano desde un boton. Cuando hago click sobre el botón se me abre la ventada de editor de macro, pero no logro identificar cual es la falla. Gracias a todos por su colaboración
sub prueba()
dim objfso,archivotexto
Set objfso = createobject("scripting.filesystemobject")
Set archivotexto = objfso.opentextfile("C:\Users\b466905\Documents\Varios\archivo.txt",8,true)
archivotexto.WriteLine "hola"
archivotexto.close
end sub
Adicionalmente probe el script de forma directa y funciona correctamente
Verifica que en el editor de macro tengas la opción de "Current Local Security" en 'Allow System Access'.
Verifica que en el editor de macro tengas la opción de "Current Local Security" en 'Allow System Access'.
Muchas Gracias Alejandro, justamente me había percatado de ese punto revisando el manual... Mil gracias por tu pronta respuesta