[Resolvido]Combo preenchida automaticamente com valor

Olá bom dia, a pergunta é besta mas não estou conseguindo fazer, quero que ao entrar no form de vendas, em novo, ao da enter na combo ela preencha automaticamente com um valor e a numeração automatica seja mudada normalmente.

a tarde posto o bd.

Definir o valor padrão nas propriedades da combo não resolveria?

Então, seguinte, tem que ser como se eu houvesse selecionado a opção da combo, mas quero isso ao clicar novo, ja preenche a combo com um valor =1, mas colocando no valor padrão, fica la o 1, mas não abre novo registro.

para isso tem de mandar o valor da combo para outro campo, tudo na ação do botão

Private Sub seubotaonovo_Click()
DoCmd.GoToRecord , , acNewRec
Me.combo.Value = 1
Me.OutroCampo.Value = Me.combo.Value
End Sub

resolve ?

Olá colega, deu certo ,

DoCmd.GoToRecord , , acNewRec
Me.CBO_Id_Cliente_Vendas.Value = 1
Data_Venda.SetFocus

Muitíssimo obrigado

abração e bom final de semana.

Então amigos, esse autopreenchimento citado anteriormente (Me.OutroCampo.Value = Me.combo.Value) funciona para itens da mesma tabela, como faço para autopreencher pegando os valores de outra tabela?

abraço

que tal o DLookup ?

http://www.speedyshare.com/files/21390149/bd1.mdb

la no formulario tabela1 ao selecionar a rua na caixa de combinação ele autocompleta as caixas de texto abaixo, sendo que os dados são da tabela imovel


valeu pela força

de volta

http://www.speedyshare.com/files/21390587/bd1.mdb

valeu amigo pela ajuda, muito grato

abraço