............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

Boton que despues de ejecutarlo, queda como desactivado

Ver el tema anterior Ver el tema siguiente Ir abajo

Boton que despues de ejecutarlo, queda como desactivado

Mensaje por JoaoM el Vie Oct 23, 2015 6:28 pm

Hola. En Excel 2013  En 2007 no hay este problema, comprobado en maquina de un amigo
Espero de su ayuda, una solución para lo que expongo con imágenes
La macro la ejecuto para copiar (respaldar) la hoja como XLSX, hasta aquí funciona todo mui bien pero:

Al ejecutar la 1ª vez la macro por vía del botón, me funciona a perfección pero al terminar la 1ª copia si repito para la 2ª le doy nuevamente al botón, este no hace nada, está como que no tenga macro asignada (desactivado) y su nombre aparece en la barra de nombres. Piso afuera, en cualquier celda, y voy pisando el botón, ya funciona el botón, si se ejecuta.

¿Qué puede ser?. La macro;
Esta la unica macro que contiene el libro
Código:
Sub guardar_Copia()
  Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    '
    Set h1 = ActiveSheet 'HOJA ACTIVA
    nbr = h1.Name & " " & h1.[E8] & " " & h1.[I8] & " " & h1.[I9] 'NOMBRE PARA ARCHIVO
    ruta = "D:\Datos Mecanicos\" 'RUTA PARA EL ARCHIVO
    With Application.FileDialog(msoFileDialogFolderPicker) 'VENTANA DE GUARDAR COMO:
        '.Title = "Selecciona una carpeta"
        .AllowMultiSelect = False
        .InitialFileName = ruta
        If .Show <> -1 Then Exit Sub
        cp = .SelectedItems(1)
    End With
    'PROCEDE A LA COPIA
    h1.Copy
    ActiveSheet.DrawingObjects("Botón 1").Delete 'ELIMINA EL BOTON EN LA COPIA
    ActiveWorkbook.SaveAs Filename:=cp & "\" & nbr & ".xlsx", _
        FileFormat:=xlOpenXMLWorkbook, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False
    ActiveWorkbook.Close
    
    MsgBox "Archivo guardado en " & cp & "\" & nbr & ".xlsx"  'MENSAGE DE GUARDADO
    
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
    
    Range("A1").Select 'CELDA A SELECCIONAR DESPUES DE TODO FINALISADO
End Sub


Termino la 1ª copia Aceptando el MsgBox


Voy para la 2ª y veo que el nombre del botón aparece en la caja de nombres


Piso el boton y me encuentro con esto


Tengo que manualmente seleccionar una celda cualquier y volver a pisar el botón para que ejecute la macro

Aqui el libro, ya que no me permite subirlo desde acá
Aqui el libro

JoaoM

Masculino Cantidad de envíos : 38
Edad : 97
Ciudad - Pais : venez
Version de Excel : 2007-2010
Fecha de inscripción : 16/12/2011

Volver arriba Ir abajo

Re: Boton que despues de ejecutarlo, queda como desactivado

Mensaje por rolano el Vie Oct 23, 2015 6:45 pm

Seria bueno ver el archivo, sino selecciona la hoja activa...
Código:

.....
'Seria la idea de seleccionar la hoja
h1.Select
Range("A1").Select 'CELDA A SELECCIONAR DESPUES DE TODO FINALISADO
End Sub

_________________
Saludos,
César Tirado
M.A.P. 2012-2014
Microsoft Active Professional
Blog
avatar
rolano
Moderador
Moderador

Masculino Cantidad de envíos : 53
Edad : 43
Fecha de inscripción : 14/04/2009

http://excelilove.blogspot.com/

Volver arriba Ir abajo

Re: Boton que despues de ejecutarlo, queda como desactivado

Mensaje por JoaoM el Vie Oct 23, 2015 6:51 pm

Verás que la macro al final le coloque eso precisamewnte pero sin exito y las imagenes te nuestran que despues de ejecutada la macro, queda el boton seleccionado en la casilla de Nombres
Range("A1").Select 'CELDA A SELECCIONAR DESPUES DE TODO FINALISADO
Ahi esta el enlace para bajarlo rolano y aqui otro enlace

Otro enlasce

La unica hoja que contiene el libro, una sola y en ella esta el boton

JoaoM

Masculino Cantidad de envíos : 38
Edad : 97
Ciudad - Pais : venez
Version de Excel : 2007-2010
Fecha de inscripción : 16/12/2011

Volver arriba Ir abajo

Re: Boton que despues de ejecutarlo, queda como desactivado

Mensaje por rolano el Vie Oct 23, 2015 7:10 pm

No me sale ese mensaje que tu mencionas, tengo excel 2007
[img][/img]

_________________
Saludos,
César Tirado
M.A.P. 2012-2014
Microsoft Active Professional
Blog
avatar
rolano
Moderador
Moderador

