Alyson Ronnan Martins

Não é o seu email. Gmail que mandei o projeto?

Bom dia @astrahvh Consigo sim ajudar. Imagino que o login seja ativado quando o usario debita o crédito, nesse caso você criaria uma tavela para usuarios ativos e ao logar verifica na tabela se esta ativo ou não. Claro que teria que fazer o evento colocar na tabela "usuarios ativos" e depois na tabela definir como falso quando o usuario logar.

Boa tarde @Souzahor Seria algo dessa maneira? 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 ... 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: Eu fiz outra alteração do código completo: É dessa maneira?

Pesquisando sobre o assunto, sim é uma ferramenta para o biscador do Bing. <meta name="msvalidate.01" content="4BE9A236252D15311B31D1EA103EE632" /> Assim que eeta no seu?

Boa tarde @thiago ff rocha Teria como mandar uma foto do valores e de como você quer que fique?

Bom dia. Você pode colocar no onedrive ou google drive e colocar o link aqui no fórum ou mandar no email alysonronnan@gmail.com

Boa tarde @Souzahor Teria como mandar o arquivo acesse com valores fictício para enter melhor como fez o formulário? Parece ser tabel dinámica porem não estou compreendendo como esta distribuindo as colunas (eu usaria soma se do access, no caso das colunas serem fixas).

Boa tarde @Marcelo Vieira da Silva Para evitar os erros com o offset eu uso a seleção direta. O seu macro é para selecionar a ultima celula vazio e colar valores?

Bom dia @André Marino. Eu recomendo você da uma pesquisada em fazer conexão via json. Ele faz exatamente o que precisa, manda os dados para o php e retornar esses dados via javascript. Ai você faz a sua pagina alterar conforme a resposta do php. Olha se consegue, se não seria importante mandar um exemplo da sua pagina para fazer um código dela.

Você já consegui fazer a conexão funcionar? Depois que a conexão já esta ok ai vem a parte de consultar sem ser por formulários... Já passou dela? Ai vamos para o Formulário

Boa noite@tcorrea. Eu uso o seguinte código: Sub MyMainMacro() ' Pausa por 15 segundos. Application.OnTime Now + TimeValue("00:00:02"), "MyDelayMacro" End Sub Public Sub MyDelayMacro() ' Macro executada sob o agendamento. MsgBox "Esta macro foi executada após 15 segundos." End Sub Eu usava esse mais depois de alguma versões do office parei de usar: Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) Sub Sleep() Sleep 1000 'Faz o código esperar por 1 segundo End Sub

Eu recomendaria usar o Método GET no fórmula já que é uma consulta com. (Mais funciona usando o POST) Quando carregar a pagina indicada utilize o mesmo metodo para pegar os dados: SELECT * FROM banco1 WHERE nome = ' $_POST['nome']' Antes de acessa o banco de dados, faça um "Echo" no seu SQL para ver se eata pegando a informação do formulário corretamente.

Bom dia @powerinformatica Faltou colocar a classe css no botão para que ele fique oculto na hora que a pagina carregar. <button type="submit" class="btHidden">ASSINAR</button> </div> Isso vai fazer esconder o botão quando a pagina carregar e se marcar a checkbox vai mostrar

Boa noite @romline5. Vamos dizer que você precisa pegar o nome do cliente e apresentar no site e você tem apenas o email dele. SELECT * FROM `cliente` WHERE `email` = 'fulano@gmail.com' Vai retornar apenas a pessoa que tem esse email, porém caso tenha mais de uma pessoa com email ou adiciona mais critérios ou limita o resulta do SQL SELECT * FROM `cliente` WHERE `email` = 'fulano@gmail.com' LIMIT 1

Eu recomendaria usar o Javascript para fazer essa ação em tempo real. Primeiro defini um css que "esconda" o botão e adicionei a classe ao botão: .btHidden{ display: none; } <div> <button type="submit" class="btHidden">ASSINAR</ button> </ div> Agora que o botão não esta aparecendo eu criei um javascript que vai tirar ou colocar a classe: <script> // Selecione o elemento checkbox var $ckLiberar = document.querySelector('input#semestral'); // adciona o evento ao clicar nele $ckLiberar.addEventListener('click', function(event){ // selecione o elemento botão var divButton = document.querySelector('button') // remove ou adciona a classe btHidden divButton.classList.toggle('btHidden'); }); </script> Olha se consegue adaptar no seu projeto.

Boa noite @Kleberson Laureano Reis Já traduzi alguns "plugins" do wordpress e já encontrei campos que eram preenchidos pelo banco de dados. Faz uma pesquisa no seu MySQL para ver se consegue encontrar o texto.

Boa noite @Alex Pedrozo Qual linha do código esta sendo marcada pelo erro de execução?

Boa noite @thcferreira Tenta simular se o código consegue selecionar o campo que esta puxando os valores em questão, exemplo: ThisWorkbook.Sheets("Consolidado_QTD").select ... Workbooks(ArqPeriferico).Sheets(plan_inic).select Se você abrir o visualbasic e executar o comando CTRL + G vai abrir a "Verificação Imediata" Caso ele dê erro ao selecionar a planilha ( o nome da planilha deve estar diferênte, justificando o erro 9) ou a aba.

Boa noite @Enver Garcia Ficou meio vago o seu objetivo. Tem algum exemplo de como esta seu projeto nessa parte o que quer fazer exatamente?

Show!

Procura por esse cara: CodeSMART 2013 for VB6

Boa noite @jumbizinho Eu tentei simular a formula usada no VBA mais parece estar errada

Boa noite @geraldo pereira. Eu criei um módulo e coloquei um variável publica, depois eu creio uma comando para mudar o valor da variável ou definir. Public corEnabledTextBox Public Sub setColorText() corEnabledTextBox = &HFF& End Sub Quando o formulário foi iniciado ele preencheu a variável com a cor do comando Private Sub UserForm_Initialize() setColorText End Sub E criei um botão para mudar a cor do textbox no formulário (pegando o valor da variável publica) Private Sub CommandButton1_Click() TextBox1.BackColor = corEnabledTextBox End Sub

Boa tarde @geraldo pereira Olhei o seu código e notei que você mandou fazer um "loop" por todos os controles do tipo textbox no seu formulário: For Each controle In formulario.Controls Se você já sabe qual campo quer desativar (como você descreveu que são dois) você pode apenas colocar o nome do campo diretamente: formulario.txtNome.enable = false Olha se funciona e da um retorno.

Boa tarde @tcorrea. Entendi a situacao mais não entendi bem em que momento você quer verificar. Se tem internet ou se a base dados não esta respondendo?