Consulta sobre form

01/12/2006 - 03:27 por DOORS | Informe spam
Buenas noches

Amigos, tengo una consulta, tengo un archivo en excel que es sobre activos
(adquisicion,retiro o traslado), el archivo me funciona perfectamente en mi
pc. Pero cuando pongo el archivo en la intranet lo abro me aparece un form
con 3 opciones adquisicion, retiro o traslado, si yo selecciono adquisicion ,
me muestra la hoja que corresponde a adquisicion, pero si le doy devolver al
form y selecciono por ejemplo traslado me da el siguiente error : ERROR EN EL
METODO "WORKSHEETS" DE OBJETO GLOBAL, no se porque me esta dando este error :
( este es el codigo que tengo:

Private Sub CommandButton1_Click()
If OptionButton1 Then
Worksheets("Adquisición").Select
ElseIf OptionButton2 Then
Worksheets("Traslado").Select
ElseIf OptionButton3 Then
Worksheets("Retiro").Select
Else
MsgBox "Debe Seleccionar alguna opción..."
Exit Sub
End If
Unload Me
Call Mensaje_temporal
End Sub

SI ALGUIEN ME PUEDE AYUDAR!!!!! SE LO AGRADECERIA !!!

Preguntas similare

Leer las respuestas

#1 Francisco Parrilla
01/12/2006 - 08:52 | Informe spam
Y el archivo se abre con ... ?

Iexplorer o la apliacion "excel"?

Saludos

http://mx.geocities.com/gozalo_ya/index.htm


"DOORS" escribió:

Buenas noches

Amigos, tengo una consulta, tengo un archivo en excel que es sobre activos
(adquisicion,retiro o traslado), el archivo me funciona perfectamente en mi
pc. Pero cuando pongo el archivo en la intranet lo abro me aparece un form
con 3 opciones adquisicion, retiro o traslado, si yo selecciono adquisicion ,
me muestra la hoja que corresponde a adquisicion, pero si le doy devolver al
form y selecciono por ejemplo traslado me da el siguiente error : ERROR EN EL
METODO "WORKSHEETS" DE OBJETO GLOBAL, no se porque me esta dando este error :
( este es el codigo que tengo:

Private Sub CommandButton1_Click()
If OptionButton1 Then
Worksheets("Adquisición").Select
ElseIf OptionButton2 Then
Worksheets("Traslado").Select
ElseIf OptionButton3 Then
Worksheets("Retiro").Select
Else
MsgBox "Debe Seleccionar alguna opción..."
Exit Sub
End If
Unload Me
Call Mensaje_temporal
End Sub

SI ALGUIEN ME PUEDE AYUDAR!!!!! SE LO AGRADECERIA !!!
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida