[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.

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.

Bom dia / boa tarde / boa noite.

Alexandre ficou muito bom.

Obrigado pela tua ajuda e cooperação.

Abraços.

Sucesso.