お世話になってます。 リッチテキストに画像を貼付けようとしておりますが、 フォーカスをリッチテキストフィールドに当てる都合上、 必ず行頭に挿入されてしまいます。 行頭ではなく、最後の行に挿入する為には、現在の行数 をなんらかの手段で取得し、（例えば改行を数えるとか） その数分だけ、@Command([EditDown]; ?) すれば良いと 思っているのですが、この行数を数える手法が見当たり ません。 式でもロータススクリプトでも良いので、わかる方がいら っしゃましたらおしえてください。 なお、画像の挿入は以下の式またはロータススクリプトで 記述しております。 式： @Command([EditGotoField]; "リッチテキストフィールド名"); @Command([FileImport]) ロータススクリプト： Sub Click(Source As Button) Dim workspace As New NotesUIWorkspace Dim uidoc As NotesUIDocument Set uidoc = workspace.CurrentDocument Call uidoc.GotoField("リッチテキストフィールド名") Call uidoc.Import End Sub よろしくお願い致します。