Forums Últimos mensajes - Powered by IBM
 

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
 

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

Preguntas similares