Dear, here is a library link that contains several compiled functions to assist in the development of basic macros: https://extensions.libreoffice.org/en/extensions/show/34128
Olá @DIORGENES
Poderia ser mais fácil o acesso ao uso…
Poderia ter deixado uma Biblioteca desprotegida com explicações e acesso, e as Macros em outras Bibliotecas protegidas. seria mais pratico.
Boa tarde Sr. Schiavinatto.
remPara usar as funções da biblioteca, tem que passar a senha conforme abaixo:
remBasta chamar somente 1 vez essa função
const senha=“108-121-106-122-131-77-76-108-106-74-76-121-122-106-76-75-120-106-122-131-75-77-105-134-109-120-363-370-129-126-151-120-94-90-148-131-121-129-90-91-121-131-130-91-89-121-125-91-94-148-131-121-130-125”
global autorizado as boolean
function autorizar() as boolean
if(autorizado<>true) then
GlobalScope.BasicLibraries.loadLibrary(“Disoftware”)
Acesso.Iniciar(senha)
if(Acesso.IniEstado()=true) then
autorizado=true
else
autorizado=false
end if
end if
autorizar=autorizado
end function
rem*****************para copiar de uma cédula e colocar em outra seria****************
rem****no caso copia da cedula A1 da Planilha1 e cola na cedula A2 da Planilha1
sub alterar
if(autorizar()) then
valor=Documentos.extrair(thisComponent,“Planilha1.A1”)
Documentos.alterar(thisComponent,“Planilha1.A2”,valor)
end if
end sub
(Attachment exemplo de extrair e alterar cedula.txt is missing)