Pergunte aqui

Perfil de Jamilson - atividade

2019-11-01 19:01:40 +0100 Medalha recebida  Pergunta famosa (fonte)
2019-08-19 15:42:07 +0100 Medalha recebida  Pergunta famosa (fonte)
2019-08-13 15:27:13 +0100 Medalha recebida  Pergunta notável (fonte)
2019-08-04 01:34:23 +0100 Medalha recebida  Pergunta popular (fonte)
2019-08-01 17:16:30 +0100 Pergunta editada Como conto 31 dias e não 30 dias, no mês de 31 dias?

Como conto 31 dias e não 30 dias, no mês de 31 dias? C:\fakepath\formula2.png Como eu conto 31 dias e não 30 dias, no m

2019-08-01 17:15:42 +0100 Pergunta editada Como conto 31 dias e não 30 dias, no mês de 31 dias?

Como conto 31 dias e não 30 dias, no mês de 31 dias? C:\fakepath\formula2.png

2019-08-01 17:12:43 +0100 Pergunta editada Como conto 31 dias e não 30 dias, no mês de 31 dias?

Como conto 31 dias e não 30 dias, no mês de 31 dias? Como eu conto 31 dias e não 30 dias, no mês de 31 dias? Já utiliz

2019-08-01 17:11:55 +0100 Pergunta editada Como conto 31 dias e não 30 dias, no mês de 31 dias?

Como eu conto 31 dias e não 30 dias, no mês de 31 dias?

2019-08-01 17:10:51 +0100 Perguntou Como conto 31 dias e não 30 dias, no mês de 31 dias?

Como eu conto 31 dias e não 30 dias, no mês de 31 dias?

2019-06-13 18:58:48 +0100 Medalha recebida  Pergunta popular (fonte)
2019-05-17 01:54:55 +0100 Resposta comentada Salvar no banco dados símbolo/número /Data

Obrigado @Conrado, estarei estudando estes variáveis e aplica. Muito obrigado

2019-05-17 01:49:55 +0100 Medalha recebida  Torcedor (fonte)
2019-05-17 01:49:54 +0100 Marcada como a melhor resposta Salvar no banco dados símbolo/número /Data

Boa noite a todos! Estou criando uma planilha para controle de certificados de calibração de equipamentos com banco dados na mesma planilha, porem ao registrar os dados uns dos campos"colunas" no banco dados esta desconfigurando "eles contem número / símbolo de % e na outra data", já procurei Internet e não encontro informação do erro, mais as outras colunas estão normais. esta planilha terá vários formulários diferentes para lançar em um só bando dados. obrigado Descrição da imagem REM BASIC Rem Attribute VBA_ModuleType=VBAModule Option VBASupport 1 Sub lsAdiciona2() Dim iTotalLinhas As Integer

Worksheets("Banco").Activate
Range("Banco!$A$1").Select

iTotalLinhas = Cells(Rows.Count, 1).End(xlUp).Row + 1

