0

NeoOffice (Mac OO クローン) で Basic マクロを作成しています。マクロの実行時にカーソルがあるテーブルのセルを強調表示/選択したいと考えています。

Google は次の関連するスニップセットを提供してくれました。これはセルに色を付けますが、代わりにマウスで行うように選択/強調表示したいと考えています。私は正しい軌道に乗っていると感じています...

Sub selectCell
    Dim the_Cursor   As Object
    Dim the_CurCell   As Object

    the_CurCell=thisComponent.currentSelection(0).cell
    the_Cursor=the_CurCell.CreateTextCursorByRange(the_CurCell.start)
    the_Cursor.GoRight(1, true) 'le curseur recouvre toute la cellule
    the_Cursor.GoLeft(1, true) 'le curseur recouvre toute la cellule

    'the_CurCell.setPropertyValue("BackColor", 16711935) ' Magenta clair / Light Magenta
End Sub

何か案は?

PS: 同じバージョンの OO に基づくべき NeoOffice v3.3 を実行しています。

4

1 に答える 1