Code: Select all
ThisComponent.sheets(0) is ThisComponent.sheets(0)
Code: Select all
ThisComponent.sheets(0) is ThisComponent.sheets(0)
Code: Select all
sub test_2()
dim sht_1 as variant
dim sht_2 as variant
sht_1 = ThisComponent.sheets.getByIndex(1)
sht_2 = ThisComponent.sheets.getByIndex(1)
if sht_1 is sht_2 then
MsgBox "True"
else
MsgBox "Not True " & sht_1.name & " " & sht_2.name
end if
end sub
Code: Select all
…
if sht_1.Name = sh_2.Name then
…
end if
…