CALC　マクロ　　H行のアクティブなセルの値を取得

CALC　マクロ　　H行のアクティブなセルの値を取得

シート　H行のアクティブなセルのセル値を取得するマクロ

AIにマクロを作成してもらいました。
ブラウザからLibreOffice CALC マクロ　H行　アクティブセルのセル値取得・・・

マクロの動作を記述するとそれっぽいマクロを作成してくれます
希望どうりのマクロになるとうに工夫して記述すれば(^^)
ＡＩは言葉のクセがあるみたいです。

H行のアクティブになっているセルの値を表示
------------------------------------------------------------------------------

Sub GetActiveCellValueInHColumn
Dim oSheet As Object
Dim oActiveCell As Object
Dim sCellValue As String

oSheet = ThisComponent.CurrentController.getActiveSheet()
oActiveCell = ThisComponent.CurrentSelection

' H列のアクティブセルかどうかを確認
If oActiveCell.supportsService("com.sun.star.sheet.SheetCellRange") Then
If oActiveCell.RangeAddress.EndColumn = 7 Then ' H列は列番号7 (A=0, B=1, ..., H=7)
sCellValue = oActiveCell.DataArray(0)(0)
MsgBox "H列のアクティブセルの値: " & sCellValue
Else
MsgBox "H列のアクティブセルではありません。"
End If
Else
MsgBox "セルを選択してください。"
End If
End Sub
------------------------------------------------------------------------------

　LibreOffice BASIC(マクロ）

　ホームページ