Drawﾃｰﾌﾞﾙのｾﾙ内の行間隔の設定について

"ﾃｰﾌﾞﾙ内の文字の行間を変更したい" についてですが、
ﾃｰﾌﾞﾙ内の各セルは DrawingTextｸﾗｽとして提供されているようです。

そこで、このようなﾃｰﾌﾞﾙを作成し、ｾﾙ(1,1)の位置に改行入りの
ﾃｷｽﾄを入力。　行間隔を3.21mmに設定しました。
f:id:kandennti:20160203123652p:plain

続いて、こんな感じのﾏｸﾛを作成し実行。

'vba
Sub CATMain()
    Dim DrawDoc As DrawingDocument
    Set DrawDoc = CATIA.ActiveDocument
    
    Dim DrawTable As DrawingTable
    Set DrawTable = DrawDoc.Sheets.ActiveSheet.Views.ActiveView.Tables.Item(1)
    
    Dim DrawText As DrawingText
    Set DrawText = DrawTable.GetCellObject(1, 1)
    Stop
End Sub

ｲﾐﾃﾞｨｴｲﾄｳｨｴﾝﾄﾞｳで "3.21" の値になる項目を探してみましたが、
見当たりませんでした。
f:id:kandennti:20160203123700p:plain

行間隔については、ﾌﾟﾛﾊﾟﾃｨとしては提供されていないようです。
（ﾒｿｯﾄﾞに関してはそれっぽい名前のものは無さそうです。）

検索してすると、これらがHitしますが、何れもﾚｽが付いていないので
やはり出来ないものだろうと感じます。
Macro for setting the specified line spacing in multiline text - DASSAULT: CATIA products - Eng-Tips
get line spacing for a text in drafting - DASSAULT: CATIA products - Eng-Tips

そこで代案です。
まず "KANJ" ﾌｫﾝﾄを使用しているのだろうと思うのですが、
他のﾌｫﾝﾄ(SSS4等)に変更するのはどうでしょうか?
"KANJ" ﾌｫﾝﾄは文字がくっ付き過ぎて、特に見づらいのが本音で
僕は基本的に使用しないです。
"SSS4" ﾌｫﾝﾄであれば、行間隔0mmでも見やすいです。
（ﾌｫﾝﾄの変更はﾏｸﾛでも可能なはずです）

"KANJ" ﾌｫﾝﾄで行間隔を・・・　と言うことであれば、
1つ行間隔の設定をしたﾃｰﾌﾞﾙを作成し、ﾗｲﾌﾞﾗﾘ的なDrawﾌｧｲﾙを作成。
ﾏｸﾛのSelectionのｺﾋﾟﾍﾟを利用し取ってくる事は、可能です。
挿入位置にもよりますが、行や列の追加でも行間隔の設定が同じ
状態で増えてくれてるような気がします。

C#ATIA

↑ﾀｲﾄﾙ詐欺　主にFusion360API　偶にCATIA V5 VBA(絶賛ネタ切れ中)

Drawﾃｰﾌﾞﾙのｾﾙ内の行間隔の設定について