Macro para cambiar el borde de una celda activa

Hola buena noche, tengo esta macro sencilla, para modificar el color de la fuente:

Sub Macro2()
'
' Macro2 Macro
'
' Acceso directo: CTRL+z
'
Range("E11:F11").Select
With Selection.Font
.Color = -16711681
.TintAndShade = 0
End With
End Sub

Pero cuando realizo la combinación de teclas para ejecutar la macro, sombrea las dos celdas que modifica, deseo saber si hay forma de que modifique nada más el color del texto sin que "sombree" las celdas.

Anexo imagen de lo que sucede, solicitando su apoyo

Gracias de antemano

Saludos