Me imagino que sabes crear un menu personalizado, sino vete al menu Herramientas/Personalizar/Comandos y una vez alli selecciona Nuevo Menu dando click sostenido con el botom izquierdo del mouse. Luego da click con el secundario sobre este menu que acabas de crear y agregale un nombre en el cuadro para ello ahora ve en ese mismo menu a la opcion Asignar Macro y selecciona la que se llama Simbolo luego y das enter.
Tu diras cual macro llamada simbolo pues es esta:
Sub Simbolo()
ActiveCell.Value = "Ø"
End Sub
Nota: La macro debe estar agregada previamente en un modulo dentro del libro donde deseas ejecutarla, ya que de lo contrario no la veras cuando vayas a personalizar tu menu, si tienes dudas escribes de nuevo saludos...