Jump to content

Buenas, alguien me podría ayudar con mi código?


Cartron

Recommended Posts

Este código va en un botón el cual inserta datos pero al presionarlo me sale: 
Se ha producido el error '-2147417848(80010108)' en tiempo de ejecúcion:
Error en el método 'Insert' de objeto 'Range'

A continuación les dejo el código en cuestión:

Private Sub CommandButton1_Click()
Range("Alumnos!A2").EntireRow.Insert

Range("Alumnos!B2") = TextBox1.Value
Range("Alumnos!C2") = TextBox2.Value
Range("Alumnos!A2") = TextBox3.Value
Range("Alumnos!D2") = ComboBox1.Value
Range("Alumnos!E2") = ComboBox2.Value

MsgBox "Registro completo"
LimpiarCampos
End Sub

Si alguien me puede ayudar se lo agradecería mucho, saludos.

Link to comment
Share on other sites

Usando la bola de cristal....

Presiona CTRL + Fin, podría apostar (parezco apostador compulsivo) que al presionar esa compbinación de teclas, te va a enviar a la última fila.

Si eso es cierto, Excel asume que has usado la totalidad de filas y, por lo tanto, ya no puedes adicionar más.

 

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...

Important Information

Privacy Policy