Libre:018 ワークシートをコピーする

ワークシートをコピーするのは、

copyByNameを使用します。

 

sub ksCopySheet

dim doc as object
dim originName as string
dim copyName as string

doc = ThisComponent.sheets
originName = “Sheet1”
copyName = “copySheet”
doc.copyByName(originName, copyName, 0)


end sub