OOobbs/83
質問
お世話になっています。またまた初歩的な質問ですみません。 マクロで印刷範囲の解除をする方法について教えてください。 お願いします。 回答
Sub printarea_1 Dim oDoc As Object Dim oSheet As OBject Dim aRange As New com.sun.star.table.CellRangeAddress oDoc = ThisComponent oSheet = oDoc.Sheets(2) With aRange .Sheet = 0 .StartColumn = 0 .StartRow = 0 .EndColumn = 2 .EndRow = 9 End With oSheet.setPrintAreas(Array(aRange)) oSheet.setPrintAreas(Array()) ' <---- End Sub 最後の行のように,空の配列を指定することで印刷範囲の指定がなくなります。
|