Ver Mensaje Individual
  #1 (permalink)  
Antiguo 11/04/2011, 18:16
kingsage28
 
Fecha de Ingreso: agosto-2010
Mensajes: 33
Antigüedad: 13 años, 8 meses
Puntos: 1
Guardar Excel y mantener formato, incluso las celdas ocultas

Buenas, tengo una duda con lo siguiente. Tengo una tabla excel que realiza ciertos cálculos y la guardo (creo una copia) con un botón en determinada ruta. El archivo que queda después de guardado debería mantener el tamaño de las columnas originales, no mostrarme las celdas ocultas (mantenerlas, pero ocultas) y por supupuesto deberían seguir funcionando las fórmulas de cada celda.

él codigo de guardado es:

Código:
Código:
ActiveSheet.Unprotect 'Desprotejo Hoja

Range("A1:T98").SpecialCells(xlCellTypeVisible).Copy
Workbooks.Add
'Range("A1:T98").PasteSpecial Paste:=xlPasteColumnWidths
ActiveSheet.Range("A1:T98").PasteSpecial Paste:=xlPasteColumnWidths
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveWorkbook.SaveAs Filename:=rutaCompleta & nombreCliente & Fecha & ".XLSX"
ActiveWorkbook.Close

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True 'Vuelvo a protegerla
El problema es que utilizando dicho código, la misma mantiene el formato de tamaño de las celdas, no copia las celdas ocultas (que está mal, pues yo en realidad querría mantenerlas ocultas, no eliminarlas) por lo que el nuevo archivo no posee las fórmulas del anterior.


Si alguien tiene una idea, genial!
Muchas gracias!

Pablo