Adriel Ortiz Mangia

[Hola prueba con esto Sub eliminar() col = "A" ' columna evaluar u = Range(col & Rows.Count).End(xlUp).Row n = 0 For i = u To 1 Step -1 If IsError(Cells(i, col)) Then Rows(i).Delete Next i ' MsgBox "fin" End Sub

jrgces respondió: La fórmula para la fecha anterior no resulta demasiado complicada: =SI.ERROR(K.ESIMO.MAYOR(SI($C$2:$C$6=C2;SI($A$2:$A$6<A2;$A$2:$A$6));1);"") La que devuelve el valor correspondiente a esa fecha anterior sí se complica un poco más, y no veo la forma...

Tor Cheer respondió: Con esta macro podrá contar los nombres, saludos Sub macro1() Dim nombre As String Dim valorencontrado As String Dim valor As String With Range("A1").CurrentRegion.Select ultimaFila = Sheets("Hoja1").Range("A" & Rows.Count).End(xlUp).Row Dim Celda As...

jrgces respondió: Por ejemplo, si el rango es A1:E100 intenta: =INDICE(E1:E100;COINCIDIR(MIN(ABS(C1:C100-0,65));ABS(C1:C100-0,65);0)) Se trata de una fórmula matricial, por lo que hay que introducirla pulsando mayúsculas control entrada al mismo tiempo. Si en C1:C100...

Dante Amor respondió: Esta sería la macro Sub exportar_pdf() 'Mod.Por.DAM With Application.FileDialog(msoFileDialogSaveAs) .Title = "Guardar archivo como" .AllowMultiSelect = False '.InitialFileName = mes .FilterIndex = 25 'como PDF If .Show Then march = .SelectedItems(1)...

Abraham Valencia respondió: [Hola Una idea es trabajar solo con los índices, así no habrá problema con tu macro ActiveSheet. Pictures(2) Obviamente si no es la hoja activa, solo reemplazas por el nombre. Si igual necesariamente tienes que saber cuántas imágenes son (porque...

Cesar Rojas respondió: Supongamos que tienes una tabla en tu base de datos llamada stock STOCK id INT AI Codigo TEXT Nombre VARCHAR 255 Descripcion TEXT Minimo VARCHAR 10 Existencia VARCHAR 10 en la página haces una consulta a tu base de datos, comparando los valores de...

Daniel Espino respondió: No necesitas macro mira: 1 seleccionas tus celdas donde vas a poner los números y le das clic derecho > formato de celdas o Ctl + 1 luego te vas en donde dice categoría buscas en especial > configuración regional "polaco" y seleccionas PESEL. Si no...

Abraham Valencia respondió: [Hola La grabadora de macros es útil para comenzar con VBA y/o para ver algunas propiedades de objetos del Excel, pero en general no se recomienda hacer las macros solo con la grabadora ya que el código que se obtiene de ella es "en bruto". Un...

[hola prueba lo siguiente Sub copiar() ' Por Adriel ortiz Set hojadestino = Sheets("Hoja1") j = 1 For i = 2 To 50 If Cells(i, "R") > 0 Then Range(Cells(i, "L"), Cells(i, "R")).Copy hojadestino.Range("A" & j) j = j + 1 End If Next i MsgBox "fin" End Sub

Abraham Valencia respondió: [Hola La forma de abrir un archivo de Excel que tiene password de apertura, a través de macros, es la siguiente: Workbooks.Open Filename:="C:\tuarchivo.xlsx", Password:="tupassword" Saludos] Abraham Valencia

Elsa Matilde respondió: Observa en la imagen cómo se escribe el Userform en la macro... sin el número.

James Bond respondió: Usa range("a2:b2"). Clear o range("a2:b2"). Clearcontents, el primero borra todo incluidos los formatos, el segundo borra solo los datos