Jump to content
Fórum Script Brasil
  • 0

Impressão personalizada usando o VB


Question

Pessoal estou precisando de ajuda para conseguir finalizar o projeto de impressão personalizada do Formulário em Access 2010:

o Problema esta na distribuição da quantidade no dia da semana já pré-definido na régua do formulário, para isso usei o VB para chamar o Tabela "Pedidos em Carteira", porem não consegui criar uma rotina no VB para o sistema enxergar a "Data Entrega" e distribuir no Relatório "Pedidos em carteira consultaA", Alguém tem alguma ideia de como fazer isso?

Projeto1.JPG

Projeto2.JPG

Link to post
Share on other sites

7 answers to this question

Recommended Posts

  • 0

Boa tarde @Souzahor

Seria algo dessa maneira?

image.thumb.png.a3740adb07e522c1088458c847acf74f.png

Eu criei o seguinte código que vai percorrer por todas as colunas criadas:

	...	
	For i = 1 To 15 Step 1
    	Controls("Qtd" & i).Value = DSum("Quantidade", "Pedidos_Em_Carteira", "Produto = " & Me.Produto & " AND [Data Entrega] = " & CDbl(CDate(Controls("D" & i).Value)))
	Next i
    ...

image.thumb.png.cd4c0d044b1278d8d3e7fc13b15ee9d6.png

Na formula DSum ou DSoma(usando o access mesmo) dá para fazer igual ao Somases do excel assim coloquei dois critérios para pesquisa (Produto e Data de Entrega).

Claro que para ter duas colunas eu criei mais um registro na tabela mostrando a coluna extra:

image.thumb.png.1eec95d8c462fd7e22fcae7326e85625.png

Eu fiz outra alteração do código completo:

image.thumb.png.2e758130de63b83acceef39a4f9ce366.png

É dessa maneira?

Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Cloud Computing


  • Forum Statistics

    • Total Topics
      149422
    • Total Posts
      645925
×
×
  • Create New...