Private Sub Form_Open(Cancel As Integer) ReSizeForm Me DoCmd.Maximize End Sub
Precisa dar uma olhada nas propriedades do frm.
................................................................................. Caso tenha resolvido a tua duvida, coloque o tópico como resolvido. www.maximoaccess.com/t860-resolucao-de-topicos
"Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
Private Sub Form_Open(Cancel As Integer) ReSizeForm Me DoCmd.Maximize DoCmd.GoToRecord , , acNewRec Me.CodBarras.SetFocus Texto52.Visible = False
................................................................................. Caso tenha resolvido a tua duvida, coloque o tópico como resolvido. www.maximoaccess.com/t860-resolucao-de-topicos
"Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
Como estão as propriedades do formulário ?? autocentralizar = sim autoredimensionar = sim ajustar a tela = sim
estilo da borda = fina movivel = sim
pop = sim janela restrita = não
................................................................................. Caso tenha resolvido a tua duvida, coloque o tópico como resolvido. www.maximoaccess.com/t860-resolucao-de-topicos
"Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
Saudações Lupérico, espero que tudo vá bem contigo.
Eu deixo ela no fino, mas vou passar para ajustável.
Abraços a ambos.
................................................................................. Caso tenha resolvido a tua duvida, coloque o tópico como resolvido. www.maximoaccess.com/t860-resolucao-de-topicos
"Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
Com relação ao outro tópico, em que tu me respondeu, acho que não vai funfar, pois utilizo um frm com subfrm.
Preciso gerar duas vias, uma para cliente e outra para a oficina.
Abraços
................................................................................. Caso tenha resolvido a tua duvida, coloque o tópico como resolvido. www.maximoaccess.com/t860-resolucao-de-topicos
"Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."