Alyson Ronnan Martins

Boa tarde. Teria como mandar essa plabilha para agente do site olhar e identificar porque não esta colocando na aba home.

God Morning. Do you try the Comand "Now()" ? send us a printscreen

Bom dia. Testa o seguinte comando: CurrentDb.Execute "INSERT INTO TBL_parcelamento_vendas(unidade_ctr,data_vcto,valor_pc, descr_parc)" _ & " Values(" & Me.txtDescricao.Value & ", #" & Format(StrDateAdd, "mm/dd/yyyy") & "#, " & StrValorParc & ", 'Mensal');"

Bom dia. Teria como mandar um print dessa tela mostrando como é a pesquisa que você esta realizando?

Boa noite @esdrasfoundit tem tempo ainda para dizer como é o resultada da busca que você quer?

Tenta usar o seguinte comando: Declare: 'Habilita o Sleep na aplicação #If VBA7 Then Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) #Else Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) #End If Depois use o comando Sleep: Public Sub MensagemTexto() 'Mensagem que vai esperar 2 segundos Sleep 2000 MsgBox "Teste" End Sub

Boa noite @rl28, Desculpa mais não entendi o objetivo.

@iagokomel Boa noite. Bom para saber qual linha fazer as alterações você pode usar o For para encontrar qual linha tek que fazer alteração. Conhece esse comando?

Boa tarde @GfSouza Você fez um código vba para pegar as informações do Access?

Boa tarde @lbcarvalho Duvidas para te ajudar: A sua tabela "A" uma coluna indexada ou de chave primária? Qual o objetivo desta coluna?

@iagokomel desculpa eu ter deixo o texto pela metade. Mais você colocando o ID na hora de salvar ou editar você sempre manda olhar a linha que tem esse ID a noite termino uma alteração na sua planilha e te mando.

Boa noite @iagokomel Vamos dividir o problema. ¹Como excluir de maneira mais fácil: Acho que você deve dar um numero para cada linha fazendo assim que o VBA encontre a linha que vai ser excluida.

@AdmiltonAlves Teria como mandar uma tela e explicar nessa aonde você quer que calcule?

@iagokomel Boa tarde. Qual o intuito de usar o Word para exportar os dados do vba? Os dados dos alunas estão armazenados aonde?

Boa tarde @biaabdu Primeiro manda o código que está usando no formulario para armazenar para tentar fazer contigo uma verificação antes de lançar.

Primeiro usando o For na tabela para achar as demandas que estejam em andamento: uLinhaDemanda = Sheets("Demanda").Cells(Rows.Count, "L").End(xlup).row for x = 2 to uLinhaDemanda step 1 If Sheets("Demanda").Cells(x, "L").Value = "Andamento" then 'lançar os dados da linha atual na outra planilha uLinhaHome = Sheets("Home").Cells(Rows.Count, "A").End(xlup).Row With Sheets("Home") .cells(uLinhaHome, "A").Value = Sheets("Demanda").Cells(x, "A").value 'Coloque as outras colunas aqui Enf With next x Olha se consegue lançar os dados na outra tabela. Ps. Escrevi usando o celular no ônibus então pode ir algum erro.

Boa tarde @Sebástian Como estamos no Access a maneira mais rápida é criar uma consulta. Mais pelo que estou entendo você está fazendo sql. Utilize o Left John para amarrar as duas tabelas. Qual o campo que você está informando para localizar a empresa?

Boa tarde @Marcelo Ricardo Tem sim mais precisamos ver as tabelas. Utilize imagens ou uma planilha com valores fictícios.

@ROGERIO BESERRA DA SILVA No banco de dados eu criei uma tabela para armazenar aonde esta o formulário(em que registro) e coloquei um comando em VBA para atualizar essa tabela. No anexo que mandei em a tabela que chamei de logRegistro e dentro da tabela tem a coluna Tabela. Você pode usar o nome do formulário para armazenar. A ideia é sempre que o registro for mudado uma tabela quarda ande você esta no formulário e depois quando você for abrir o formulário é levado direto ao ultimo registro visualizado. Olha se entendeu

Boa noite @ROGERIO BESERRA DA SILVA. Você coloca uma tabela para armazenar o registro atual. Private Sub Form_Current() 'Capturar o Código atual CurrentDb.Execute ("UPDATE logRegistro SET Registro = " & Nz(Me.[Código], 0) & " WHERE Tabela = 'tblClientes';") End Sub e ao abrir pega o registro armazenado e mandar ir para ele: Private Sub Form_Open(Cancel As Integer) 'Se o regitros armazenado for 0 vai para um novo registro If DLookup("[Registro]", "logRegistro", "Tabela = 'tblClientes'") = 0 Then DoCmd.GoToRecord , , acNewRec Else DoCmd.GoToRecord , , acGoTo, DLookup("[Registro]", "logRegistro", "Tabela = 'tblClientes'") End If End Sub Mandando também ai a tabela para servir de exemplo. https://drive.google.com/open?id=1RV2_A0UDhRlWCIrs5PtCb5GDeHC0tJWA

Oi @Leandro Fernandes Boa tarde. Estou indo devagar para não entender errado. Precisa saber até aonde você fez aí você responde: N1-Digita a data e manda carregar. 2 - vba vai abrir a outra planilha 3 - a função "for" vai passar nas linhas para entrar os valores e digitar eles na sua planilha inicial. 4 - fechar a planilha sem salvar as alterações Me aonde você está?

Eu usaria assim NZ(Dsoma(), 0)

@ROGERIO BESERRA DA SILVA bom dia. Eu também tive esse problema é resolvi criando uma tabela para armazenar o último registro que o formulário estava aberto. No evento antes de fechar coloque para editar a tabela Aonde está guardando o registro e no evento ao abrir mande o macro ir para o registro. Isso que passei é o conceito que usei se tiver mesmo assim com dúvida avisa ok? Para funcionar como um tipo de log

Boa tarde @AdmiltonAlves o comando seria mais assim: textbox47.valeu = sheets(combobox.value).cells(1, "A").value Olha se começou a entender.

Boa tarde @Leandro Fernandes Vamos ao primeiro caso. Sabe cria a tela de colocar a data?