Luis Mondelo

No estoy seguro de haberte entendido bien, pero si quieres una secuencia de pulsar F2 y después ENTER, yo lo pondría así: SendKeys "{F2}" + "{ENTER}" SI fuera así, finaliza y puntúa

Pues aquí tienes la macro que lo hace. En mi ejemplo los datos de la hoja1 empiezan en la celda A1. Para ejecutarla tienes que estar posicionado en el primer dato de la hoja1. (Si cambias de nombre a la hoja2, tendrás que cambiarlo también en la...

No olvides finalizar la consulta y puntuar

Prueba ahora con esta. Tenías mal confeccionados los IF Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 3 Then fila = Target.Row If Time > "00:00:00" And Time < "05:59:59" Then Cells(fila, 1).Value = Date - 1 Cells(fila,...

Pues aquí tienes la macro: la pones en el archivo master, la ejecutas y se te abrirá un browser para que elijas el segundo archivo. Los datos empiezan en la A2 de la hoja 1 de ambos archivos. Sub busca_datos() destino = ActiveWorkbook.Name msgbox "a...

Para volcar los datos seleccionados en los 2 listbox en la primera celda libre de la columna A sería así: sub volcar_datos() filalibre = range("a10000").end(xlup).row+1 cells(filalibre,1).value = activesheet.listbox1.value cells(filalibre+1,1).value...

Prueba mejor a poner el código de esta manera y me cuentas: Private Sub Worksheet_Change(ByVal Target As Range) if target.address = "$E$4" then If target.value = 1 Or target.value = 2 Then Sheets("Hoja2").Rows("5:25").Hidden = True ElseIf...

Perdona, pero no te entiendo muy bien. Si quieres poner código antes del pie de página bastará con colocarlo justo antes de la sentencia With Activesheet.pagesetup y justo después de End with podrás seguir anotando código Pero no estoy seguro de...

Pues este sería el ejemplo: En primer lugar tienes que dibujar los 3 botones en una hoja. Después te aconsejo que les pongas un nombre para facilitar la programación, es decir, al primero le llamamos boton1 al segundo boton2 y al otro boton3....

Pues si quieres que mantenga ese contador de archivos, incluso después de haber cerrado la hoja y abrirla otro día, necesitamos guardar una variable en una celda, en mi caso he elegido la celda a1 de la hoja 1: Sub guardar_en_pdf() c =...