Hola a tod@s Tengo un formulario con varios TextBox y un Label. Tengo la siguiente instrucción para que dependiendo de la pantalla, y su resolución, este formulario se expanda. Pero lo que no consigo, porque no se como se hace, es que los TextBox y el label, se centre automáticamente dentro del formulario. Gracias anticipadamente por vuestra ayuda. Private Sub UserForm_Initialize() Me.Height = Application.Height Me.Width = Application.Width End Sub

Hola, intento centrar el texto verticalmente dentro de un Texbox alguien puede ayudarme ? Gracias a todos

Una pregunta: "¿Alguien sabe cómo centrar los títulos de un cuadro MsgBox que no se utilizando espacios en blanco, sino que se realice de manera automática?" Debe existir algún valor de una propiedad que desconozca. Gracias.

Muy buenas he copiado de aqui un codigo para invalidar el boton X de cerrar Excel y que el usuario oprima el boton de CERRAR que yo he creado, hasta aqui todo perfecto, el problema es que yo quiero que aparte de GUARDAR el LIBRO, la aplicacion se me cierre, el problema es cuando sustituyo el ACTIVEWORKBOOK.CLOSE por APPLICATION.QUIT la aplicacion ni el libro se me cierran. Subo un adjunto para que veais el problema. muchas Gracias PruebaLibro1.xls

Hola estoy haciendo un programa el cual me abre otro libro("libro1"), y en una parte del programa me falta: una macro que me compruebe si "libro1" ya esta abierto, si esto es verdad que lo cierre y si no esta abierto que no haga nada Saludos!!!!

Buenas tardes. Soy nuevo en su espacio, también en Excel-Vba con macros. No podré aportar conocimiento ni asistir a la plataforma, sólo serán peticiones de ayuda. Lo lamento y agradezco enormemente. Estoy haciendo unas macros que abren páginas web, que ejecutan la extensión Chrome Instant Data Scraper, que toman datos y los tratan sin problemas. Lo que necesito es : poder cerrar todo lo abierto, tanto las páginas web como las ventanas en la barra de tareas de Windows. Muchísimas gracias, y un saludo. Manel.

Buena tarde, tengo este código que me abre un archivo que cambia de nombre todos los días, pero contiene los mismos campos que requiere la Macro. Lo que no puedo es cerrar el archivo, ya que el nombre de este archivo cambia cada día. Application.ScreenUpdating = False Dim Mensaje, Estilo, Título, Ayuda, Ctxt, Respuesta, MiCadena Mensaje = "CARGAR ATCON DEL DIA" Estilo = vbYesNo + vbCritical + vbDefaultButton2 Título = "Datos" Respuesta = MsgBox(Mensaje, Estilo, Título) If Respuesta = vbYes Then NombreArchivo = ActiveWorkbook.Name ArchivoAAbrir = Application.GetOpenFilename("atcon_YYYYMMDD (*), *") If ArchivoAAbrir = False Then Sheets(1).S…

hola a todos, tengo una macro de excel que me abre unos archivos de un directorio, uno a uno los imprime en pdf con Acrobat y los cierra. Es muy sencilla. Lo que quisiera es que al imprimir no me saliera la barra de progreso ya que me va más lento que si lo hago manual y no consiguo cerrar la barra y el boton que sale de ocultar tampoco me funciona. ¿Sabe alguien algo de este tema?? Muchas gracias:peaceful:

Hola estoy creando un libro que contiene formularios de datos de alumnos, y cuando quiero cerrar el formulario, esto me abra otro formulario donde pueda ingresar una contraseña que se encuentra en una hoja y celda especifica, valide los datos y cierre todo el libro previo a esto que guarde todos los cambios, adjunto ejemplo y espero que me puedan ayudar gracias. libro de notas.zip

Buenas tardes, por aqui me encuentro preguntando nuevamente. Tengo un libro de excel normal que ejecuta un macro que me abre un libro compartido, esta es la macro: Sub Abrir_y_Ocultar_Libro() Dim xls As New Excel.Application xls.Workbooks.Open Filename:="C:\Datos\Datos.xlsx" xls.Visible = False End Sub Ahora tengo dos preguntas, cómo puedo hacer otra macro que me lo cierre este libro? y otra, alguna macro que me guarde el libro? o lo active para poder guardar datos en el? Gracias de antemano

Estimados me a pasado cuando hago un botón "Salir" en un formulario que utilizo lo siguiente: ThisWorkbook.SaveThisWorkbook.Close application.Quit el problema es que si tengo alguna planilla abierta cuando cierro esta macro, se me cierra todo lo que se encuentre abierto de excel. Por otro lado, si no coloco al última linea (Application.Quit) me cierra el libro pero no el editor de Vba. Lo que necesito es que solamente cierre el libro que se encuentra activo (el que tiene los datos de la macro) y también el editor de Vba y las demás planillas queden abiertas. De ante mano muchas gracias por su ayuda Saludos

Buenos días. Tengo una macro programada para que ejecute una actualización de los datos. El problema es que, dependiendo de los datos, a veces salta un mensaje de error y hasta que no se pulsa aceptar en el mensaje de rror, no continua calculando. Hay alguna forma de hacer que "pulse" el aceptar de forma automática? Gracias.

Hola a tod@s. Tengo el siguiente código: Sub ProductoFabr(ByVal FilaDSK As Long, ByVal FilaSHM As Long) Application.ScreenUpdating = False Dim ObjExc As Object Set ObjExc = CreateObject("Excel.Application") ObjExc.Visible = False ObjExc.Workbooks.Open Filename:="\\ServidorA\Producto\Pedidos.xlsx" .... En sub Sucede que tengo Office 2016 (32bits) con la licencia no original. La macro se ejecuta con normalidad hasta que necesito extraer información de otro libro "Pedidos" que se encuentra en la otra PC, es ahí donde la macro se detiene y muestra un mensaje, tipo mensaje emergente, que menciona lo siguiente : "Hay un problema con…

