質問する

crisdoxavier's profile - activity

2019-04-24 22:02:07 +0200 バッジを受け取った  有名な質問 (source)
2019-02-25 15:48:31 +0200 バッジを受け取った  卓越した質問 (source)
2019-02-25 14:12:25 +0200 ベストアンサーマーク Como negar o operador Like no LibreOffice Basic

Bom dia, pessoal. Estou tentando criar um código que verifique se uma célula tem fórmula no VBA e para isso estou usando o operador Like. Primeiro, faço o seguinte:

Dim Plan Ativa 'Defino a Planilha onde está sendo executado o código
Dim Range 'Defino o intervalo de células
Dim Formula ' Defino a matriz onde serão colocadas as fórmulas de Range

PlanAtiva = ThisComponent.CurrentController.getActiveSheet
Range = PlanAtiva.getCellRangeByPosition(0, 1, 10, 3)
Formula = Range.getFormulaArray

Formula, então, vira uma matriz dentro de uma matriz, sendo a matriz extrena correspondente às linhas e a matriz interna correspondente às colunas. Chega então o momento em que tenho que verificar se há fórmula ou não. Eu quero que verifique se não há fórmula. Eu fiz desse jeito:

If Not Formula(0)(0) Like "=*" Then

O que gera um erro " Tipos de dados incompatíveis". Se eu fizer sem o Not, roda sem problemas, mas eu queria justamente o contrário.

2019-02-25 14:12:25 +0200 バッジを受け取った  学者 (source)
2019-02-25 14:10:28 +0200 コメント付き回答 Como negar o operador Like no LibreOffice Basic

Acabei de testar também. Deu certo. Muito Obirgado.

2019-02-25 14:05:14 +0200 バッジを受け取った  卓越した質問 (source)
2019-02-21 02:02:11 +0200 バッジを受け取った  人気の質問 (source)
2019-02-19 14:15:28 +0200 編集された質問 Como negar o operador Like no LibreOffice Basic

Como negar o operador Like no LibreOffice Basic Bom dia, pessoal. Estou tentando criar um código que verifique se uma cé

2019-02-19 14:02:08 +0200 質問をする Como negar o operador Like no LibreOffice Basic

Como negar o operador Like no LibreOffice Basic Bom dia, pessoal. Estou tentando criar um código que verifique se uma cé

2019-02-17 16:58:06 +0200 バッジを受け取った  卓越した質問 (source)
2019-01-24 17:33:17 +0200 バッジを受け取った  体系学者
2019-01-18 10:54:14 +0200 バッジを受け取った  人気の質問 (source)
2019-01-17 20:15:28 +0200 バッジを受け取った  編集者 (source)
2019-01-17 20:15:28 +0200 編集された質問 Função com Objeto Range como argumento pega Matriz de Dados do Range

Função com Objeto Range como argumento pega Matriz de Dados do Range Olá, pessoal. Não sei se minha pergunta foi clara,

2019-01-17 19:13:13 +0200 質問をする Função com Objeto Range como argumento pega Matriz de Dados do Range

Função com Objeto Range como argumento pega Matriz de Dados do Range Olá, pessoal. Não sei se minha pergunta foi clara,

2019-01-14 19:31:38 +0200 ベストアンサーマーク Definir Hora de Execução de Macro

No VBA, eu usava o Application.OnTime para definir a hora de execução de uma Macro. Como faço o mesmo no LibreOffice Basic?

2019-01-02 11:45:47 +0200 バッジを受け取った  人気の質問 (source)
2018-12-29 20:30:46 +0200 バッジを受け取った  人気の質問 (source)
2018-12-29 15:54:21 +0200 バッジを受け取った  ナイス質問 (source)
2018-12-28 18:44:46 +0200 バッジを受け取った  熱心な人
2018-12-27 23:04:59 +0200 ベストアンサーマーク Como faço o end(xlup) no LibreOffice Basic

Uso muito a propriedade end(xlup) no VBA para descobrir a última linha preenchida da planilha. Gostaria de saber como fazer isso no LibreOffice Basic. Abaixo um exemplo da função que uso no VBA

`

Function fUltimaLinhaPlan(PlanRef As String) As Long

fUltimaLinhaPlan = ThisWorkbook.Worksheets(PlanRef).Range("A1048576").End(xlUp).Row

End Function

`

2018-12-27 17:20:41 +0200 質問をする Definir Hora de Execução de Macro

Definir Hora de Execução de Macro No VBA, eu usava o Application.OnTime para definir a hora de execução de uma Macro. Co

2018-12-19 13:30:06 +0200 ベストアンサーマーク Como faço para copiar uma fórmula de uma célula para outra no Basic

Desejo fazer isso mantendo as refêrencias relativas. Por exemplo, se na célula C2 a fórmula é A2+B2, na célula C3 tem que ser A3+B3.

2018-12-11 15:09:00 +0200 質問をする Como faço para copiar uma fórmula de uma célula para outra no Basic

Como faço para copiar uma fórmula de uma célula para outra no Basic Desejo fazer isso mantendo as refêrencias relativas.

2018-12-07 05:01:51 +0200 バッジを受け取った  卓越した質問 (source)
2018-12-06 19:34:17 +0200 編集された質問 Como faço o end(xlup) no LibreOffice Basic

Como faço o end(xlup) no LibreOffice Basic Uso muito a propriedade end(xlup) no VBA para descobrir a última linha preenc

2018-12-06 19:33:37 +0200 コメント付き回答 Como faço o end(xlup) no LibreOffice Basic

Olá. Testei a solução, mas ela tem um problema. Essa Função retorna a última linha menos 1. Naturalmente, posso fazer al

2018-12-06 11:08:49 +0200 バッジを受け取った  人気の質問 (source)
2018-12-05 18:33:05 +0200 バッジを受け取った  生徒 (source)
2018-12-05 15:39:55 +0200 質問をする Como faço o end(xlup) no LibreOffice Basic

Como faço o end(xlup) no LibreOffice Basic Uso muito a propriedade end(xlup) no VBA para descobrir a última linha preenc