ComboBox1

07/05/2007 - 13:35 por AgerGaston | Informe spam
Hola a todos.
Tengo la siguiente macro:

Public Sub ComboBox1_Change()
Range("a1").Select
Sheets("loca").Visible = True
Sheets("loca").Select
Range("d7:u40").Select
Selection.Columns.AutoFit
Range("A1").Select
End Sub

Pero me da error en la linea Range("d7:u40").Select

Saben porque puede ser ??

Gracias y saludos
 

Leer las respuestas

#1 Ivan
07/05/2007 - 13:48 | Informe spam
hola Ager

prueba a cambiar todo esto ->

Sheets("loca").Select
Range("d7:u40").Select
Selection.Columns.AutoFit



por esto

Sheets("loca").Range("d7:u40")..Columns.AutoFit

no lo he probado, pero creo que valdria

un saludo
Ivan

Preguntas similares