Como faço para nomear uma planilha com os dados de uma célula?

[GilsonRodrigues]

Senhores,

Gostaria de saber como faço para nomear uma planilha (aba) com os dados de uma de suas células?
Tenho uma planilha mensal onde cada aba leva o nome do dia útil, porém quando vira o mês eu só preciso atualizar só a primeira aba, pois as seguintes atualizam automaticamente por meio das funções que inseri. Gostaria apenas que as abas fossem nomeadas de acordo com alteração que eu fizesse na célula que altera os dias úteis.

[schiavinatto]

Resposta melhorada, macro revisada.

Sub PegarStringCelulaAtualENomearAba
'================================================|
Dim oSel as Object
Dim var1 As String
    oSel = ThisComponent.getCurrentSelection()
    Var1 = oSel.getString()
dim document   as object
dim dispatcher as object
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dim args3(0) as new com.sun.star.beans.PropertyValue
args3(0).Name = "Name"
args3(0).Value = Var1
dispatcher.executeDispatch(document, ".uno:RenameTable", "", 0, args3())
end Sub

.