Converter macro do excel no BrOffice

[Carol1985]

Caros, tenho uma macro que marca a data e a hora quando uma determinada célula é alterada, além disso, a data e hora ficam fixa. No excel a macro roda que é uma beleza, mas no Calc ela não funciona. Por favor, como faço para converter esta macro para o Calc? Segue a macro:

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 2 And Target.Row > 1 Then

If Cells(Target.Row, 2) <> "" Then

Cells(Target.Row, 1) = Format(Now(), "dd/mm/yy - hh:mm:ss")

Else: Cells(Target.Row, 1) = ""

End If

End If

End Sub

Abraços,

Carol

[Patropi]

Boa tarde Carol

Eu não entendo de macro do BROffice, só um pouco de VBA, mas encontrei um site que faz a conversão dos códigos VBA para BROffice.

Veja como ficou o código após a conversão:

Private Sub Worksheet_Change(ByVal Target As Dim oSheet as Object[n]oSheet = ThisComponent.CurrentController.ActiveSheet[n]oSheet.getCellRangeByName($1))
If Target.Column = 2 And Target.Row > 1 Then
If Cells(Target.Row, 2) <> "" Then
Cells(Target.Row, 1) = Format(Now(), "dd/mm/yy - hh:mm:ss")
Else: Cells(Target.Row, 1) = ""
End If
End If
End Sub

Este é o site que faz a conversão. Basta você copiar e colar o código lá e clicar em submit

http://www.business-spreadsheets.com/vba2oo.asp

Um abraço.

[Carol1985]

Patropi, obrigado pela ajuda!

Eu fiz o que falou, mas ainda assim o BrOffice acusa erro na macro, ou seja, ele continua não reconhecendo, pois acho que o código todo não foi codificado.

Vou continuar procurando uma melhor forma de resolver isso. Apenas preciso que no BrOffice a hora que eu colocar fique fixa, ela não pode ser atualizada.

Essa macro faz isto no excel, pena que não roda no BrOffice.

Muito obrigada Patropi, você é uma amor!!!

Beijos!!!

Continuo aguardando uma solução, quem puder me ajudar!!!

[Schiavinatto]

O LibreOffice Calc tem a função de guardar alterações.

Abra a planilha em questão, vá em:

Arquivos / Propriedades... / Segurança

e marque [X] Gravar alterações. OK

Se quiser por senha pode..

As células alteradas ficam com uma borda vermelha, com uma marca no canto superior esquerda. Quando coloca-se o cursor sobre a célula ela mostra a alteração...