Masculino Cantidad de envíos : 53
Edad : 43
Fecha de inscripción : 14/04/2009

http://excelilove.blogspot.com/

Volver arriba Ir abajo

Re: Boton que despues de ejecutarlo, queda como desactivado

Mensaje por JoaoM el Vie Oct 23, 2015 9:11 pm

Ok rolano, si es cierto y si leeste el 1ª post dice;
JoaoM escribió:Hola. En Excel 2013  En 2007 no hay este problema, comprobado en maquina de un amigo

es mas aun, guarde el archvo como xls (2003) y pasa lo mismo en Excel 2013 que es el que tengo

JoaoM

Masculino Cantidad de envíos : 38
Edad : 97
Ciudad - Pais : venez
Version de Excel : 2007-2010
Fecha de inscripción : 16/12/2011

Volver arriba Ir abajo

Re: Boton que despues de ejecutarlo, queda como desactivado

Mensaje por rolano el Vie Oct 23, 2015 9:16 pm

En que version te da problema

_________________
Saludos,
César Tirado
M.A.P. 2012-2014
Microsoft Active Professional
Blog
avatar
rolano
Moderador
Moderador

Masculino Cantidad de envíos : 53
Edad : 43
Fecha de inscripción : 14/04/2009

http://excelilove.blogspot.com/

Volver arriba Ir abajo

Re: Boton que despues de ejecutarlo, queda como desactivado

Mensaje por JoaoM el Sáb Oct 24, 2015 1:12 pm

Lo probe en 2007 de un vecino aqui y todo bien pero en el mio 2013 donde me presenta eso

JoaoM

Masculino Cantidad de envíos : 38
Edad : 97
Ciudad - Pais : venez
Version de Excel : 2007-2010
Fecha de inscripción : 16/12/2011

Volver arriba Ir abajo

Re: Boton que despues de ejecutarlo, queda como desactivado

Mensaje por rolano el Dom Oct 25, 2015 7:55 pm

Ok, voy a revisarlo en excel 2013 te comento como me fue, dame unos días.

_________________
Saludos,
César Tirado
M.A.P. 2012-2014
Microsoft Active Professional
Blog
avatar
rolano
Moderador
Moderador

Masculino Cantidad de envíos : 53
Edad : 43
Fecha de inscripción : 14/04/2009

http://excelilove.blogspot.com/

Volver arriba Ir abajo

Re: Boton que despues de ejecutarlo, queda como desactivado

Mensaje por JoaoM el Dom Oct 25, 2015 8:11 pm

Ok rolando, pruebalo, date tu tiempo

Abre el libro

En la macro cambia la ruta a tu favor, SOLO LA RUTA
Ejecuta por el boton
Al terminar tienes que aceptar el mensage del MsgBox
LUEGO DESPUES QUE ACEPTAS el mensage del MsgBox, REPITE EL PROCESO

Verás lo que menciono en el tema

JoaoM

Masculino Cantidad de envíos : 38
Edad : 97
Ciudad - Pais : venez
Version de Excel : 2007-2010
Fecha de inscripción : 16/12/2011

Volver arriba Ir abajo

Re: Boton que despues de ejecutarlo, queda como desactivado

Mensaje por rolano el Lun Nov 02, 2015 1:00 pm

Hola JoaoM, no he podido hacer pruebas por que no tengo excel 2013, pero seria buen que el botón sea controles activex y no controles de formulario.

[Tienes que estar registrado y conectado para ver este vínculo]

_________________
Saludos,
César Tirado
M.A.P. 2012-2014
Microsoft Active Professional
Blog
avatar
rolano
Moderador
Moderador

Masculino Cantidad de envíos : 53
Edad : 43
Fecha de inscripción : 14/04/2009

http://excelilove.blogspot.com/

Volver arriba Ir abajo

Re: Boton que despues de ejecutarlo, queda como desactivado

Mensaje por JoaoM el Lun Nov 02, 2015 5:20 pm

Voy probando con ActiveX y forma
No he echo nada, no he podido dedicarme al asunto.
Gracias rolano

JoaoM

Masculino Cantidad de envíos : 38
Edad : 97
Ciudad - Pais : venez
Version de Excel : 2007-2010
Fecha de inscripción : 16/12/2011

Volver arriba Ir abajo

Re: Boton que despues de ejecutarlo, queda como desactivado

Mensaje por JoaoM el Miér Feb 24, 2016 3:52 pm

Solucionad

JoaoM

Masculino Cantidad de envíos : 38
Edad : 97
Ciudad - Pais : venez
Version de Excel : 2007-2010
Fecha de inscripción : 16/12/2011

Volver arriba Ir abajo

Re: Boton que despues de ejecutarlo, queda como desactivado

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.