jarfg

Elsa Matilde respondió: Para evitar las modificaciones en celdas, éstas deben estar bloqueadas y luego la hoja protegida (al contraseña es opcional) Predeterminadamente la hoja tiene todas las celdas bloqueadas, si la proteges verás que ninguna puede ser modificada. Por eso...

Elsa Matilde respondió: TEnés que utilizar la función Pegado Especial. Si estamos hablando de macros (?) Será: 'celda a copiar ActiveCell.copy 'se selecciona destino para copiar solo valores range("B5").select Selection.PasteSpecial Paste:=xlValues Desde la hoja Excel, esto...

Elsa Matilde respondió: Entiendo que ya tenés el botón y la rutina que guarda tus datos. Entonces solo agregá esta instrucción antes del End Sub: Sheets("Hoja1").Range("A1").value = Sheets("Hoja1").Range("A1").value + 1 Deberás utilizar tu nombre de hoja y tu celda. Saludos...

Elsa Matilde respondió: Si, falta sumarle 1 a la variable miFila. Reemplazá tu instrucción por esta: miFila = Sheets("Hoja2").Range("A65500").End(xlUp).Row + 1

Elsa Matilde respondió: En un módulo del Editor colocá esta rutina, a la que ajustarás las referencias. Sub CopiarLimpiar() 'obtener ultima fila con datos de la tabla Dim miFila As Integer miFila = Sheets("Hoja2").Range("A65500").End(xlUp).Row 'selecciona hoja con datos a...