Macro de un tablero de BINGO

[dhvn]

Tengo este codigo:

Sub Bola()

Sheets("Hoja1").Range("M10").FormulaR1C1 = "=Hoja1!R2C46"
nuevabola = Sheets("Hoja1").Range("M10").Value
Sheets("Hoja1").Range("M10").Value = nuevabola...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Cacho R]

.

¿cual es el error?

Tienes varios errores. Intenta con:

MsgBox "¡Bingo Finalizado!" & vbNewLine & vbNewLine & _
  "Pulsar NUEVO BINGO, para una nueva partida."...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[dhvn]

Ya no me marco ningun error, pero en si el codigo como que no funciona, solo me manda el mensaje del box y ya.

Me podrias ayudar?

 

[Cacho R]

.

Ya no me marco ningun error, pero en si el codigo como que no funciona, solo me manda el mensaje del box y ya. Me podrias ayudar?

¡Te faltó la "palabrita mágica"...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí