A pesquisa encontrou 1885 resultados

por Avelino Sampaio
22 Set 2018, 13:46
Fórum: Formulários
Tópico: [resolvido] Form não abre com criteria
Respostas: 2
Exibições: 6

Re: Form não abre com criteria

Fernando, uma das opções é verificar, antes de abrir o formulário de apólices, se a tabela contém a apólice deste cliente específico. Podemos utilizar a função DCount() . Algo assim: Dim stLinkCriteria As String stLinkCriteria = "[NomeCliente]='" & Me![txtNomeCliente] & "&...
por Avelino Sampaio
22 Set 2018, 08:53
Fórum: Tabelas
Tópico: Substituir texto na tabela
Respostas: 1
Exibições: 3

Re: Substituir texto na tabela

Drigo,

estude sobre a função Replace(). Algo assim:

Código:
currentdb.execute "UPDATE NomeDaTabela SET [nomecampo] = replace([nomecampo],'uma','varios');"


Nota: Realize um backup da tabela antes do teste

Aguardamos
por Avelino Sampaio
21 Set 2018, 21:17
Fórum: Módulos VBA
Tópico: BOLETO CAIXA - NOVA NORMA FEBRABAN
Respostas: 4
Exibições: 17

Re: BOLETO CAIXA - NOVA NORMA FEBRABAN

Damasceno, a norma se encontra disponível neste link da Caixa Econômica: https://www.caixa.gov.br/Downloads/cobranca-caixa/Manual_Leiaute_CNAB400_SIGCB.pdf Neste outro link da caixa, vá na seção downloads, e baixe o aplicativo validador, para vc testar se o arquivo remessa criado está montado corret...
por Avelino Sampaio
13 Set 2018, 07:29
Fórum: Formulários
Tópico: [resolvido] Instrução SQL
Respostas: 2
Exibições: 15

Re: Instrução SQL

Fernando,

obrigado pelo feedback!
por Avelino Sampaio
07 Set 2018, 09:39
Fórum: Formulários
Tópico: APARÊNCIA PROFISSIONAL
Respostas: 1
Exibições: 642

Re: APARÊNCIA PROFISSIONAL

up
por Avelino Sampaio
06 Set 2018, 18:18
Fórum: Ribbons
Tópico: [resolvido] Botão "atualizar Backstage" no MontaRibbons não funciona!
Respostas: 4
Exibições: 38

Re: Botão "atualizar Backstage" no MontaRibbons não funciona!

ByDevSis,

sim, a versão 2007 não possui a área Backstage. Isso foi introduzido a partir da versão 2010

Sucesso!
por Avelino Sampaio
06 Set 2018, 13:56
Fórum: Formulários
Tópico: [resolvido] Criar Pasta com Path completo
Respostas: 4
Exibições: 28

Re: Criar Pasta com Path completo

Fernando, altere conforme parte em vermelho e teste: Dim aplicativo As String Dim Arquivo As String Dim fso As Object Dim msg, Style, Title Dim Apolice$ Apolice = replace(me!txtApólice,"/","_") aplicativo = "c:\WINDOWS\explorer.exe" Arquivo = "C:\agenciaseg...
por Avelino Sampaio
05 Set 2018, 21:54
Fórum: Formulários
Tópico: [resolvido] Criar Pasta com Path completo
Respostas: 4
Exibições: 28

Re: Criar Pasta com Path completo

Fernando,

não pode ser feito desta forma ?

C:\agenciaseguros\Clientes\NomeCliente\987654_Set_2018

Aguardamos
por Avelino Sampaio
05 Set 2018, 18:41
Fórum: Access x MySql
Tópico: Imagem na Web.
Respostas: 2
Exibições: 47

Re: Imagem na Web.

por Avelino Sampaio
05 Set 2018, 18:22
Fórum: Ribbons
Tópico: [resolvido] Botão "atualizar Backstage" no MontaRibbons não funciona!
Respostas: 4
Exibições: 38

Re: Botão "atualizar Backstage" no MontaRibbons não funciona!

Bydevsis,

qual é a versão do seu Access ?

Aguardamos
por Avelino Sampaio
05 Set 2018, 14:46
Fórum: Formulários
Tópico: combox com a opcao de todos
Respostas: 1
Exibições: 31

Re: combox com a opcao de todos

mSilveir, Utilize uma consulta UNION para preencher a combobox e assim vc consegue colocar "todas" encabeçando a lista. Algo assim no cnstrutor de consultas: SELECT idFilial as ID, NomeFilial AS NomeF, '1' as pos FROM tblFiliais UNION SELECT '0' as ID,'Todas as Filiais&...
por Avelino Sampaio
03 Set 2018, 15:03
Fórum: Ribbons
Tópico: [resolvido] salvar relatórios em Excel
Respostas: 2
Exibições: 35

Re: salvar relatórios em Excel

msilveir,

acrescente a seguinte linha:

Código:
<button idMso="ExportExcel" size="large"  visible="true"/>


Aguardamos
por Avelino Sampaio
25 Ago 2018, 12:03
Fórum: Tabelas
Tópico: [resolvido] Calculo usando Seimed e Ou
Respostas: 6
Exibições: 116

Re: Calculo usando Seimed e Ou

Dias,

use o SOMA() conforme descrito no tutorial indicado.

Aguardamos
por Avelino Sampaio
23 Ago 2018, 10:36
Fórum: Tabelas
Tópico: [resolvido] Calculo usando Seimed e Ou
Respostas: 6
Exibições: 116

Re: Calculo usando Seimed e Ou

Dias,

faça os cálculos direto no relatórios/formulário. Veja como neste meu artigo:

http://www.usandoaccess.com.br/tutoriais/somar-contar-e-numerar-em-relatorios.asp?id=1#inicio

Bom estudo!
por Avelino Sampaio
23 Ago 2018, 10:08
Fórum: Consultas
Tópico: [resolvido] Retornar apólices a vencer em 30 dias
Respostas: 2
Exibições: 57

Re: Retornar apólices a vencer em 30 dias

Fernando,

crie um campo virtual na consulta, que irá contar os dias, em relação a DataTérmino

Código:
Dias: DifData("d";Data();[dataTérmino])


E na linha de critérios, coloque:

Código:
<=30 E >0


Aguardamos
por Avelino Sampaio
23 Ago 2018, 09:54
Fórum: Tabelas
Tópico: [resolvido] Calculo usando Seimed e Ou
Respostas: 6
Exibições: 116

Re: Calculo usando Seimed e Ou

Dias, minha dica é para vc ir montando em passos e testando. Exemplo: 1º teste Seimed([qtdepedido]="";"";"ok") 2º teste, estando ok o primeiro. Seimed([qtdepedido]="";""; Seimed([falta]="sim";"Em Falta";"ok&qu...
por Avelino Sampaio
22 Ago 2018, 08:00
Fórum: Consultas
Tópico: Ao Cancelar/Fechar caixa de consulta parametrizada, abrir outro formulário
Respostas: 3
Exibições: 72

Re: Ao Cancelar/Fechar caixa de consulta parametrizada, abrir outro formulário

Eberson,

sugiro utilizar o formulário personalizado deste meu artigo:

http://www.usandoaccess.com.br/tutoriais/inputbox-com-entrada-para-senha.asp

No final do artigo tem o código necessário para quando vc cancelar ou fechar a caixa. Basta introduzir a chamada do seu formulário xpto.

Aguardamos
por Avelino Sampaio
07 Ago 2018, 09:50
Fórum: Access x MySql
Tópico: Função AddItem não aceita ponto e virgula
Respostas: 1
Exibições: 130

Re: Função AddItem não aceita ponto e virgula

João

por que vc não salva com outro caracter. Por exemplo, com uma Barra (|).

Quando for utilizar o campo, basta usar a função replace(). Algo assim:

Código:
.send =replace(me!NomeCampoEmail,"|",";")


Aguardamos
por Avelino Sampaio
29 Jul 2018, 08:49
Fórum: Módulos VBA
Tópico: [resolvido] Pegar ultimo regitro
Respostas: 2
Exibições: 116

Re: Pegar ultimo regitro

Wesley, vc pode utilizar a função Dlast() para capturar o ultimo ID lançado. Exemplo Dlast("id","tblClientes") Para inseiri um novo registro em uma tabela com este ID, utilize a consulta INSERT INTO . Exemplo: currentdb.execute "INSERT INTO tblLista (id) VALU...
por Avelino Sampaio
29 Jul 2018, 08:36
Fórum: Módulos VBA
Tópico: [resolvido] capturar usuário do maestro no frm em uma cx não Acoplada
Respostas: 2
Exibições: 92

Re: capturar usuário do maestro no frm em uma cx não Acoplada

Idiframk, acrescente a linha em vermelho, no código do botão OK, do formulário de login. ... 'repassa a identificação do usuário para a variável login login.Id = .Column(0) 'IdUsuário login.Usuario = .Column(1) 'Nome do usuário TempVars!Usuario = .Column(1) 'e...
por Avelino Sampaio
24 Jul 2018, 21:21
Fórum: Módulos VBA
Tópico: [resolvido] Carregar Imagens via Link
Respostas: 4
Exibições: 164

Re: Carregar Imagens via Link

Sidney,

em que evento no relatório vc esta fazendo isso ? tem que ser no evento "Ao imprimir" da seção detalhe.

Aguardamos
por Avelino Sampaio
24 Jul 2018, 19:10
Fórum: Módulos VBA
Tópico: [resolvido] Carregar Imagens via Link
Respostas: 4
Exibições: 164

Re: Carregar Imagens via Link

Sidney,

está escolhendo o tipo de campo errado (campo OLE) para inserir a imagem. Escolha o objeto "quadro imagem"

Aguardamos

Pesquisa avançada