Usar variables declaradas en otro modulo

[francolaca]

He leido un poco sobre eso de las variables publicas pero aun no puedo aplicarlas. yo hice esto:

en el modulo ThisWorkBook:

Option Explicit

Public mirango As Range

Sub nombrar_rango()

Set mirango = ActiveSheet.Range("A1:B2")

End Sub

y el el modulo Hoja1:

Option Explicit

Sub formato_rango()

ThisWorkbook.mirango.Value = "hola"

End Sub

Pero al intentar ejecutar formato_rango() me sale el siguiente error:

Se ha producido el error '91' en tiempo de ejecucion:
Variable de objeto o bloque With no establecido

Porque??? como hago para solucionarlo???? ayuda please......