Adriel Ortiz Mangia

[Hola si tu pdf tiene restricciones lo puedes desbloquear, usa este link https://www.ilovepdf.com/es/desbloquear_pdf

[Hola revisa este link https://www.maquinasvirtuales.eu/error-1907-no-se-puede-registrar-la-fuente-office-2010/

¿Será para colorear? Macro Sub colorxcondicion1() Columns("E").Interior.ColorIndex = xlNone For i = 2 To Range("E" & Rows.Count).End(xlUp).Row If Cells(i, "H") = 9 Then Cells(i, "E").Interior.ColorIndex = 6 Next i MsgBox "Terminado" End Sub

[Hola preparé la macro para 16 columnas ya usted lo ajustas a tu necesidad Private Sub Entradas() Set sh = Sheets("Hoja1") ' nombre de hoja Dim i As Long, j As Long With ListBox1 .ColumnCount = 16 ' cant. de columnas .List = Range("A1:P1").Value '...

[Hola Macro Sub quitacaracter() For i = 1 To Range("A" & Rows.Count).End(xlUp).Row cadena = Cells(i, 1) If InStr(1, Mid(cadena, 1, 2), "DE") Then spr = Mid(cadena, 3, Left(Len(cadena), 2)): Cells(i, 1) = spr Else Cells(i, 1) = cadena End If Next i...

Aquí ejemplos https://www.exceleinfo.com/curso-excel-vba-y-macros-cap-42-onkey-para-ejecutar-macros-con-combinacion-de-teclas/

Ahí tienes la propuesta de Dante

[Hola Explica con más detalles la macro que necesitas

[Hola Finaliza como Excelente o bueno si ya no tienes dudas Macro Private Sub CommandButton1_Click() Set h = Sheets("hoja1") 'hoja a buscar Set b = h.Range("A:A").Find(TextBox1.Text, lookat:=xlWhole) If Not b Is Nothing Then If MsgBox("VALOR...

[Hola lo puedes realizar con una macro https://exceltotal.com/contar-celdas-color-excel/