Formato de celda, número

hola, !

En una columna quiero introducir un codigo que empezara por G o por I al que seguira un numero con dos cifras.
He creado para otras ocasiones un formato, de manera que al escribir un numero, por ejemplo el 1, aparezca directamente G-01.
Sin embargo ahora, como he dicho los codigos, o empiezan por G o por I.
Es posible crear un formato que al introducir yo, por ejemplo, g1 lo transforme en G-01
y al introducir, por ejemplo, i8 lo transforme en I-08. ...

suponiendo que esa "una columna" es la columna A a partir de la fila 2 -?????-
copia/pega (o escribe) lo siguiente en el modulo de codigo de "esa hoja"

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 And Target.Count > 1 Then ActiveCell.Select
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 1 Then Exit Sub Else On Error GoTo Restore
Application.EnableEvents = False
ActiveCell.NumberFormat = UCase(Left(Target, 1)) & "\-00"
ActiveCell.Value = Mid(ActiveCell.Value, 2)
Restore:
Application.EnableEvents = True
End Sub