Valor de la Sangría

hola, Victor !

Como puedo saber el valor que le doy a un texto con sangria..?
es decir en la opción de formato tenemos el valor "2", cuando le hemos dado dos sangrias al texto
quisiera que ese valor "2", se me reflejara en una celda independiente...

[segun yo]... la -unica ?- opcion que tienes es definir una funcion personalizada que te lo 'informe' :)) [p.e.]
en un modulo de codigo 'normal' ==Function Sangria(ByVal Ref As Range) As Byte
Sangria = Ref.Cells(1).IndentLevel
End Function

la 'forma' de usarla [igual que las funciones integradas de excel] es:
-> suponiendo que necesitas conocer que sangria aplicaste a la celda 'A1'...
llama a la funcion en otra celda [p.e.] -> =Sangria(A1)

el inconveniente es que 'el informe' SOLO se 'actualizara'... cuando entres/edites/mofifiques/... -> la referencia [en este caso A1] :-((
la 'razon' ?... [hasta donde se]... NO existe ningun evento que 'detecte' cambios en los formatos de las celdas :-(( [es decir]...
si SOLO modificas/cambias/aplicas/... formatos o sangrias diferentes [de la anterior]... -> SIN EDITAR 'la celda'...
-> no habra 'cambios que mostrar/actualizar/...' -> por efectos de la -sola- funcion personalizada :-(

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.