Buenas noches a todos.. Tengo 3 columnas (C,D,E) con datos de correos electrónicos, los quiero unir en un sola columna (F). Para ello, utilizo la función concatenar, y los separo mediante el punto y coma Pero cuando una celda está vacía, al concatenar me pone el punto y coma.. Y como se puede ver en la columna "F", aparece al principio los puntos y comas, y cuando la columna D, no tiene datos, me aparecen en medio de los datos de las columnas C y E. Alguien me podría indicar como crear una macro para que se juntaran los datos, y cuando la celda está vacía, no incluya el separador punto y coma. Gracias a tod@s.. Feliz Año 2022.. Concatenar Em…

Hola, necesito unir un rango grande de celdas, utilizo la función =UNIRCADENAS("";VERDADERO;A19:AS150) y luego voy arrastrando hacia abajo para que haga lo mismo en las filas de abajo, que también son muchas. ¿Con macros se podría utilizar esta función, como sería? Gracias

Buenos dias espero me puedan ayudar Tengo un código que me cuenta los datos de una columna de un listbox y me los deja en un textbox, Pero en la columna del listbox tengo datos duplicados. Lo que necesito es solo que me cuente datos únicos y dejarlos en el textbox Este es el código que uso ahora For x = 0 To ListBox1.ListCount - 1 If ListBox1.List(x, 7) <> "" Then m = m + 1 End If Next TextBox6.Value = m me podrían ayuda por favor y de ante mano muchas gracias

Hola y buenos días a todos; -¿Se puede depurar mejor la macro que adjunto? Sí es posible agradecería vuestros consejos. Código: Sub notas() With Worksheets("Notas") .Cells(1, 1).AddComment .Cells(1, 1).Comment.Text Text:="Titulo1" .Cells(1, 2).AddComment .Cells(1, 2).Comment.Text Text:="Titulo2" .Cells(1, 3).AddComment .Cells(1, 3).Comment.Text Text:="Titulo3" .Cells(1, 5).AddComment .Cells(1, 5).Comment.Text Text:="Titulo4" .Cells(1, 1).Comment.Visible = False .Cells(1, 2).Comment.Visible = False .Cells(1, 3).Comment.Visible = False .Cells(1, 5).Comment.Visible = False End With End Sub …

Hola Equipo Excel, Quiero sber como puedo darle un tiempo limite a un libro excel que al caducar el tiempo se cierre o te pida una contraseña; y asi cada vez que la abra.. Gracias de antemano

Tengo varias macros en una misma hoja y el excel me bota un error y no me las deja ejecutar por favor me pueden colaborar. El código es el siguiente: Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$c$7" Then MostrarVentasFacturadas End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$c$8" Then MostrarVentasPerCapita End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$c$9" Then MostrarRotacionTotal End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$c$10" Then MostrarRotacionNeta End Sub Private Sub Worksheet_…

Necesito completar una ficha en Excel pero utilizando un formulario de Visual. La ficha de Excel es : [ATTACH]35900.vB[/ATTACH] Lo que necesito es que la imagen se coloque en el espacio que quedó combinado entre las celdas A2 y A5, osea, necesito que la imagen quede de ese tamaño. En la parte del formulario de Visual he hecho esto: [ATTACH]35901.vB[/ATTACH] siendo el botón "Examinar" el CommandButton4 (la idea es que al apretarlo abra la base del disco de la computadora y me permita buscar una imagen y seleccionarla) y el botón "Ingresar y Continuar Fichando" el CommandButton1, que al apretarlo tendría que subir la imagen y ubicarla en el espacio antes mencionado, c…

Buenos días; Hoy estoy muy espeso y mi cabeza no rula na de na…….me puedes ayudar Estoy intentando señalar un rango de celdas en una fila ( de A5 a Axx ), para ello estoy usando “Range(Selection, Selection.End(xlToRight)).Select”, la cosa es.......a lo que señalado tengo que añadirle una celda más. He probado un par de cosas y no doy con ello, la cosa es, que ya lo hice en su momento en una macro hace años pero…..mi cabeza ya no es lo que era. Muchas gracias y un saludo, Ejemplo.xlsm

Buenas tardes a todos; -Adjunto una macro con un simple formulario que contiene dos textbox un listbox y un botón. Al poner un dato en el listbox y pulsando el botón pasa el valor al listbox y devuelve el foco al textbox1 Quería conseguir hacer esto mismo pero al pulsar el botón "INTRO" sin tener que recurrir al botón ya que es un incordio estar pulsando cada vez que introduzco datos. Gracias como siempre por su tiempo. Macro.xlsm

