Dante Amor

Lo más simple es que copies la primera página a una nueva hoja y exportes la nueva hoja a pdf.

Puedes ser más específico. Hoja1 - En cuál fila empiezan lo datos. Hoja2 - En cuál columna están lo datos. - En cuál fila empiezan. Hoja3 - Qué datos quieres pegar en la hoja3. - En cuál columna quiere pegar y en cuál fila deben iniciar. El dato de...

Revisa si el siguiente código lo puedes adaptar para tu necesidad. Macro para ajustar alto de fila en celdas combinadas

Revisa el código aquí: Desproteger hoja de Excel porque olvide la contraseña

Cambia estas líneas: uFila = .Range("A" & Rows.Count).End(xlUp).Row ' determina la ultima fila con datos Call insertacolumna 'llama a una insercion de columna B 'temporal.Range("B2:B" & uFila).Formula=...

Prueba así: Private Sub SpinButton1_Change() 'hoja actual Dim n%, valor As String ' <= variable agregada ' Dim i As Long Application.ScreenUpdating = False With Sheets("actual") .Range("A1").Value = Sheets("Hoja2").Range("H1").Value If .[A1] = "0000"...

Prueba lo siguiente: Pon todo el código dentro de tu userform Option Explicit ' Dim nombres As New Collection Dim sh As Worksheet ' Private Sub CommandButton1_Click() Dim f As Range Dim lr As Long, i As Long 'VALIDACIONES If NewCargo = "" Then MsgBox...

Así: Sub macro1() Sheets("Hoja1").Range("A1").Value = Sheets("Hoja2").Range("H1").Value End Sub

El código funciona. Solamente considera que en el evento change del textbox, por cada caracter que vas ingresando se va a ejecutar el código. Podrías validar si el archivo existe, solamente si el archivo existe, cargará la imagen. Private Sub...

Puedes utilizar una hoja temporal: Sub TEST() Dim sh As Worksheet Dim matriz() As Variant Set sh = Sheets("Temp") sh.Cells.Clear With Worksheets("DATOS").ListObjects("Tabla1").Range .AutoFilter 6, ">=" & Date, xlOr, "" .Copy sh.Range("A1") End With...