【LibreOfficeマクロ】シート挿入・削除・名前変更


関数とサンプル

【覚えておきたい関数】

  • シート名重複チェック:getSheets().hasByName(シート名)
  • シート挿入:getSheets().insertNewByName(シート名,位置)
  • シート削除:getSheets().removeByName(シート名)
  • シート名変更:getSheets(シート番号).Name = "新たなシート名"
ソースコード
Sub Main

'アクティブシート取得
Dim oSheets As Object
oSheets = ThisComponent.getSheets()

Dim shtName2 As String
Dim shtName3 As String
shtName2 = "Sheet2"
shtName3 = "Sheet3"

'シート名重複チェック
if oSheets.hasByName(shtName2) = false then
‘Sheet2シート 1シート目の右側に挿入
oSheets.insertNewByName(shtName2,1)
end if

if oSheets.hasByName(shtName3) = false then
‘Sheet3シート 2シート目の右側に挿入
oSheets.insertNewByName(shtName3,2)
end if

'シート名変更
oSheets(1).Name = "Sheet2変更"

'シート名削除 これでSheet3は削除
oSheets.removeByName(shtName3)
End Sub

実行結果

目次はこちら
>> LibreOfficeマクロ入門講座 目次

スポンサーリンク

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

*

Time limit is exhausted. Please reload CAPTCHA.