Estimados Expertos. Estoy buscando un generador de codigos QR para Excel, he encontrado el programa StrokeScribe 4.1.4 que es muy bueno pero es de pago, tal vez ustedes dispongan de una macro que me permita generar codigos QR en excel. Agradezco de antemano vuestro apoyo. Jmollan

Buenas noches a todos, Primero que todo muchas gracias por la gentileza al revisar esta solicitud... Al día de hoy tengo un problema con un herramienta que estoy creando; a continuación planteo el inconveniente: Tengo un archivo el cual en si columna (A) tengo una relación de fechas de inicios de contrato (aclaro que son fechas anteriores al día de hoy) y requiero que vaya haciendo el calculo de vencimiento hasta llegar al 2019, ejemplo: en la range A2 tengo la fecha 07/06/2018 en la columna "B" tengo "Meses Renovación Contrato" en el rango B2 estan los meses, para este caso 3, el resultado de salida que se pretende es que me apareci…

Saludos a todos, Macro o Modulo que oculte las filas si el numero en la celda es mayor , pero por fila por ejemplo: la fila 1 tiene la celda B1 pero si es mayor que 700 que se escondala fila 1, si es menor que 700 que no se esconda la fila 1 (IF B1 >700 esconder fila1 then IF < 700 no esconder fila1) la fila 2 tiene la celda B2 pero si es mayor que 900 entonces que se esconda la fila 2 si es menor que 900 que no se esconda la fila 2 (IF B2 >900 esconder fila2 then IF < 900 no esconder fila2) la fila 3 tiene la celda B3 pero si es mayor que 2000 entonces que se esconda la fila 3 si es menor que 2000 que no se esconda la fila 3 esto es = (IF B3&gt…

Tengo un libro “Presupuesto de Obra", el Cual tiene una Hoja llamada Presupuesto, que contiene las Columnas: Ítem, Descripción, unidad, Vr unitario y Vr Total. También tiene una hoja llamada: “1.1” (su nombre hace referencia a los datos de la celda (A9) de la Columna Item, para Hacer esto, necesito una macro o modulo que Copie la Hoja “1.1” y tome su nombre de los datos de las celdas siguientes en la Columna Item de la Hoja Presupuesto. Luego de llenar los datos en la Hoja Copiada, lleve el resultado a la celda (I50 Subtotal APU)correspondiente de la columna Vr unitario de la hoja presupuesto. Gracias por su apoyo. Presupuesto de Obra.zip

¡Hola! Por favor pido su ayuda, estoy intentando hacer un combo box que me permita escribir y solo muestre las opciones de acuerdo a lo que escribí, como el filtro avanzado. En la hoja "Info para Combos", columna H, Tengo una lista de 236 elementos que son los que muestra mi lista desplegable en la hoja Plantilla TT Resuelto, celda F2, para ir revisando uno a uno es muy lento, por lo que quiero escribir una palabra clave, por ejemplo "falla" y que únicamente me muestre las opciones de esa lista que contengan la palabra "falla". La verdad que tengo nociones limitadas en excel y necesito su ayuda!! Les agradezco mucho su apoyo. Plantilla docume…

Hola a todos, mi pregunta es la siguiente. Como puedo detener una macro si dos celda (E49 y Z6) de una hoja de excel están vacías y que mande un mensaje de que las celdas están vacias. Encontré en el foro un caso de si la suma de dos celdas no es igual a otra se para, pero no sé como aplicar si lo que quiero es que dos celdas no estén vacías. Este es el caso que encontré. If Range("J12").Value <> Application.WorksheetFunction.Sum(Range("O29:O500")) Then MsgBox "No coinciden", 64, "" Exit Sub End If Muchas gracias por su ayuda

Buen día amigos del Foro, tengo una consulta acerca del uso de la función MInverse de las hojas de excel en una función en visual basic. Escribí la siguiente linea esperando que el programa me devuelva la matriz inversa del "rangom" el cual es una variable de ingreso de la función (declarada como Range) pero no me ejecuta el MInverse al parecer no se puede guardar en "rangod" que fue otra variable que declare como Range. rangod = Application.WorksheetFunction.MInverse(rangom) Alguien me podría indicar si es posible usar los comandos de excel en la creación de funciones en el visual? y si es posible, como hacer la codificación?

Hola y gracias de antemano por cualquier ayuda tengo una exportación de datos en una pestaña (original ) y necesitaría que me pegase las lineas nuevas en otro listado de otra pestaña ( copia ).. y al mismo tiempo, que me borrase del listado COPIA los que ya no encuentre en la exportación ( Original ) BUSCAR Y ESCRIBIR EN OTRA PESTAÑA.xlsx

Hola, espero puedan ayudarme, podrian generar un tutorial no solo para mi si no para el resto de personas que lo desearan, ya que el conocimiento debe de ser compartido: en este link esta el excel que desearia con Visual Basic y macros. Espero puedan ayudarnos a los que no sabemos como realizarlo.

Buenos días, soy nueva en esto y no tengo mucha idea de cómo hacerlo. He visto varios ejemplos de macros que se parecer bastante a lo que necesito y creo que para una persona que sepa programar macros esto le resultará bastante sencillo. El caso es que en una carpeta tengo varios ficheros de texto .txt y necesito una función (Macro) que me lea el primer TXT y los datos me los almacene en la primera fila (distribuido en columnas) y así sucesivamente. Los datos que contienen los TXT son: Apellidos Fecha Dirección Población Código postal Teléfono Móvil Email Web No están delimitidados por ningún signo de puntuación Muchas gracias por vuestra ayuda. Sois geniales…

Que tal saludos para todos quisiera saber si alguien me puede ayudar con una macro que me identifique las columnas con datos (como un currentregion)y sume su valores al final de cada cada columna muchas gracias por su colaboracion Libro1.xlsx

Estoy trabajando un archivo de biblioteca para el cual ya me han ayudado anteriormente con un ListBox y con un formulario para Mantenimiento de Listas, lo que me ha servido muchísimo y de lo cual estoy muy agradecido de los miembros Antoni y JSDJSD, en esta oportunidad he agregado al objeto "ThisWorbook" las instrucciones "Application.Visible = False" y "FRMPanel.Show" para que al usuario le muestre solo el formulario "Panel" desde donde podrá realizar la gestión de la biblioteca, ocultando la aplicación Excel a su vista. La contraseña del proyecto es "biblio" Además he agregado al formulario un botón de comando para hacer visible Excel, el que al ejecutarlo y,…

amigos buenas noches desde México, tengo que realizar un trabajo el cual ya tengo un poco avanzado pero he llegado a un punto en donde tengo que modificar todo lo realizado nada mas por que necesito que al momento de crear una hoja y le pone nombre (ejemplo "B1 (1)") y así esta especificado en el código para crear las hojas y cuando quiero escribir otro código en la hoja creada tengo que seleccionar dicha hoja, el problema empieza cunado quiero hacer mas hojas (ejemplo "b1 (2), b1 (3), b2 (4) y asi) quisiera que me comentara si se pudiera hacer automático. Sub UNA() INICIO Y = Worksheets.Count Application.ScreenUpdating = False Sheets.Add After:=Sheets(Sheets.Count) …

Hola Espero se encuentren bien Estimados tengo un libro con 4 hojas: Parámetros, Equipos, Datos y Informes El proceso es el siguiente, que se cargan valores en las hojas Parámetros, Equipos, Datos. Estos valores rellenan la hoja informes. Este proceso se repite con 20 clientes en el día. Cada hoja de cliente se guarda con un nombre corto. Al final del día se tiene que pasar los reportes. Eso implica imprimir uno por uno. Por eso me gustaría saber como puedo hacer un macro que imprimir las hojas con los nombre de los clientes y las hojas Parámetros, Equipos, Datos no se impriman Es decir que la final del día el libro queda así: Parámetros Equi…

Buenos dias a todas, Lo primero agradecer a la plataforma el acceso gratuito en estos momentos. Espero y deseo que todos esteis bien Paso a detallar mi problema, me baje un archivo de la comunidad del gran maestro Antoni,he intentado adaptarlo a mis necesidades y he resuelto algunas cosas y otras no. Detallo los fallos que no soy capaz de sacar: 1º En columna C no me salen los datos bien 2º En la columna D Tengo que poner los nombres con numero porque sino los graba todos en la misma fila 3º En el cronograma si empieza la actividad en el mes siguiente al elegido aparece en el mes selecionado Por ultimo cada vez qu…

Saludos a todos. Estoy continuando el post ( https://www.ayudaexcel.com/foro/macros-programacion-vba/20306-pendiente-formatos-diferentes-cuadro-combinado-combobox.html ) donde pregunté por una lista desplegable o un combobox en el que se pudieran asignar distintos formatos a cada una de las líneas. Macro Antonio me contestó que ésto no se podía hacer con los combobox, pero que consultara otro post que había empezado él sobre cómo utilizar la función SpreadSheet (que hay que descargarse aparte, consultar ese post: https://www.ayudaexcel.com/foro/ideas-aportes/20517-listas-validacion-multiples-columnas-fuentes-colores.html ). Por cierto, muchisimas gracias por tu ayuda …