063と同じようにRowsプロジェクトを取得し、

isVisibleをTrueに設定します。

Sub HideOrShowRow()
Dim objSheet As Object
Dim objCell As Object
Dim objRow As Object

objSheet = ThisComponent.CurrentController.ActiveSheet
objCell = objSheet.getCellRangeByName(“A3”)
objRow = objCell.Rows
objRow.IsVisible = True

End Sub