Dante Amor

Para saber el número de filas es con el 1: filas = ubound( matriz, 1) Si la matriz empieza a almacenar en el 0, entonces para el total de filas: filas = ubound( matriz, 1) + 1 Para saber el número de columnas es con el 2: columnas = ubound(matriz, 2)...

Esta podría ser una opción: Sub copiarceldas() 'rango a copiar Sheets("Hoja1"). Range("B6:C10"). Copy 'celda inicial para pegar Application.EnableEvents = False Sheets("Hoja2").Range("F3").PasteSpecial xlAll Application.EnableEvents = True End Sub

Para todas las hojas, en la columna B: Sub RellenarHojas() 'Por.Dante Amor Dim sh As Worksheet On Error Resume Next For Each sh In Sheets With sh.Range("B6", sh.Range("B" & Rows.Count).End(3)) .SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C"...

Prueba la siguiente: Sub EliminarCeldasVacias() Range("A:A").SpecialCells(xlCellTypeConstants, 23).Copy Range("C3") End Sub

Prueba lo siguiente: Private Sub CommandButton1_Click() Dim sh As Worksheet Dim f As Range With nombcof If .Value = "" Then MsgBox "Captura un nombre" .SetFocus Exit Sub End If Set sh = Sheets("INFO") Set f = sh.Range("B3:B100").Find(.Value, ,...

Puedes poner una imagen de la hoja2 con datos y el resultado que quieres para el saldo.

Te falta hacer referencia a la hoja donde vas a pegar: Dim filaDondeCopiar As Integer: filaDondeCopiar = 13 For f = 7 To ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row If Cells(f, 23).Value <> "Ok" Then With LibroDestino.Sheets("Hoja1")...

Dentro de tu userform, por ejemplo en un botón, haces la llamada al código para limpiar el listbox y le pasas como parámetro el nombre del listbox Private Sub CommandButton1_Click() Call LimpiarListBox(ListBox1) End Sub En un módulo, pon este código:...

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...