Cells(iTotalLinhas, 1).Value = Range("Banco!$CY$1").Value + 1
Cells(iTotalLinhas, 2).Value = UCase(Range("Formulario_2!C5").Value)  'Código
Cells(iTotalLinhas, 3).Value = Range("Formulario_2!L9").Value         'Nº Novo Cert:
Cells(iTotalLinhas, 4).Value = UCase(Range("Formulario_2!C15").Value) 'Padrão SI
Cells(iTotalLinhas, 5).Value = UCase(Range("Formulario_2!C16").Value) 'Padrão SI
Cells(iTotalLinhas, 6).Value = Range("Formulario_2!C17").Value        'Padrão SI
Cells(iTotalLinhas, 7).Value = UCase(Range("Formulario_2!C18").Value) 'Padrão SI
Cells(iTotalLinhas, 8).Value = UCase(Range("Formulario_2!C19").Value) 'Padrão SI
Cells(iTotalLinhas, 9).Value = UCase(Range("Formulario_2!C20").Value) 'Padrão SI
Cells(iTotalLinhas, 10).Value = UCase(Range("Formulario_2!C21").Value) 'Padrão SI
Cells(iTotalLinhas, 11).Value = UCase(Range("Formulario_2!C22").Value) 'Padrão SI
Cells(iTotalLinhas, 12).Value = UCase(Range("Formulario_2!C23").Value) 'Padrão SI
Cells(iTotalLinhas, 13).Value = UCase(Range("Formulario_2!C24").Value) 'Padrão SI
Cells(iTotalLinhas, 14).Value = UCase(Range("Formulario_2!C25").Value) 'Padrão SI
Cells(iTotalLinhas, 15).Value = UCase(Range("Formulario_2!C26").Value) 'Padrão SI
Cells(iTotalLinhas, 16).Value = UCase(Range("Formulario_2!C27").Value) 'Padrão SI
Cells(iTotalLinhas, 17).Value = UCase(Range("Formulario_2!C28").Value) 'Padrão SI
Cells(iTotalLinhas, 18).Value = UCase(Range("Formulario_2!C29").Value) 'Padrão SI
Cells(iTotalLinhas, 19).Value = UCase(Range("Formulario_2!D15").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 20).Value = UCase(Range("Formulario_2!D16").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 21).Value = UCase(Range("Formulario_2!D17").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 22).Value = UCase(Range("Formulario_2!D18").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 23).Value = UCase(Range("Formulario_2!D19").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 24).Value = UCase(Range("Formulario_2!D20").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 25).Value = UCase(Range("Formulario_2!D21").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 26).Value = UCase(Range("Formulario_2!D22").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 27).Value = UCase(Range("Formulario_2!D23").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 28).Value = UCase(Range("Formulario_2!D24").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 29).Value = UCase(Range("Formulario_2!D25").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 30).Value = UCase(Range("Formulario_2!D26").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 31).Value = UCase(Range("Formulario_2!D27").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 32).Value = UCase(Range("Formulario_2!D28").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 33).Value = UCase(Range("Formulario_2!D29").Value) 'Instrumento a Calibrar
Cells(iTotalLinhas, 34).Value = UCase(Range("Formulario_2!E15").Value) '1º Ciclo Subida
Cells(iTotalLinhas, 35).Value = UCase(Range("Formulario_2 ...
(mais)
2019-05-17 01:46:17 +0100 Resposta comentada Salvar no banco dados símbolo/número /Data

Obrigado Gilberto o código esta muito bom. agora e só estuda ele mais. obrigado mais uma vez

2019-05-14 17:02:48 +0100 Medalha recebida  Pergunta notável (fonte)
2019-05-14 04:07:42 +0100 Pergunta comentada Salvar no banco dados símbolo/número /Data

Gilberto era minha maquina que esta travando, seque anexo planilha.

2019-05-14 04:06:07 +0100 Pergunta comentada Salvar no banco dados símbolo/número /Data

era minha maquina que esta travando, seque anexo planilha.

2019-05-14 04:04:02 +0100 Pergunta editada Salvar no banco dados símbolo/número /Data

Salvar no banco dados símbolo/número /Data Boa noite a todos! Estou criando uma planilha para controle de certifica

2019-05-14 01:03:08 +0100 Pergunta comentada Salvar no banco dados símbolo/número /Data

era minha maquina que esta travando, seque abaixo planilha.

2019-05-14 01:01:30 +0100 Respondeu uma pergunta Salvar no banco dados símbolo/número /Data

C:\fakepath\CRIANDO CONTROLE CERTIFICADO -2019.ods

2019-05-13 23:56:56 +0100 Resposta comentada Salvar no banco dados símbolo/número /Data

Oi Levi, este procedimento já realizei, o problema esta na hora de gravar os dados com código.

2019-05-13 23:55:23 +0100 Pergunta comentada Salvar no banco dados símbolo/número /Data

Conrado mandei para seu mail, ok. Gilberto não estou conseguindo anexar a planilha.

2019-05-13 16:30:34 +0100 Medalha recebida  Pergunta popular (fonte)
2019-05-09 03:34:25 +0100 Pergunta comentada Salvar no banco dados símbolo/número /Data

queira me desculpa pois estou estudando ainda sobre o calc, mais ai esta o código que estou criando. cada formulário ter

2019-05-09 03:31:31 +0100 Pergunta editada Salvar no banco dados símbolo/número /Data

Salvar no banco dados símbolo/número /Data Boa noite a todos! Estou criando uma planilha para controle de certifica

2019-05-09 03:27:06 +0100 Perguntou Salvar no banco dados símbolo/número /Data

Salvar no banco dados símbolo/número /Data Boa noite a todos! Estou criando uma planilha para controle de certifica

2019-05-09 01:28:32 +0100 Resposta comentada Como Salvar Dados do Calc no Base através de Macro ???

ok obrigado

2019-05-07 21:46:22 +0100 Resposta comentada Como Salvar Dados do Calc no Base através de Macro ???

Boa tarde! Todos Se eu criar um banco dados no base, como eu poderia criar um formulário de pesquisa?

2019-05-07 21:40:42 +0100 Medalha recebida  Pergunta boa (fonte)
2019-05-07 21:29:15 +0100 Marcada como a melhor resposta Armazena os dados na próxima linha disponivel do formulários

Boa tarde

Estou criando um formulário no calc onde salva os dados em uma plan2. todos os dados estão sendo saldo, porem a data esta indo como texto ex: ('15/06/2016), como corrigir?

Sub Guardar_Datos()
'-------------------------------------------------------------------
   Dim xDato As Variant, nRow As Long

   If MsgBox( "Você deseja salvar as alterações?", 33, "Diálogo en Calc" ) =  1 Then
      nRow = UltimaFila( 1 )
      With oDialogo.Model
         xDato = .DateField1.Text
         ThisComponent.Sheets(1).GetCellByPosition(0,nRow).SetFormula( xDato ) "estas que esta dando erro!!!!!"
     xDato = .TextField2.Text
     ThisComponent.Sheets(1).GetCellByPosition(1,nRow).SetFormula( xDato )

     xDato = .TextField3.Text
     ThisComponent.Sheets(1).GetCellByPosition(2,nRow).SetFormula( xDato )

     xDato = .TextField4.Text
     ThisComponent.Sheets(1).GetCellByPosition(3,nRow).SetFormula( xDato )

     xDato = .TextField5.Text
     ThisComponent.Sheets(1).GetCellByPosition(5,nRow).SetFormula( xDato )

     xDato = .TextField6.Text
     ThisComponent.Sheets(1).GetCellByPosition(6,nRow).SetFormula( xDato )

     xDato = .TextField7.Text
     ThisComponent.Sheets(1).GetCellByPosition(7,nRow).SetFormula( xDato )

     xDato = .TextField8.Text
     ThisComponent.Sheets(1).GetCellByPosition(8,nRow).SetFormula( xDato )

     xDato = .TextField9.Text
     ThisComponent.Sheets(1).GetCellByPosition(9,nRow).SetFormula( xDato )

     xDato = .TextField10.Text
     ThisComponent.Sheets(1).GetCellByPosition(10,nRow).SetFormula( xDato )


     xDato = .ComboBox1.Text
     ThisComponent.Sheets(1).GetCellByPosition(4,nRow).SetFormula( xDato )


     .DateField1.Text = ""
     .TextField2.Text = ""
     .TextField3.Text = ""
     .TextField4.Text = ""
     .TextField5.Text = ""
     .TextField6.Text = ""
     .TextField7.Text = ""
     .TextField8.Text = ""
     .TextField9.Text = ""
     .TextField10.Text = ""


     .ComboBox1.Text = ""
     End With
   End If
End Sub
2019-04-05 14:33:35 +0100 Perguntou Como carregar um formulário de pesquisa Calc ?

como carregar um formulario de pesquisa calc? 1º - Pergunta - tenho um formulário que lança os dados, agora tenho que re

2019-04-05 14:23:05 +0100 Medalha recebida  Pergunta notável (fonte)
2019-04-05 14:22:09 +0100 Pergunta editada Ocultar calc?

Ocultar calc? boa noite Estou a procura de um código para abrir um formulário e ocultar LIBREOFFICE CALC ao fechar o fo

2018-05-11 19:02:46 +0100 Medalha recebida  Pergunta popular (fonte)
2018-04-13 20:41:00 +0100 Pergunta editada Vinculo dados .txt

Vinculo dados .txt Oi Tenho uma planilha calc, onde eu tenho dados externo para atualizar. estes dados são .txt, como e

2018-04-13 20:40:30 +0100 Resposta comentada Vinculo dados .txt

Obrigado a todos pelas respostas me ajudou muito

2018-03-17 17:38:48 +0100 Medalha recebida  Pergunta famosa (fonte)
2018-02-23 19:59:56 +0100 Resposta comentada Vinculo dados .txt

Isso mesmo Antônio o filtro na importação obrigado

2018-02-23 19:58:48 +0100 Marcada como a melhor resposta Vinculo dados .txt

Oi Tenho uma planilha calc, onde eu tenho dados externo para atualizar. estes dados são .txt, como eu relaciono isso? pois ao entra em vincular a dados externo / tela "dados externo" , no campo fonte, estou selecionando o documento .Txt, não esta indo para o campo tabelas e intervalos disponíveis.

assim não liberando o campo OK. como eu resolve isso? ou o libreOffice .calc não importa dados em .txt.!

2018-02-23 19:58:48 +0100 Resposta comentada Vinculo dados .txt

Beto, isso mesmo que o Antônio informou configuração na importação. obrigado se conseguir a soma por macro era melhor ai