Excel - Macro para crear un cmd y posteriormente ejecutarlo

 
Vista:
Imágen de perfil de Chrysman
Val: 13
Ha aumentado 1 puesto en Excel (en relación al último mes)
Gráfica de Excel

Macro para crear un cmd y posteriormente ejecutarlo

Publicado por Chrysman (2 intervenciones) el 26/05/2019 06:48:40
Buenas noches

Un gusto saludarlos a todos esperando se encuentren muy bien,

Tengo este codigo en excel para generar desde excel un archivo .cmd que contenga comandos cmd para crear carpetas, ya logre que me que la macro me guardara un archivo *.cmd pero a la hora de revisar editando el mismo me genera unas comillas de mas que no estan en el archivo excel:

Codigo de Macro:
ActiveWorkbook.SaveAs Filename:= _
"C:\Users\e1259880\Desktop\MacroPruebas_cmd\CreateFolders.cmd", FileFormat _
:=xlTextMSDOS, CreateBackup:=False
Windows("CreateFolders").Activate

MsgBox "El File CreateFolders.cmd se ha creado Correctamente!."

Lo que hace una macro anterior es dejar la columna en valores como se ve a continuacion:

md "CARPETA UNO DE PRUEBA"
md "CARPETA UNO DE PRUEBA 2"
md "CARPETA UNO DE PRUEBA 3"

Lo que me genero en el archivo cmd fue:

"md ""CARPETA UNO DE PRUEBA"""
"md ""CARPETA UNO DE PRUEBA 2"""
"md ""CARPETA UNO DE PRUEBA 3"""

Como pueden observar tengo una comilla doble al inicio que y comilla doble antes del nombre y dos comillas dobles al final.

Por lo que a la hora de ejecutar el archivo cmd da un error de sintaxis, corregirlo seria muy tedioso cuando se trata de 500 lineas, por lo que tendria que grabarse de la siguiente manera:

md "ARENDAL S DE RL DE CV"
md "ARENDAL S DE RL DE CV 2"
md "ARENDAL S DE RL DE CV 3"

Para que a la hora de ejecutarlo el mismo cree las carpetas correctamente.

No se si estoy utilizando un codigo incorrecto en la macro o es a la hora de elegir el formato del archivo xlTextMSDOS.

No se si existe un codigo que pueda indicarle que de la hoja activa seleccione el rango y lo copie en un archivo.cmd en lugar de SaveAs.

Agradeceria smucho sus comentarios y soluciones.

Gracias!!!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Chrysman
Val: 13
Ha aumentado 1 puesto en Excel (en relación al último mes)
Gráfica de Excel

Macro para crear un cmd y posteriormente ejecutarlo

Publicado por Chrysman (2 intervenciones) el 26/05/2019 07:47:14
Amigos ya lo solucione, adjunto codigo correcto:

ActiveWorkbook.SaveAs Filename:= _
"C:\Users\e1259880\Desktop\MacroPruebas_cmd\CreateFolders.cmd", FileFormat _
:=xlTextPrinter, CreateBackup:=False
Windows("CreateFolders").Activate

Gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar