Adriel Ortiz Mangia

[Hola prueba con hide folder http://www.intercambiosvirtuales.org/software/hide-folders-2012-v4-0-6-775-oculte-sus-carpetas-de-miradas-ajenas

[Hola utilizar la sentencia if if textbox1 <> "" or textbox2 <> "" then codigo si es verdadero else código si es falso end if

[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