Userform desaparece después de copiar

[seba64]

Es timados:

Tengo un formulario con un boton. Al clickear el botón, el código copia la hoja1 a la hoja2.

Cuando el código ejecuta la siguiente instrucción, excel muestra un mensaje diciendo algo...

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í

 

[seba64]

En relidad el códi completo sería:

Private Sub CommandButton6_Click()

    Dim MyRange As Range
    Dim cell As Object
    
    nombHoja = "Hoja1": nomb = "Hoja2"
    Dim Hoja2...

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í

 

[Macro Antonio]

Elimina esta línea:

Dim Hoja2

 

[seba64]

:shock: Sorprendente!!!

Jamás hubiera imaginado que el dim era el mayordomo

Gracias mil. Me estaba volviendo loco :x

Por casualidad sabes si se puede vaciar el portapapeles de ofice con...

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í

 

[Macro Antonio]

Juega con este par de macros:

Sub CopiarPegarPortapapeles()
Dim Portapapeles As DataObject, Texto As String

Set Portapapeles = New DataObject
 
'Copiar
Portapapeles.SetText...

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í

 

[seba64]

Ahora voy a jugar con eso