[Resolvido]strSQL "Nome Repetido" Dúvida

Bom dia caros colegas!

Poderiam me esclarecer uma dúvida?

       Set dbs = CurrentDb
       strSQL = "SELECT * FROM viewContasReceber WHERE CODCLI = " & Me.CODCLI
       Set rst = dbs.OpenRecordset(strSql)

No meu formulário tenho vários botões que executo códigos similares a esse acima, sempre que clico em qualquer um dos botões que tem esse tipo de codigo me da uma mensagem que "Erro de compilação - Nome Repetido"

Tenho essa variavel declarada em um módulo como global.

A minha dúvida seria o seguinte, porque esse erro acontece quando clico no botão, sendo que ao clicar no botão o codigo executado é somente o do botao e nao tem essa variavel repetida.

Qual é a variavel declarada em um módulo como global ?

Olá mestre jPaulo, boa tarde.

Obrigado por responder.

A variável é a destacada em vermelho strSql

Global strSql As String

Você tem necessidade disso ? "Global strSql As String"

Porque não declara localmente ?

Código:


Dim strSQL$
Set dbs = CurrentDb
      strSQL = "SELECT * FROM viewContasReceber WHERE CODCLI = " & Me.CODCLI
      Set rst = dbs.OpenRecordset(strSql)

certo, vou fazer isso declarar localmente.

A questão é a seguinte se eu declaro ou nao, tanto local qnto global.

quanto clica em algum botão que tem codigos semelhantes usando essa variavel recebo a mensagem de erro de compilação - Nome repetido

em todo o codigo do formulario que uso essa variavel ( strSql ). Se eu mudo para ( strSql2 ) o erro para de acontecer... nos demais botoes que tem ( strSql ) se existir mais de um botao com a mesma variavel o erro citado acima ocorre.

Isso acontece porque você declarou como Global.

Delete essa variavel Global e faça Debug, compile e o Compactar/Reparar.

Declare a variavel localmente em cada código e teste.

Mestre JPaulo, obrigado pelos seus esclarecimentos.

Fiz conforme disse e acabou-se os problemas...

Obrigado.

Fico feliz.

Obrigado pelo retorno o forum agradece.