質問する

Conrado's profile - activity

2019-10-15 13:57:04 +0200 ベストアンサーマーク Retornar campo data de dialog para célula

Pessoal, estou tentando colocar um valor de data dentro de um dialog para uma célula no Calc.

Estou usando este comando:

REM  *****  BASIC  *****

Dim oDialog1 As Object

Sub Dialog1Show
DialogLibraries.LoadLibrary( "Standard" )
oDialog1 = CreateUnoDialog( DialogLibraries.Standard.Dialog1 )
oDialog1.Execute()
End Sub

Sub ReadNSaveDialog1 ()

    txtTeste = oDialog1.GetControl("txtTeste")
    Data_RNC = oDialog1.GetControl("Data_RNC")

    lastrow = LastRowNumber()
    ThisComponent.Sheets(3).getCellByPosition(0, lastrow).setString( txtTeste.Text)
    'ThisComponent.Sheets(3).getCellByPosition(1, lastrow) = CDateFromIso(Data_RNC)

    txtTeste.Text = ""
    'Data_RNC.Date = ""

End Sub


Function LastRowNumber () as Long

    Dim oDoc        as Object
    Dim lastRow     as Long
    Dim oSheet      as Object
    Dim oCol, rd, find, aray

    oDoc = ThisComponent
    oSheet = oDoc.Sheets().getByName("Lancamento")
    oCol = oSheet.getColumns().getByIndex(0)
    rd = oCol.createReplaceDescriptor
    rd.searchRegularExpression = true
    rd.setSearchString(".")
    find = oCol.FindAll(rd)
    aray = Split(find.AbsoluteName, "$")
    LastRowNumber = aray(ubound(Aray))
    'Print LastRowNumber
End Function

E esta Tela

Descrição da imagem

Consigo Colocar o valor do textfield, mas o valor do datafield já esgotei minhas possibilidades de pesquisa e tentativas.

Segue arquivo para apreciação corrigido

C:\fakepath\Controle_RNC_Materia_Prima_LibreOffice.ods

2019-10-15 00:36:19 +0200 バッジを受け取った  有名な質問 (source)
2019-10-11 18:18:21 +0200 コメント付き質問 SOMASE Diversas Abas

@Gilberto Schiavinatto, lembro sim destas funções, mas elas apenas funcionam se os dados estiverem nas mesmas posições.

2019-10-11 18:15:34 +0200 コメント付き質問 Enviar dados Caixa de Texto para celula planilha

@anderson, olha a minha resposta editada que tem seu código corrigido

2019-10-11 16:41:25 +0200 編集された回答 Enviar dados Caixa de Texto para celula planilha

@anderson Favor corrigir seu código para povoar seu combobox e depois associe a macro quando o mesmo receber foco Sub

2019-10-11 16:40:04 +0200 編集された回答 Enviar dados Caixa de Texto para celula planilha

Favor corrigir seu código para povoar seu combobox e depois associe a macro quando o mesmo receber foco > > Sub A

2019-10-11 16:39:29 +0200 編集された回答 Enviar dados Caixa de Texto para celula planilha

Favor corrigir seu código para povoar seu combobox e depois associe a macro quando o mesmo receber foco Sub Atualiza

2019-10-11 16:35:33 +0200 コメント付き質問 Enviar dados Caixa de Texto para celula planilha

@anderson , vc chegou a ver o código do arquivo que coloquei para abastecer meu combobox e como associei ele? Você prec

2019-10-11 16:32:45 +0200 コメント付き質問 Enviar dados Caixa de Texto para celula planilha

@anderson , vc chegou a ver o código do arquivo que coloquei para abastecer meu combobox?

2019-10-11 16:30:49 +0200 編集された質問 SOMASE Diversas Abas

SOMASE Diversas Abas Pessoal, Alguém tem alguma sugestão de como fazer SOMASE (tenho critério de código) para diversas

2019-10-11 16:30:15 +0200 質問をする SOMASE Diversas Abas

SOMASE Diversas Abas Pessoal, Alguém tem alguma sugestão de como fazer SOMASE (tenho critério de código) para diversas

2019-10-09 12:55:22 +0200 質問に回答する Enviar dados Caixa de Texto para celula planilha

