Este fórum está sendo desativado

[needfswjr]

Boa tarde, segue em anexo o projeto que estou montando. esta dando este erro '3705' operação não permitida quando o objeto estiver aberto. e não consegui encontrar onde errei.

[babdallas]

Não sei se é isso, mas teste. Após uma consulta ao BD e quando você não for usar mais o recordset, feche o recordset com a instrução

Código: Selecionar todos

rs.Close

Você precisa fechar o recordset para fazer outra consulta. Tente e me diga se deu certo.

[needfswjr]

tentei mas não funcionou o problema esta somente no formulário de alterar cadastro do funcionário. "frmatfuncionario".

[CleidsondosSantos]

Olá Colega!

Verifiquei seu código de conexão, e pelo arquivo que foi enviado o único problema era para encontrar o Banco de Dados.
Veja as alterações que realizei no Módulo "Módulo1 -> Sub conecta"

Em sua Sub conecta()
MyCbanco = Range("Cbanco") 'PROBLEMA PARA ENCONTRAR BANCO DE DADOS
Alterado para -> MyCbanco = ThisWorkbook.Path & "\..\bd_teste.accdb"

Note que para encontrar o Banco de Dados voltei 1 nível com relação ao local da Pasta de Trabalho que esta sendo usada como referencia no caminho

[needfswjr]

eu corrigi este erro, esta faltando somente o de alterar o funcionário, a caixa de combinação tem que buscar no banco os nomes dos funcionários cadastro para que o usuário escolha o funcionário que deseja alterar mas não consegue, pois aparece este erro.

[needfswjr]

vou recomeçar o projeto pode ser que encontre aonde esta o erro.

[Reinaldo]

Não consegui simular o erro reportado. Como uso excel/access 2010, a unica alteração foi na conexão de 16.0 para 12.0
Que versão do office utiliza?