Sub indice fuera del intervalo

11/11/2009 - 17:09 por jforero | Informe spam

Buen dia grupo
tengo el siguiente codigo que me copia de una hoja de calculo los datos a
otra pero me sale el error del asunto error 9 en tiempo de ejecucion.. sub
indice fuera del intervalo. al darle click en depurar la interrupcion se
detiene en la linea:

Set ws = Worksheets("Clientes")

Private Sub btnEnviar_Click()
Dim iFila As Long
Dim ws As Worksheet
Set ws = Worksheets("Clientes")
'Encuentra la siguiente fila vacia
iFila = ws.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row
'Copia los datos a la hoja
ws.Cells(iFila, 1).Value = Worksheets("Formulario").Range("c4")
ws.Cells(iFila, 2).Value = UCase(Worksheets("Formulario").Range("c5"))
'salva los datos
ActiveWorkbook.Save
End Sub

tengo otros libros que hacen lo mismo con el mismo codigo pero hasta ahora
se me presenta el error

gracias por la colaboracion

Jorgef

Siga el debate

2 respuestas

Tengo una respuesta

Preguntas similare

sub indice fuera del intervalo

Leer las respuestas

#1 Héctor Miguel

11/11/2009 - 18:04 | Informe spam

hola, jorge !

subindice fuera del intervalo significa que no existe el objeto al que se llama o hace referencia:
=> una hoja llamada "clientes" (en el libro activo en la ventana)
=> comprueba el nombre "preciso", o... si esta en otro libro, establece la referencia completa

saludos,
hector.

__ OP __

tengo el siguiente codigo que me copia de una hoja de calculo los datos a otra
pero me sale el error del asunto error 9 en tiempo de ejecucion.. sub indice fuera del intervalo.
al darle click en depurar la interrupcion se detiene en la linea:

Set ws = Worksheets("Clientes")
...
tengo otros libros que hacen lo mismo con el mismo codigo pero hasta ahora se me presenta el error

Responder a este mensaje

#2 jforero

11/11/2009 - 18:29 | Informe spam

ok, Hector como siempre muchas gracias por tu valiosa colaboracion ya
encongre el error

Jorgef

"Héctor Miguel" escribió en el mensaje de
noticias news:%

hola, jorge !

subindice fuera del intervalo significa que no existe el objeto al que se
llama o hace referencia:
=> una hoja llamada "clientes" (en el libro activo en la ventana)
=> comprueba el nombre "preciso", o... si esta en otro libro,
establece la referencia completa

saludos,
hector.

__ OP __

tengo el siguiente codigo que me copia de una hoja de calculo los datos a
otra
pero me sale el error del asunto error 9 en tiempo de ejecucion.. sub
indice fuera del intervalo.
al darle click en depurar la interrupcion se detiene en la linea:

Set ws = Worksheets("Clientes")
...
tengo otros libros que hacen lo mismo con el mismo codigo pero hasta
ahora se me presenta el error

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida