Mm gracias David.. pero mira., te cuento lo que yo hice ... capaz hice algo mal, y mi archivito esta tomando demasiados recursos o algo...
Lo que hice fue esto:
Código PHP:
((( CORTE TODO EL CODIGO; PARA QUE NO QUEDE TAN LARGO)))
(...)
.FitToPagesWide = 1
.FitToPagesTall = 1
End With
Aca es cuando coloco la nueva funcion para cambiarle el tamaño a la letra de las pestañas
Hoja.Activate
Cells.Select
With Selection.Font
.Name = "Arial"
.FontStyle = "Normal"
.Size = 8
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
End Sub
Y... aunque no lo creas, agregandole eso al codigo antiguo anda todo bien..
A mi me hubiese gustado que le pueda configurar el tamaño de texto, pero es una magia que aun no puedo lograr...
Probe con:
.Size = (Range("A1"))
(suponiendo que en A1 haya un 8) ... y no me funcionó ... :(
Pero ese es otro tema ;)
Gracias DAVID !!!!