[Resolvido]Atualização de um determinado campo em tabela com critério

bom dia / boa tarde / boa noite

Prezados, peço gentilmente a vossa ajuda nessa questão acima no título

Tenho uma tabela onde há grupos previamente cadastrados. Entre tabela cada grupo tem suas peças e seus valores de compra (tabela (grupo) e sub tabela (peças), relação um para muitos).

Vamos pegar apenas um grupo e uma peça para melhor compreensão.

GRUPO: Ferfil U
peça: cantoneira 10x10x300 mm
custo: R$10,00

A pergunta.... tem como através do vba, alguma rotina na qual o usuário: escolha apenas o grupo e coloque o percentual de acréscimo ou percentual de redução de preço para atualizar todos (atualização em demanda) os preços no grupo escolhido?
São mais de 10 grupos e umas 1.500 peças.

Tem alguns anos, eu vi uma rotina aqui do Mestre Avelino (salvo engano meu) que fazia exatamente isso. Creio que usava DAO.RecorSet
Na época pensei que nunca ia usar, mas vi que quebrei a cara. Tentei achar ela, mas está sendo em vão!

Se algum puder me ajudar...fico agradecido.

Boa tarde SIlvio
Da uma olhada aí, foi um teste que fiz agora
Aviso: Se já tem varios dados fazer com cópia em irmão.
Já perdi tanta coisa por esquecer de fazer cópas e fazer na mesma pastas.

Código:


Dim db As Database
Set db = CurrentDb
 Call db.Execute("update pecas set percentual = '" & Me!TxtvalorAalterar.Value & "' where IdGrupo=  " & Me.cboGrupo)
Msgbox" Atualização em demanda feita com sucesso"
End Sub


Abçs

Bom dia / boa tarde / boa noite a todos.

Crysostomo, infelizmente não " funfou " !

Estou mandando aqui, as partes envolvidas para melhor compreensão sua e daquele colega, que porventura queira ajudar.

Estou batendo cabeça na rotina que eu fazendo, a linha com erro está marcada na rotina.

É só abrir o arquivo, vai abrir no formulário de atualização, escolha um grupo, uma porcentagem de acréscimo e aplicar.  Já aparece o erro em questão.

Se puder ajudar, fico eu agradecido.

Abraços.

Olá Silvio,

O preço do produto não deve estar na tabela de produtos e sim numa tabela de preços onde vc mantem o histórico das alterações, a não ser que vc grave o preço atual do produto em outras tabelas também (apesar de redundante, é seguro)
Ex.: Pedido de venda onde consta o valor do produto. Se vc grava o valor do produto nesta tabela e depois vc realizar alguma atualização do preço na Tabela de Produtos, ai tudo bem, pq vc teria o valor antes do ajuste armazenado na tabela de Pedidos.

Se vc utiliza o campo preço do produto da "Tabela de Produtos" em relatorios ou em outras rotinas já executadas anteriormente, após atualização, esse valor não será o correto para rotinas realizadas no passado.

Eu baixei seu exemplo e vou fazer elaborar a rotina para atualização de preço por demanda, mas eu sugiro que vc utilize uma "Tabela de Preço" para que vc tenha histórico de valores.

Att,

Alexandre Fim

Bom dia / Boa tarde / Boa noite.

Alexandre e Crysostomo deem uma olhada no exemplo abaixo.
Passei uma parte da manhã fazendo isso, pois o cliente tem a famosa "pressa"!
Analisem o mesmo, a rotina em questão e me digam o que acham.

Mas já de antemão agradeço a vocês pelo apoio, ajuda e a consideração em me ajudar.

obs. escolham perfil u ou acessórios para acréscimo ou decréscimo do preço em questão.

Olá Silvio,

O formulário ficou assim:



Segue versão do sistema para sua análise.

É isso.

Att,
Alexandre Fim

Bom dia / boa tarde / boa noite.

Alexandre ficou muito bom.

Obrigado pela tua ajuda e cooperação.

Abraços.

Sucesso.