Como converter macros do Microsoft Office em macros ONLYOFFICE

Quer converter macros VBA do Microsoft Office em macros que podem ser usadas perfeitamente no ONLYOFFICE? Bem, embora não haja uma solução direta para essa necessidade, também apresentaremos as etapas para conversão de macros VBA neste artigo – assim como temos um caso real de um usuário Como converter para referência.

Transformando uma macro do Microsoft Office em uma macro ONLYOFFICE

Macro VBA
Aqui está o código de macro VBA original:

Sub Button1_Click()
Dim mycel As Range
For Each mycel In Columns(“D:D”).SpecialCells(xlCellTypeConstants, 23)
If mycel = [TODAY()] Then mycel.Offset(0, 1) = [This_value]
Next
End Sub

O código de macro verifica

A coluna D em busca Como converter lista de números de telefone celular da américa de células com o valor constante “23” e verifica se o valor em cada célula é igual ao valor da célula marcada [TODAY()]. Se os valores corresponderem, a célula à direita será atualizada e o valor atualizado será o valor na célula marcada como [Este_valor].

Transformando uma macro do Microsoft Office em uma macro ONLYOFFICE

Construindo a macro ONLYOFFICE
No processo Como converter de conversão da macro acima em uma macro JavaScript compatível com ONLYOFFICE, precisamos usar a API ONLYOFFICE .

 

Para a macro ONLYOFFICE

primeiro precisamos obter a planilha ativa por meio da função Api.GetActiveSheet () . Em seguida, obtenha os valores das células A2 e A4 . Essas duas células são as células correspondentes às tags [TODAY()] e [This_value] na macro VBA:

A próxima etapa Como converter é usar sheet.GetRange(“D1:D10”) para definir o intervalo de células que precisa ser iterado. O código aqui determina a coluna D neste exemplo como o intervalo de iteração. No uso real, você pode ajustá-lo de acordo com suas necessidades específicas:

Precisamos usar a função ForEach

para iterar pelas Como número de telefone c converter células em um intervalo definido. Para cada célula, usaremos range.GetValue() para obter seu valor atual e depois compará-lo com o valor na célula A2 . Se houver uma cabos aerodinâmicos correspondência, range.GetRow() será usado para obter o número da linha da célula atual e, em seguida, sheet.GetRange(“E” + row) será usado para obter a célula correspondente na coluna E.

Leave a Comment

Your email address will not be published. Required fields are marked *

Scroll to Top