Tomás Vásquez Fórum

Reinaldo

Motivo nenhum para gerar erro, salvo se textbox for/receber um texto como conteudo, ai vai gerar erro de tipos incompativeis Multiplicar o valor de Textbox1 por 1.23 e a mesma conta que estava efetuando>"Textbox1*0.23+textbox1" e a função VBA.Round, corresponde a função de arredondamento na planilha...

Reinaldo

experimente--> Textbox1 = VBA.Round(Textbox1 * 1.23, 2)

Reinaldo

experimente--> Textbox1 = VBA.Round(Textbox1 * 1.23, 2)

Reinaldo

Supondo que em uma tabela produtos deseje alterar o valor de um determinado produto cujo codigo de identificação seja 1:

Código: Selecionar todos

UPDATE Produtos SET Produtos.ValorUnitario = 125
WHERE (((Produtos.Codigo)=1));

Reinaldo

Nãoconsegui determinar onde consta o preço esperado; Sua tabela Categories tem apenas Id e Name, está relacionada no tabela products até ai OK, o preço/valor está onde? Sua consulta poderia ser algo SELECT Products.ID, Products.[Cód Produto], Products.ProductName, Categories.CategoryName, Products.[...

Reinaldo

Possível creio que é; normalmente não utilizo combo "digitavel, não creio ser esse o melhor "papel" de combo; se não houver resposta, assim que tiver um tempo vou ver/tentar acertar

Reinaldo

Infelizmente não pude abrir o seu modelo access, pois a minha versão (10) "não tem poderes" para abri-lo; recebo a info "o banco de dados que está tentando abrir requer uma versão mais nova do access". O interessante e que executando pela Function, não há "menção" ao erro, somente ao executar a lsco...

Reinaldo

Não tenho como testar, por sua base/arquivo; vamos pelo exposto: Aparentemente a função BuscaNome.. "espera" como resposta um valor numérico (integer); porem está "recebendo" um texto (string). Experimente alterar a definição inicial de sua Function conforme incluindo definição adicional como string...

Reinaldo

Se entendi corretamente; pode no local onde será salvo o valor sem o imposto utilizar:

++>.Cells(linha, 21) = TxtValorFatura.value * 0.77<++

Reinaldo

Não entendi a demanda e nem o trecho ++>"... codificação específica para o Excel VBA para uso do comando_SQL..."<++

Pesquisa resultou em 1226 ocorrências

Re: Ajuda com arredondamento

Re: Ajuda com arredondamento

Re: Ajuda com arredondamento

Re: Atualizar tabela do Access pelo Excel com VBA

Re: ComboBox para combinar 3 informações.

Re: Combobox relacionadas

Re: Como fazer function de busca em tabela access (problemas com ADO)

Re: Como fazer function de busca em tabela access (problemas com ADO)

Re: Gravar Valor de textbox menos um valor do imposto

Re: Excel VBA+MYSQL