¿Cómo leer y escribir plantillas de Excel con VB?
Sub aa()
Paths = "D:\excel " 'Ruta de la carpeta.
Para crear objeto ("scripting.FilesystemObject"). obtener carpeta (ruta). "Archivo" recorre todos los archivos de Excel en una carpeta.
Utilizar libros de trabajo. "Abrir (miarchivo)" abre el Excel actualmente atravesado.
A=. Zhang(1). [A10]. 'valor'Lea el valor de la primera hoja de cálculo A10 en Excel.
Zhang (1). [A11]. Valor = " AAAAAAA " 'Reescribe el valor de A11 en la primera hoja de cálculo de Excel.
Cuadro de mensajes a
. ' Close False ' Cierra el recorrido actual de Excel.
Termina con...
Luego
Finalizar conector