Elsa Matilde

Debes indicar tu versión Excel, y si la copia se realiza con instrucción del tipo SaveAs o SaveCopyAs. Sdos Elsa

Debieras subir una imagen o explicarme aquí en qué fila/columna se encuentran los 2 primeros registros. No queda claro si en columnas diferentes (B y C por ej) o a continuación de la fila que dice 'Colaborar'. Quedo a la espera de tus aclaraciones...

Te dejo un par de ajustes para que pruebes y me comentes lo que todavía debiera agregar/quitar porque muy claro no se ve tu código. Private Sub CommandButton1_Click() 'comentada x Elsamatilde 'guarda la 1er fila libre según col A libre = Range("A" &...

Si el mensaje dice: 'Subíndice fuera de intervalo' es que estás llamando a un objeto que no se encuentra en el libro o una hoja que no existe, etc. Si tenés varios libros abiertos lo que te está sucediendo es que al momento en que llamas al...

Cada versión Excel trae algún control del tipo calendario, que puede llamarse: Calendar, DtPicker o Microsoft MonthView que se llama MSCOMCT2.OCX y se instala en la carpeta C/Windows/system32. Utiliza el que encuentres en tu versión que son todos...

Para llevar un nro de registro, quizás te convenga utilizar la función MAX: TextBox1.Value = Format(Application. WorksheetFunction. Max(Range("A:A")) + 1, "0000") Para que solo incremente la parte 'numerica' debes darle a la col un formato...

Hay 1 instrucción que contempla el error que puede darse al intentar seleccionar una hoja (luego del Exit sub te faltan las instrucciones que te dejé en la 1er consulta). On Error GoTo sinhoja Sheets(OBRA).Select Y ese error se va a dar si el...

No queda muy clara tu consulta. ¿El formulario es un Userform o uno diseñado en una hoja Excel? ¿Ya tienes el OptionButton en él? Dejo una instrucción de ejemplo que quizás resuelva tu problema: aquí se evalúa si el botón 1 está tildado y en ese caso...

Para encontrar la ultima fila ocupada hay varios modos pero el más seguro es este, si tomamos como referencia la col A ultima = Range("A" & Rows.Count).End(xlUp).Row Si al final de esta línea le agregas +1 te dará la primer fila libre. Entonces tu...

Ya te completo el resto. Sdos Elsa