Excel Combinações de cartelas de Bingo no Excel

[YasminNET]

olá alguém ai pode me ajudar, estou precisando de uma arquivo em excel pra mim gerar uma cartelas de bingo aqui pra nossa paroquia de Sant'Ana, só queremos fazer diferente preciso de uma combinação de 90 numero e cada cartela rodada vai ter 40 numeros 

[Victor Comparini]

Bom dia,

 

Segue sua planilha.

 

Qualquer dúvida estou a disposição.

 

Bingo.zip

[YasminNET]

não consigo usar o arquivos que você me mandou 

[Victor Comparini]

@YasminNET

Aqui funciona perfeitamente,

Esse erro é algo no seu excel, tente a seguinte solução:

 

Vá ao menu Arquivo->Opções

Aqui, acesse a última opção na lista da esquerda chamada “Central de Confiabilidade”.

 

Clique agora no único botão da tela à direita com o texto “Configurações da Central de Confiabilidade”. Você verá uma tela com várias opções à esquerda. Nela, selecione a opção “Configuração do ActiveX”:

 

Para resolver o problema, é preciso selecionar uma opção de contexto confiável. Para meu caso, mantive opção “Avisar antes de habilitar todos os controles com restrições mínimas“, que é a mensagem que aparece quando se abre o Excel (ativação de Macros).

 

Lembre também de ativar as macros.

 

 

Ou essa mesma opção de habilitar aparece próximo a barra de fórmulas.

 

Fonte:

https://www.tomasvasquez.com.br/blog/microsoft-office/excel/vba-resolvendo-o-problema-do-erro-1004-nao-e-possivel-obter-a-propriedade-object-da-classe-oleobject/

adicionado 15 minutos depois

De qualquer forma,

Tire essa Função da Macro, porém há outras.

 

Segue arquivo atualizado.

 

 

Bingo_Atualizado.zip

[Bikke]

Ao clicar para Gerar Cartelas, dava erro:

 

Como mudaste o nome da planilha, o erro era aqui: Windows("Bingo.xlsm").Activate 'Ativar esta planilha

Mudei o nome para o correcto: Windows("Bingo_Atualizado.xlsm").Activate 'Ativar esta planilha

 

Agora sim, já funciona...

[YasminNET]

aqui continua dando erro, a depuraçãodo erro e é isso que aparece 

[YasminNET]

ainda preciso de ajuda porque ak nao deu certo 

 

[Victor Comparini]

@Bikke 

Muito bem observado, obrigado!

 

adicionado 10 minutos depois

14 horas atrás, YasminNET disse:

ainda preciso de ajuda porque ak nao deu certo 

 

@YasminNET,

 

Como foi dito, tem algo errado com o seu excel, é preciso configura-lo corretamente, talvez a versão não estava reconhecendo a função Concat dentro do VBA, eu removi essa função do código.

 

use a planilha atualizada em anexo dessa resposta e tente novamente para ver se há algum outro erro para pensarmos em outra for de resolver.

 

Bingo_Atualizado.zip

[Valeria Morona]

@Vics baixei seu último arquivo, mas continua com erro. Tentei todas as opções e gostaria muito que funcionasse!

[Patropi]

Boa tarde, @Valeria Morona

 

Deve ser problema da versão do teu Excel, pois acabei de baixar e funcionou perfeitamente.

O meu Excel é 2019.

 

[]s

[Victor Comparini]

Em 17/11/2020 às 16:38, Valeria Morona disse:

@Vics baixei seu último arquivo, mas continua com erro. Tentei todas as opções e gostaria muito que funcionasse!

 

Olá Valéria, estou com o Excel 2016 e também funcionou perfeitamente.

 

Você consegue postar uma foto do erro?