Olá @evaldo e @Gilbero Schiavinatto Segue uma planilha que elaborei para cálculo de densidade de isopores aqui para emp

2019-09-30 19:02:40 +0200 バッジを受け取った  有名な質問 (source)
2019-09-23 16:03:47 +0200 編集された回答 Como faço para pesquisar uma palavra no texto?

@bete Supondo que o texto esteja na célula A1 Função: =PESQUISAR("digite sua palavra aqui" ; A1) Uma simples pesquis

2019-09-23 15:57:56 +0200 質問に回答する Como faço para pesquisar uma palavra no texto?

@bete Supondo que o texto esteja na célula A1 Função: =PESQUISAR("digite sua palavra aqui"; A1) Uma simples pesquisa

2019-09-23 13:39:20 +0200 コメント付き回答 Função PROCV com mais de um critério

Olá @Lucmec , favor criar uma nova pergunta com suas dúvidas. Dessa forma auxilia toda a comunidade.

2019-09-23 13:39:05 +0200 コメント付き回答 Função PROCV com mais de um critério

Olá @Lucmec , favor criar uma nova pergunta com suas dúvidas.

2019-09-20 18:47:22 +0200 コメント付き回答 Enviar dados do listbox para testbox ao clicar

o Arquivo está anexado à resposta do dia 18/08 desta pergunta

2019-09-20 18:44:51 +0200 コメント付き回答 Criar ListBox

@evaldo , Este arquivo não é meu. É do @joaorochaj

2019-09-06 12:54:48 +0200 コメント付き回答 Como fazer uma macro rodar em apenas uma planilha?

Todas as suas macros tem as mesmas variáveis? Já tentou mudar elas? Exemplo: oSheet1 = Plan1 oSheet2 = Plan2 etc

2019-09-06 12:54:20 +0200 コメント付き回答 Como fazer uma macro rodar em apenas uma planilha?

Todas as suas macros tem as mesmas variáveis? Já tentou mudar elas?

2019-09-05 16:32:30 +0200 質問に回答する Porque Não Consigo adicionar item em uma ListBox no USerForm

A variávle Meta.model está errada. Deixe apenas oListBox.additem(Meta.Text, 0)

2019-09-05 13:47:23 +0200 編集された回答 Como fazer uma macro rodar em apenas uma planilha?

Sub RodarPlanilhaEspecifica Dim oSheet as Object Dim oDoc as Object oDoc = ThisComponent oSheet = o

2019-09-05 13:46:56 +0200 編集された回答 Como fazer uma macro rodar em apenas uma planilha?

Sub RodarPlanilhaEspecifica Dim oSheet as Object Dim oDoc as Object oDoc = ThisComponent

2019-09-05 13:46:29 +0200 編集された回答 Como fazer uma macro rodar em apenas uma planilha?

Sub RodarPlanilhaEspecifica Dim oSheet as Object Dim oDoc as Object oDoc = ThisComponent oSheet = oDoc

2019-09-05 13:41:39 +0200 質問に回答する Como fazer uma macro rodar em apenas uma planilha?

Sub RodarPlanilhaEspecifica End Sub

2019-08-21 12:38:41 +0200 コメント付き質問 Problemas com o funcionamento do arquivo

Inicialmente o ideal seria deixar todos os libreoffices instalados com as mesmas versões e completos. A questão de indi

2019-08-16 22:16:52 +0200 コメント付き回答 Maneira para totalizar diversas planilha em uma.

@Gilberto Schiavinatto, realmente muito triste o fim da Revista. Vamos nos viramos com o que temos né. Em relação a com

2019-08-16 21:42:06 +0200 編集された回答 Maneira para totalizar diversas planilha em uma.

A maneira mais rápida e a soma em "profundidade". Por exemplo tendo diversas planilhas idênticas e queira totalizar a c

2019-08-16 21:35:11 +0200 編集された回答 Maneira para totalizar diversas planilha em uma.

A maneira mais rápida e a soma em "profundidade". Por exemplo tendo diversas planilhas idênticas e queira totalizar a c

2019-08-16 21:32:58 +0200 編集された回答 Maneira para totalizar diversas planilha em uma.

A maneira mais rápida e a soma em "profundidade". Por exemplo tendo diversas planilhas idênticas e queira totalizar a c

2019-08-16 12:57:52 +0200 編集された質問 Documentação para Macros Basic - Calc - Referencia

Documentação para Macros Basic - Calc - Referencia Apenas como referencia vou deixar aqui alguns links interessantes de

2019-08-16 12:57:35 +0200 編集された質問 Documentação para Macros Basic - Calc - Referencia

Documentação para Macros Basic - Calc - Referencia Apenas como referencia vou deixar aqui alguns links interessantes de

2019-08-07 12:43:41 +0200 コメント付き回答 Condensar linhas com mesmo nome

@vitor alves , segue links https://www.youtube.com/watch?v=Mqi5BJwzAzo https://help.libreoffice.org/Calc/Creating_Pivo

2019-08-06 21:42:01 +0200 コメント付き回答 Condensar linhas com mesmo nome

já pensou em tabela dinâmica?

2019-08-01 19:27:16 +0200 コメント付き回答 Como conto 31 dias e não 30 dias, no mês de 31 dias?

@Jamilson , complementando a resposta do @mrKalvin, para extrair o último dia apenas como resultado (ex.: 28, 30, 31) a

2019-08-01 19:26:45 +0200 コメント付き回答 Como conto 31 dias e não 30 dias, no mês de 31 dias?

@Jamilson , complementando a resposta do @mrKalvin, para extrair o último dia apenas seria =DIA(FIMMÊS(A1;0))

2019-07-31 12:44:44 +0200 コメント付き質問 O número de páginas está errado

@Ana P, tente remover todas as quebras de página inicialmente. Depois que fizer isso, ajuste a página do documento, e ac

2019-07-22 12:48:21 +0200 編集された回答 Intervalo para cor nos gráficos calc

@Júnio Vieira Olha aí o que eu achei... Primeiramente precisa utilizar a função COR, selecionar o código RGB de cada c

2019-07-22 12:46:27 +0200 コメント付き回答 Intervalo para cor nos gráficos calc

@Júnio Vieira, tem uma outra forma de fazer gráficos de barras ou colunas, com indicações de cores diferentes. Segue arq

2019-07-19 22:08:30 +0200 質問に回答する Intervalo para cor nos gráficos calc

@Júnio Vieira Olha aí o que eu achei... Primeiramente precisa utilizar a função COR, selecionar o código RGB de cada c

2019-07-19 18:35:28 +0200 コメント付き質問 Intervalo para cor nos gráficos calc

@Júnio Vieira ... somos 02....tentei buscar conteúdo disso na internet, e não tem absolutamente nada. Nem na Wiki do Lib

2019-07-17 13:07:18 +0200 コメント付き回答 Converter String para Moeda via macro

@Júnio Vieira feliz que deu certo.

2019-07-16 19:48:26 +0200 コメント付き質問 Converter String para Moeda via macro

já tentou utilizar Cdbl(Variável) Referência https://docs.microsoft.com/pt-br/office/vba/language/concepts/getting-st

2019-07-16 13:35:35 +0200 コメント付き回答 Inserir TABELA estilo excel

Acho muito complicado esta tarefa de "tabela" escrita em Python, apesar de ajudar muito os usuários. Geralmente as pesso

2019-07-10 12:53:28 +0200 コメント付き質問 Como faço para fazer somas especiais em uma consulta?

@S1CAIME, já verificou o tipo de dados destes 02 campos? Estão como Número ou Texto?

2019-07-04 00:50:53 +0200 バッジを受け取った  素晴らしい回答 (source)
2019-07-03 18:40:21 +0200 編集された質問 Documentação para Macros Basic - Calc - Referencia

Documentação para Macros Basic - Calc - Referencia Apenas como referencia vou deixar aqui alguns links interessantes de

2019-07-03 18:39:40 +0200 編集された回答 Apostila programação calc

@Júnio Vieira Olha ai https://ask.libreoffice.org/pt-br/question/194292/material-para-aprender-libre-office-base-e-cal

2019-07-03 18:37:35 +0200 質問に回答する Apostila programação calc

@Júnio Vieira Olha ai https://ask.libreoffice.org/pt-br/question/194292/material-para-aprender-libre-office-base-e-cal