Nelinhor

Boa Tarde Carros amigo de blog ISSO TUDO É NO ACCESS 2007 Estou com um problema e não estou sabendo resolver na minha Caixa Combinada eu estou conseguindo trazer os valores tando pela consulta como alterando na OPÇÃO --> ORIGEM DA LINHA isto selecionando a Caixa de Combinação mundo para a tabela aonde consta os dados que eu quero trazer para varios FIELD. Exemplos: Eu no filed de buscar que é a Caixa Combinada eu seleciono ou digito o nome que eu quero. Ele me traz para o filed nome = a Caixa Combinada Só que eu quero que ele traga também os outros dados desta pesquisar. Tais como o ENDEREÇO, BAIRRO, CIDADE, ESTADO, CEP e outros mais. Lembrando que todas estas informações se encontra na mesma tabela. Também foi feito por me uma field de pesquisar também para trazer estás informações ele também fuinciona mais eu tenho que digitar o nome completo e eu gostaria de usar uma combinação, como usar no LIKE. Este é CODE para o field de pesquisar Private Sub txtBuscar_AfterUpdate() Dim Nom As String Dim NNom As String Nom = Len(RTrim(txtBuscar)) MsgBox "Nome do Prestador: " & Mid([NOME], 1, Nom) Me.NOME = Mid([NOME], 1, Nom) NOME = Me.NOME MsgBox "Nome do Prestador: " & Me.NOME Me.NOME = DLookup("NOME", "tb_Cliente", "NOME ='" & txtBuscar & "'") Me.ENDEREÇO = DLookup("ENDEREÇO", "tb_Cliente", "NOME ='" & txtBuscar & "'") Me.BAIRRO = DLookup("BAIRRO", "tb_Cliente", "NOME ='" & txtBuscar & "'") Me.CIDADE = DLookup("CIDADE", "tb_Cliente", "NOME ='" & txtBuscar & "'") Me.CEP = DLookup("CEP", "tb_Cliente", "NOME ='" & txtBuscar & "'") Me.ESTADO = DLookup("ESTADO", "tb_Cliente", "NOME ='" & txtBuscar & "'") Me.IDENTIDADE = DLookup("IDENTIDADE", "tb_Cliente", "NOME ='" & txtBuscar & "'") End Sub Atenciosamente,

Bom dia Venho por meio deste documento solicitar uma ajuda dos amigos para criar um script com uma forma de pesquisar mais ampla, que me der uma condiação de fazer nesta pesquisar usando 04 criterios informado no script. select --rd.cd_registro_documento, --rd.cd_documento Cod_Doc, d.ds_documento Doc, u.nm_usuario Responsavel_Preenchimento, rd.dt_registro Data_Registro, rd.cd_atendimento Atend, p.cd_paciente Pront, p.nm_paciente Paciente, p.nm_bairro, rr.ds_resposta Texto, decode(p.nr_fone,null,'Não Informado',p.nr_fone) Fone from dbamv.registro_documento rd, dbamv.registro_resposta rr, dbamv.documento d, dbamv.atendime a, dbamv.paciente p, dbasgu.usuarios u where rd.cd_registro_documento = rr.cd_registro_documento and rd.cd_documento = d.cd_documento and rd.cd_atendimento = a.cd_atendimento and a.cd_paciente = p.cd_paciente and rd.nm_usuario = u.cd_usuario --- É neste campo que eu quero fazer a condição da pesquisar. and ( rr.ds_resposta like '% MOTO %' and d.ds_documento like '%GUIA DE TRANSFERÊNCIA / ENCAMINHAMENTO%' ) -- % MOTO % % moto % % motocicleta % % MOTOCICLETA % and trunc(rd.dt_registro) between '01/09/2012' and '30/09/2012' order by rd.dt_registro

Boa Noite Amigos estou com um problema de principiante estou tentando obter uma informação em uma tabela no Access 2007 vinculada ao OBDC na maquina que eu trabalho eu tenho acesso as tabelas consigo visualizar consigo buscar os dados necessários para as necessidades do Diretor do Hospital mais quando vou criar um campo para fazer uma pesquisar e da pesquisar gerar um relatório não consigo. O que fazer estou precisando muito da ajudados amigos deste fórum quem pode mim ajudar? Estou com o prazo vencido preciso destas informações o mais urgente possível, obrigado a todos. Atenciosamente,

:mellow: Bom dia para todos. Estou tentando criar uma macro de filtragem e ao mesmo tempo tentando copiar o seu resultado em outra planilha. Minha macro e o seguinte: Tenho um Arquivo no Excel com varias planilha e varias colunas. Na coluna " PREVISÃO DE ESTOQUE " eu tenho varios valores e preciso fazer um filtro na mesma por um macro, vocês deve esta perguntando por que pelo macro se existe a opção de filtro na barra de ferramenta. Tenho quer filtrar os valores = ou < que uma condição " 0,50" Será que alguns dos colegas poderia me ajudar? Atenciosamente. :closedeyes: