Quisiera saber por que este código me genera error "13" en tiempo de ejecución
Dim fila As String fila = InputBox("Ingrese la fila")
Rows(fila).Select
Quisiera saber por que esto me genera Error "13"
Agradezco mucho su atención prestada
1 respuesta
Podría haber 2 motivos:
1) Que en lugar de colocar números enteros estés colocando números decimales, textos, o cualquier otro carácter que no sea un numero entero ( Aunque el error debería ser el 1004, pero es una opción), recuerda que estos códigos seleccionan filas
2) Puede ser que la definición de la variable te genere problemas, en ese caso cambia Dim fila As String por Dim fila
Gracias por la pronta respuesta, ya había verificado lo que me decías, el error "13" sale en el momento en que le doy cancelar al inputbox, me parece extraño, por que podría producirse esto ?
Gracias de antemano
Al momento que le das cancelar al input, dejas vacía la variable fila, por lo que al ir a seleccionar la fila "vacía" te genera el error. En ese caso podrías hacer lo siguiente para controlar el error
Dim fila As String
fila = InputBox("Ingrese la fila")
If fila = "" Then
Else
Rows(fila).Select
End If
De esta manera solo si colocas valores en el input te selecciona la fila, caso contrario simplemente pasa de largo.
