Error al abrir formulario en Excel con VBA

Estimados, haciendo una macros en excel, se me ocurrió que al abrir el excel, apareciera el
Formulario de una sin pasar por excel grabando datos a una hoja de esta, pero el tema es que copie el siguiente código desde este foro:
Private Sub Workbook_Open()Application.Visible = FalseUserForm1.ShowEnd Sub
El tema es que funciona y muy bien, salvo que abre el form graba y no puedo ingresar al excel para ver que hizo, como puedo entrar ahora al excel y ver los datos grabados.



            
            

            
        




        

            
        

        
        
    


            

        


        

    









       
    



        
2 Respuestas


        

            

                

                    Respuesta                 

                

                        


        

        
            
                1
              
        

        

        

            
            

        
    


                

            


            

            

                
                

                        

                    

                        
si mal no recuerdo debes quitarle el Application.Visible = False de tu codigo

                    

                    

                        
                            

                    

                

            

              
                

            

            

                    

        

        

            

            
        

    

            
    

            


                

        
    










            
        






















        

            

                

                    Respuesta                 

                

                        


        

        
            
                1
              
        

        

        

            
            

        
    


                

            


            

            

                
                

                        
                


                    

                        
Cuando vayas a cerrar tu userform escribe, por ejemplo
Private Sub UserForm_Terminate()
Application.Visible = True
End Sub
Saludos.Dante Amor
Recuerda valorar la respuesta.

                    

                    

                        
                            

                    

                

            

              
                

            

            

                    

        

        

            

            
        

    

            
    

            


                

        
    










            
        






















     
    
    
    



    

        

            
Añade tu respuesta

        

        

            

                
            

            

                


    



        

            

                        Haz clic para 
    
        
    
             o 
    
        
    

            

        

    


    











                
            

        

    


    


    
    






    

       
                

                        Más respuestas relacionadas

                


                

                    

                        

    

        

            
                Macro eliminar filas con valor
            
        

        

            
                Tengo esta macro que me elimina las filas cuando el valor es #N/D, pero me ha dejado de funcionar cuando el valor es #CALC! Me podéis echar una mano. Muchas gracias. Sub Borrar_Filas() Dim ultifila As Integer 'guardo la última fila utilizada en la...
            
        

            

        
                2  respuestas

    


    

    

        

            
                Encontrar datos no coincidentes excel
            
        

        

            
                Sucede que tengo que comparar dos bases de datos y encontrar los elementos no coincidentes para analizar. Se puede hacer por fórmula pero necesito algo más optimizado. El otro problema es que los datos son más de 1.48.576 capacidad de líneas de...
            
        

            

        
                2  respuestas

    


    

    

        

            
                ¿Cómo resolver num a letras en excel?
            
        

        

            
                En un libro excel habilitado para macros al convertir números a letras, en lugar de aparecer el resultado esperado aparece el mensaje # ¿NOMBRE?.
            
        

            

        
                2  respuestas

    


    

    

        

            
                ´No sé que fórmulas usar para resolverme el problema
            
        

        

            
                La imagen no me la sube y tampoco veo como se sube un fichero, os intentaré explicar lo mejor que pueda mi problema. En una hoja Excel tengo hallados los pagos por formas de pago: SUMAR.SI(D1:D16;"Efectivo";B1:B16), y...
            
        

            

        
                3  respuestas

    


    

    

        

            
                ¿Cómo ajustar texto automáticamente en celdas combinadas en Excel 2019?
            
        

        

            
                Solicito amablemente su valiosa ayuda para ajustar automáticamente un rango de celdas de una columna, he intentado con la opción de ajuste autamático de filas, también con al opción de ajustar texto de la pestaña inicio e incluso con la siguiente...
            
        

            

        
                1  respuesta

    


    

                                    

                                        
                                        
                                        
                                        

                                    

    

        

            
                ¿Cómo usar un excel con macros desde varios ordenadores?
            
        

        

            
                A tod@s! Tengo una aplicación en excel para introducir datos y visualizarlos con diferentes formularios creados. Lo que quiero hacer es: 1 Que ese libro este alojado en un sitio común y que lo puedan abrir desde varios ordenadores. 2º Que se pueda...
            
        

            

        
                3  respuestas

    


    

    

        

            
                Error en macro al ejecutar el botón aceptar
            
        

        

            
                Necesitaría la colaboración para resolver el error que sucede al ejecutar el botón aceptar Set mifila = Hoja2.ListObjects(1).ListRows.Add Lo que yo agregue solamente a la base fue una columna al inicio ("A") anteriormente se llamaba Tabla6 y yo ahora...
            
        

            

        
                1  respuesta

    


    

    

        

            
                Detectar cambios en tabla dinámica
            
        

        

            
                Tengo una hoja donde se van actualizando datos mediante una tabla dinámica. ¿Cómo detecto cuando se producen cambios (sólo en la parte de la tabla dinámica) para ejecutar otra macro en la misma hoja?
            
        

            

        
                1  respuesta

    


    

    

        

            
                Macro con combinación de teclas
            
        

        

            
                Acudo aquí buscando ayuda, ¿Cómo crear una macro que genere una combinación de teclas? NO se trata de asignar una macro a una combinación de teclas, es todo lo contrario. El problema radica en que tengo una macro que rellena ciertas celdas con...
            
        

            

        
                1  respuesta

    


    

    

        

            
                Pasar datos de listbox a hoja con decimales
            
        

        

            
                Como están estimados maestros y maestras, una vez mas solicitando vuestra experta ayuda. Tengo un formulario que busca datos entre 2 fechas desde 2 textbox, carga en listbox lo filtrado, en la columna 2 del listbox carga valores con formato de 2...
            
        

            

        
                1  respuesta