[Resolvido]abrir formulario e pre preencher um campo

Boa tarde

Mais uma vez necessito da ajuda dos mestres deste forum, pretendia que quando o formulario "brigadasdocumentação" fosse aberto em modo de adição de dados quer seja aberto atraves do Frmprincipal ou outra forma qualquer o campo nº brigada aparecese preenchido com o maior dos nº existente na tabela "Brigadasdocumentação" para o campo nºde brigada acrescendo-lhe uma um, na DB anexa deveria aparecer com o nº 8425, pois o maior nº na tabela é 8424+1, obrigado.

Tente assim:

Me.NomeCampo = DMax("NomeCampo", "NomeTabela") + 1

Obrigado, resultou, no entanto tive de alterar o tipo de dados do compo pois estavam como texto e tive de alterar para numero, mas deposi resultou na perfeição.
Ja agora precisava de mais uma ajuda, tenho um formulario "brigadas", noqual eu coloquei um botão pesquisa vançada e ele abre um novo formulario de pesquisa, onde eu tenho associada uma consulta que mostra todos os registos da tabela "brigadas" e deposi eu posso fazer pesquisa por varios criterios, apos essa pesquisa fica paenas o/os registos correspondentes ao filtro em que eu posso seeccionar um registo, este form de epsquisa tem depois um btaõ de fechar,eu pretendia que ao fechar o form pesquisa actualizasse o form brigadas com a brigada que eu seleccionei no form pesquisa, mas não estou a conseguir , tamebm não tenho conseguido adicionar a db, mas vou tentar novamente. Se poder ajudar agradeço.

Pode tentar assim:

Forms!NomeDoForm.RecordSource = "SELECT * FROM NomeDaTabela WHERE CampoIDDaTabela=" & Me.CampoIDDoFormAtual & ""

FormAtual é o formulário que foi aberto com o filtro e que você quer fechar. Se não resultar, faça uma pesquisa no fórum por FilterOn.

boa noite

desta vez não estou a conseguir, resolver o problema e mais uma vez não consigo disponibilizar a DB, da semopre um erro a dizer nome invalido.
Mas pronto agradecia a sua ajuda para ver se consigo resolver a questão, em anexo envio prints dos form em questão, no primeiro print quando clicar no botão pesquisa avançada abre o form sistema depesquisa,que é o 2º print, o que eu pretendo é que apos encontrar o nome ou registo pretendido na listagem do formulario de pesquisa, deposi de seleccionar esse registo quando clicar em fechar os dados do primeiro formulario devem mudar para o registo que eu escolhi no form anterior (form sistema de pesquisa).o Formularia brigadas documentação depois da pesquisa devera apresentar osdados correspondentes ao registo seleccionado no form de pesquisa.
Obrigado mais uma vez pela sua ajuda.

ola a todos, venho mais uma vez solicitar a vossa ajuda, eu percebo pouco de VBA e entãotenho um botão no formularia pesquisabrigadas com este codigo:

Private Sub Comando27_Click()
Dim StrUnidade As String

StrUnidade = Nz(Me.Lista.Column(0), "")
If StrUnidade <> "" Then
Forms!frmclientes.RecordSource = "SELECT * FROM tblclientes WHERE IDcliente=strunidade"
DoCmd.Close acForm, "frmPesquisabrigadas"
Else
MsgBox "Seleccione uma brigada na lista."
End If
strnome = ""
End Sub


O que eu pretendo com este codigo é que ao clicar abra o form frmclientes no registo com o idcliente = ao valor da variavel strunidade, mas não estou a perceber o que é que estou a fazer mal, podem ajudar-me?

Boa noite Jorge,

Ao meu ver, não está dando certo por que você está fechando o formulário de pesquisa sem deixar a informação do IdCliente.

Se realmente for preciso fechar o formulário, deixa a informação em uma variável para ser usada conforme sua necessidade.

Quanto à sua dificuldade em enviar o arquivo, quando for compactar escolha a extensão ZIP que será aceita.


Nivaldo.

Boa noite
Obrigado Nivaldo
Ja onsegui alterei o codigo e ficou assim:
Private Sub Comando33_Click()

Dim StrUnidade As String

StrUnidade = Nz(Me.LstBrigadas.Column(0), "")
If StrUnidade <> "" Then
filtro = "[IDcliente]=" & StrUnidade
DoCmd.OpenForm "frmclientes", acNormal, , filtro, , acDialog
DoCmd.Close acForm, "frmPesquisabrigadas"
Else
MsgBox "Seleccione uma brigada SFF"
'Limpa a variãvel pública
strEntidade = ""
End If

Mais uma vez obrigado, tenho a certeza que ate concluir o projecto ainda vou necessitar de mais ajuda, mas ja fui buscar uns livros de VBA para access esta a ajudar pois eu não percebia quase nada disto, agora ja começo a perceber a logica mas ainda estou muito longe dos mestres!!! Mais uma vez obrigado

Valeu pelo Retorno Jorge,

O fórum agradece.

Nivaldo

Obrigados a todos os que ajudaram a resolver este caso.