al imprimir un número decimal convertido a binario cómo hacer pa r.

hola, 'anonimo/a' !

... quiero saber como hago para que al imprimir no se vean
... solo los cuadros sombreados.

-> utiliza los formatos condicionales para aplicar el color de relleno a 'esa/s' celda/s y...
[por formula en el formato condicional] 'condiciona' su aplicacion al valor de 'x' celda
[p.e. a que la celda 'A1' contenga un valor =1]
[podrias 'forzar y restablecer' el valor de la celda_condicion en el evento '_beforeprint' del libro]
-> tip: para que no 'se vea' el contenido de 'A1'...
aplica un color de fuente blanco o un formato numerico personalizado de SOLO 3 punto y coma => ;;; <
te expongo un ejemplo al final suponiendo que se trata de la "Hoja1"...
si cualquier duda [o informacion adicional]... comentas?
saludos,
hector.

en el modulo de codigo del libro [ThisWorkbook] ==Private Sub Workbook_BeforePrint(Cancel As Boolean)
Worksheets("Hoja1").Range("a1") = 1
Application.OnTime Now + TimeValue("0:00:01"), "Quitar_color"
End Sub
en un modulo de codigo 'normal' ==Option Private Module
Sub Quitar_color()
Worksheets("Hoja1").Range("a1").ClearContents
End Sub