Sub MIRAI_Change()
Dim KUHAKU As Variant

KUHAKU = ThisDocument.fYousei.textAlign

End Sub