hola busqué el tema que estoy poniendo pero no me deja verlo, se que si cambias la propiedad -cancel- del un boton que se encuentre en el formulario y la pones en true hace que se descargue el formulario pero como puedo hacerlo mediante codigo?. Gracias. Saludos

Estimados buenos dias Agradezco su apoyo en la siguiente línea que no me funciona, deseo cerrar un archivo excel tener presente que nombre archivo lo tengo celda B10 . Dim nombre As String nombre= Range("B10").Value Workbooks("nombre").Close SaveChanges:=False

buenas tardes, necesito cerrar un userform desde un botton de otro userform por ejemplo algo como esto que pense pero no me funcion userform1 unload muchas gracias por la ayuda

Buenas, tengo un proyecto con tres userforms a los cuales he podido acceder en un proceso normal. Pero me ha llegado el problema cuando he querido volver a un userform que le habia puesto en .Hide y me saltaba el error de que no se podía mostrar porque ya estaba abierto. He intentado ir cerrando los userform según iba pasando al siguiente mediante una funcion ubicada en un módulo y ahora me da error '91' en tiempo de ejecucion - variable de ojeto o bloque with no establecido. Esta es la funcion que la tengo ubicada en un Módulo. Function FormularioAbierto(ByVal Nombre As String) As Boolean Dim frm As Object frm = False For Each frm In VBA.UserForms …

Buenas tardes estimados colegas, Podrá sonar algo sencillo, pero realmente esta complicado el tema. Mi situación es la siguiente. Tengo una macro la cual esta montada en un OneDrive y Sincroniza en Microsoft Teams, esto con el fin de que se puede visualizar la data del archivo en linea. Ahora, mi Excel es un archivo de registro de solicitudes. Analice las siguientes particularidades: 1. Cuando utilizaba el procedimiento sencillo de ActiveWorkbook.Close SaveChanges:=True el archivo se guardaba en "Mis Documentos" aún cuando el archivo se abre directamente del sitio del onedrive sincronizado en el pc directamente en el explorar de archivos. 2. …

Hola buen dia, estube trabajando con el archivo que encontre en estos foros, me doy cuenta que la funcion Trim copia el valor anterior y por eso no me dan los resultados que se suponen deben de ser correctos, habria alguna forma para que asignara un valor como n/a por ejemplo para datos y 0.00 para cantidades, anexo el archivo de ejemplo en el cual se daran cuenta que los complementos de pago (P) no deben de poseer cantidades sino 0.00 por ejemplo, de antemano agradezco su tiempo. Saludos CFDI 3.3(práctico).xlsb

Buen dia a todos, tengo una duda, tengo un pequeño progrma en excel con userforms, en uno de ellos que es Planilla taller, tengo que se imprimen unos datos y se registra en una base de datos, lo que quiero es que al poner checkbox con el cheque me borre lo que tengo en una hoja y una casilla en especifico, que es la de cheq continental, en donde dice `NO NEGOCIABLE`, y al quitar el cheque me ponga de nuevo `NO NEGOCIABLE`, espero que me puedan ayudar. Cheques GyT Industrial.rar

Buenas tardes, gusto saludarles. Primero que nada comentarles que tengo toda la mañana investigando y recurro a ustedes en última instancia. Tengo el siguiente código: Private Sub lbl_aceptar_Click() If ActiveCell.Address = "$E$115" Then If check_box_1.Value = True Then Hoja1.Range("$E$115").Value = check_box_1.Caption ElseIf check_box_2.Value = True Then Hoja1.Range("$E$115").Value = check_box_2.Caption ElseIf check_box_3.Value = True Then Hoja1.Range("$E$115").Value = check_box_3.Caption End If End If If ActiveCell.Address = "$I$115" Then If check_box_1.Value = True Then …

hola amigos tengo una pregunta que no se porque me causa confusion y espero ustedes me ayuden ¿como puedo hacer para que si una celda esta llena el checkbox esté checkeado y si esta vacia no lo este? gracias y saludos

Buenos días. Quisiera crear un checkbox que me ocultase o mostrase todas las filas cuya referencia empiece por 2, otra por 3....., pq si lo hago por rango de celdas al insertar una nueva fila tengo que cambiar todo el código de los checkbox. Un saludo y gracias checkbox.xls

hola a todos estoy programando un formulario en cual contiene optionbutton y checkbox, estoy progresando en esto de las macros pero en esta situacion en particular solicito de su ayuda me gustaria saber si se puede hacer con una macro, que la opcion que se elija en un check box se puede mandar a una celda con la palabra que tiene esa checkbox ejem * chocolate * caramelo * helado * paleta * chicle y que si elijo chocolate con la casilla de seleccion me lo envie a la celda que yo le especifique, y que si elijo mas de una lo agregue en la misma celda con un espacio, seria como concatenar cuadros de seleccion se puede programar eso??? uy espero da…

Estimados del foro, Buenos días!. Estoy creando una cinta personalizada en la cual debo desplegar gráficos por clientes. La estadística se mide por los meses del año. Tengo un Combobox en el cual debo realizar la selección del año a evaluar. El caso es que para seleccionar desde este Combobox estoy usando la función RibbonControl que usa para el llenado y despliegue la instrucción: label = Choose(Index + 1, "Select from list", "Macro 1", "Macro 2", "Macro 3") La idea, es cambiar la lista de opciones fijas a una dinámica con una matriz: label = Choose(Evaluate(arrayAnos)) Pero lamentablemente no resuelve. ¿Alguien me puede guiar por favor? …