none
Configurar contraseña para archivos excel a traves de VBS Script o Similar RRS feed

  • Pregunta

  • Estimados todos saludos.

    Estoy en busca de ayuda, necesito setear password a muchos archivos Excel, por ende necesito un poceso automatizado por VBS o Powershell que me ayude a realizar dicha tarea.

    El script VBS que tengo me genera cambio de password en los archivos, pero en vez de guardar el mismo Excel me crea nuevos archivos desde 0 y los Excel que tengo tienen mucha información importante y de relevancia y no puedo perderlos.

    Hay alguna función que solamente pise el archivo o todos los archivos de un directorio usando algún comodin como *.xls que solamente les asigne una contraseña genérica y no los cree sin datos desde 0?

    Este es el código:

    Set objExcel = CreateObject("Excel.Application")
    objExcel.Visible = True
    objExcel.DisplayAlerts = FALSE
    
    Set objWorkbook = objExcel.Workbooks.Add
    Set objWorksheet = objWorkbook.Worksheets(1)
    
    objWorksheet.Cells(1, 1).Value = Now
    objWorkbook.SaveAs "EXCELFILE",,"PASSWORD"
    objExcel.Quit

    GRACIAS!.

    • Cambiado Enrique M. Montejo domingo, 6 de diciembre de 2015 9:50 Programación con Visual Basic 5/6.
    lunes, 30 de noviembre de 2015 20:25