aviveros78

jerryeagle respondió: No veo la necesidad de usar 3 textbox, con uno es suficiente y obligar a que se escriba una fecha correcta, en el evento After_Update del textbox pon esto: If Not IsDate(TextBox.Text) Then MsgBox "Escriba una fecha Correcta" Exit Sub End If

jerryeagle respondió: Usa este Código: Dim Col as String, Ult as Long Col = 'Ponle entre comillas dobles la letra de la columna que necesites Ult = Cells(Rows.Count, Col).End(xlUp).Row 'Y en el boton o donde des la orden de pasar la informacion a la hoja: Cells(Ult,...