Buenas, Quisiera poder arreglar una función en vba que me permite concatenar en comas las celdas seleccionadas. El problema es que al concatenar, aparece un espacio antes de cada coma. Necesito que no aparezca la coma, en el adjunto muestro el resultado deseado. Function CONCATENARCELDAS(rango As Range) For Each celda In rango.Cells If celda.Value <> "" Then resultado = resultado & ", " & celda.Value End If Next celda resultado = Right(resultado, Len(resultado) - 2) CONCATENARCELDAS = resultado End Function CONCATENAR.xlsm Saludos.!

Hola, me gustaría poder colocar un UserForm en vez de MsgBox, pero en todos los sitios consultados son formularios, no encuentro ningún ejemplo de un UserForm solo para informar (como MsgBox) como puedo hacerlo ? y como se ejecute dentro de un programa ? (en vez de usar "F5" ? Gracias a todos

He aquí un código para abrir tu cuenta Hotmail sin necesidad de escribir el usuario y contraseña continuamente. Es obra de Cacho R. Saludos. Hotmail.rar

Hola a todos, Espero poder explicarme bien. Adjunto archivo y a continuación la explicación. Tengo una gran base de datos de la cual necesito pasar los datos de 2 columnas no contiguas a filas mientras éstos tengan el mismo ID. En el ejemplo, a partir de la columna L (marcado en rojo) pongo intercalado los valores de la columna K y D en la misma fila mientras el ID_FORMULA (columna A) sea igual y siempre en la primera fila del grupo (por grupo me refiero a igual valor en columna A). Aclaro que la cantidad de filas por ID no es fija. Ejemplo.xlsxPuede ser desde 2 filas hasta 7. En el ejemplo, hay de 3, 5 y 4 filas. Como son 900.000 filas se me oc…

tengo una aplicacion con 11 hojas(1 hoja de inicio con 10 botones quiero que al abrir la aplicacion solo se muestre la hoja de inicio 1 pero con todas las solapas ocultas inclusive la solapa de hoja inicio , como lo puedo hacer , mi thisworkbook puse: Hoja1.Visible = xlSheetVeryHidden Hoja2.Visible = xlSheetVeryHidden Hoja3.Visible = xlSheetVeryHidden Hoja4.Visible = xlSheetVeryHidden Hoja5.Visible = xlSheetVeryHidden Hoja6.Visible = xlSheetVeryHidden Hoja7.Visible = xlSheetVeryHidden Hoja8.Visible = xlSheetVeryHidden Hoja9.Visible = xlSheetVeryHidden Hoja10.Visible = xlSheetVeryHidden Hoja11.Visible = x…

Buenos días familia: Después de intentar hacerlo por mi cuenta y buscar en el foro no encontré la respuesta a una pregunta que posiblemente sea sencilla. Quisiera saber: ¿Cómo escribir en las celdas de la columna "Principal!B:B" el valor del salario que se encuentra en la celda "Configuración!C5" al iniciar una semana en el día que se informa en la celda "Configuración!C4"? ¿Cómo agrego el número que sigue en la columna "'Registro de Movimientos'!A:A" en caso de que la celda de la columna "'Registro de Movimientos'!B:B" no esté vacía? ¿Cómo agrego la palabra "No" en la columna "'Registro de Movimientos'!J:J" en caso de que la celda de la colu…

Buenos dias amigos. Recurro a ustedes con una duda. Queria saber si al igual que uno valida en un celda que los valores ingresados esten en un rango x, se podia hacer a la inversa, es decir, validar que los valores ingresados no esten en una lista y permitir el ingreso de dicho valor. ejemplo: Tengo una hoja de ingresos (apenas 3 celdas, todas datos del mismo equipo) y una hoja en la que tengo los seriales de unos equipos dentro de una columna. La cuestion es que en la celda B5 (de la hoja ingresos) al ingresar el serial del equipo, se realice una validacion de que ese serial no este dentro de la hoja Seriales, y al no estar, permitir el registro de di…

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

Buenas tardes colegas. Espero su salud sea excelente. Colegas, tengo un Proyecto en el que he venido trabajando para el Control de Ropa Sucia en la Lavandería donde trabajo en estos momentos, per necesito mediante un código poder consolidar los datos, o sea, que me haga una suma por hohas de cada producto. Todas las Hojas, que además contienen una Tabla son idénticas en cuanto a cantidad de columnas y necesito en la Hoja Consolidado hacer dicho calculo. Yo lo tengo hecho con el cálculo rtradcional, o sea, la suma de todas las celdas de cada una de las hojas, pero me gustaría más que fuera a traves de un Botón. Es bueno tener en cuenta que cada una de …

Buen dia Estoy haciendo una macro que busque una oracion en especificio y borre filas hacia abajo o hacia arriba estoy usando el bucle Do loop manejando los errores cuando no encuentre las palabras con GoTo, la macro funciona bien al ejecutarla pero cuando termina siempre termina dandome un error en la parte de enmedio que marco con negritas ya intente de muchas maneras cambiando el orden de busqueda y sigue apareciendo el mismo error me podrian decir que estoy haciendo mal. tambien eh manejado en el ultimo Do poner On Error Resume Next y lo unico que hace es crearme un bucle infinito y empieza a borrar todos los datos de la macro por que obviamente la siguiente linea qu…

Hola, Nuevamente recurro a ustedes, tengo una planilla en la que puse un commandbutton que debiera borrar los datos de una hoja, pero no se que estoy haciendo mal que me arroja un error. Otra cosa que agregué es un calendario despegable, y me gustaría ponerle una condición, donde dice periodo "desde" , "hasta", la idea es que me aparezca sólo el mes y el año, que no aparezca llenado automáticamente, y que deba poner el dato para poder seguir adelante con el registro, y donde dice fecha, que aparezca la fecha cono "dd-mm-aa" y que también sea condicional a que este puesta la fecha para seguir con el registro, por favor ¿alguien me podrá dar una mano? Estoy usando lo sig…

Buenos dias. Estoy trabajando con un archivo que contiene macros y muchas celdas que estan combinadas y centradas y al momento de ejecutar algunas macros me esta generando errores que me descuadran el formato sobre el cual estoy trabajando. investigando me he enterado que es por el uso de la funcion combinar y centrar. asi que quisiera saber como puedo ajustar un texto un poco extenso pora el cual estableci un espacio de las celdas A8:AD10. he probado con centrar en la seleccion, pero esto solo me sirve para una fila y no con filas y columnas.

Buena tarde. Digamos que tengo en G2 diferentes números de semana del año, empezando en la 1, saltando a la 5 en G3 y la 21 en G4, necesito insertar filas entre cada uno de los datos, insertando una fila con el número de semana 2 en G3, después el 3 en G4, 4 en G5, y así consecutivamente hasta el 5, después hasta el 21, etc. Respetando los números que ya tengo y tomando en cuenta solo de 1 al 52 que son las semanas del año. Ayuda por favor! De antemano muchas gracias.

Buenas tardes mis estimados Expertos, con la siguiente duda y pidiendo tu apreciable ayuda, encontre en internet este archivo de excel que llama una consulta de acces me funciona perfectamente en xp pero al ponerla en accion en windows y de 32 y 64 bits me arroja un error, estube leyendo e investigando y segun no hay otro provider para estos SO ya que ste archivo lo pretendo compartir a diferentes usuarios con diferentes SO, por lo que por tal motivo solicito su gran ayuda de haber forma de poder solucionar este detalle. Adjunto codigo que sirve para consultar access y archivos: Private Sub cmdimportar_Click() Dim sError As String Dim ruta As String Dim base_de_dato…

Buen día, estoy realizando un programa para controlar un pequeño inventario, y utilizo userforms para ingresar y registrar datos. Manejo un inventario de 100 materiales aproximadamente y los enumeré desde el 001 en adelante..... el detalle que se me presenta es al ingresar algún código para registrar un movimiento de material, utilizo un textbox, y al ingresar cualquier número, me antepone 2 ceros antes del número, todo esto dentro del textbox. Por ejemplo quiero ingresar el 047 y coloca 0047. Como puedo evitar que coloque 2 ceros delante del número que quiero agregar?

Buenas tardes: soy maestro de colegio y he creado un libro de excel que funciona como un registro de control docente en el que se ingresa calificaciones y comportamiento y a demás genera reportes para impresión. Necesito una macro para crear nuevos libros, según las materias grupos a cargo. Una interfaz (menú) que administre todos los libros creados y algunas de las hojas de cada uno de ellos. La ayuda de ustedes sería de mucha utilidad. Gracias de antemano.:encouragement:

Hola a todos; Rehago de nuevo la consulta de ayer, a ver si es más fácil. En el formulario he puesto dos listBox que alimento con registros usando los botones Examinar y Examinar2 Una vez cargados los registros, ¿se puede crear un procedimiento para que nos indique los items que no se repiten en ambos listbox?, usando para ello el botón "Buscar <>". Adjunto imagen de ejemplo Una vez detectados deben quedar seleccionados. Los listBox tienen establecida la propiedad Multiselect. Imagino que tendrá que ser con algún tipo de bucle y comparar pero me pierdo un poco. Saludos. MDir.xlsm

Saludos: Ya tengo un macro donde envío el mensaje utilizando Outlook, pero me gustaría saber si se puede que el destinatario Cc (Carbon copy) salga protegido. O sea que cuando abra Outlook el usuario no pueda borrar el destinatario Cc: Eso de puede? Gracias anticipadas!!

Buenas, tengo un problema con 3 libros de excel, debo realizar cotizaciones pero el proceso es tedioso en cuanto a copy paste, no soy muy bueno en excel , y solicito su ayuda para crear una macro que me ayude en el trabajo, ya que en ocasiones tengo que quedarme de largo haciendo esto. la situacion es. tengo 3 libros de excel : A, B, C ; el libro A, contiene todos los productos que vendo, alrededor de 3000 productos y hay 12 columnas con los criterios de filtrado o caracteristicas, columnas A B C D E F G H I J K filas x x …

hola expertos buenas tardes mi idea es bordear aquellas celdas que su numero sea igual a su posicion en los cuadros tanto arriba como abajo como lo muestro en la imagen con las celdas rojas Sub resaltar() ' ' Resaltar Macro ' Resalta similitudes https://foro.todoexcel.com/threads/bordear-celdas-de-acuerdo-a-posicion.55559/#post-237370 ' ' Acceso directo: CTRL+q ' Sheets("Hoja2").Select F1 = Asc(Range("A2").Value) f2 = Asc(Range("A3").Value) C1 = Range("B2").Value C2 = Range("B3").Value For J = 0 To 7 ' numero de Columnas Debug.Print "Siguiente Fila " If J Mod 2 = 0 Then Debug.Print "Esta si la hago :" & J For i = 0 To 9 ' numero de filas De…

Hola necesito armar una macro en un Excel que consta de 2 hojas: Primera Hoja ( carga/copiado de datos): En esta hoja al seleccionar en la columna selección con una "X" que copie y pegue este tema en la segunda hoja en la referencia identificada con el mismo nombre ej: al seleccionar con una "X el nombre del participante lo copie y lo pegue en la hoja 2 en la referencia participantes. Y así sucesivamente que cargue los datos seleccionados con una "x" en los objetivos, Temas tratados y Conclusiones y Empresa. Siempre solo si se marca con una "X" el tema que se quiere pegar en la segunda hoja. Aclaración: obviamente la idea es marcar en un mismo tema eJ. Parti…

Buenos Días Me ha surgido una complicación al tener que trabajar con datos y necesito ayuda con este problema que tengo, ya que mis conocimientos de Macros son casi nulos, estoy empezando a raíz de que me ha surgido este problema. Se trata de lo siguiente: tengo que hacer unas encuestas (más de 100 cuestionarios cada vez) que constan de mas de 70 preguntas con sus respuestas correspondientes, las respuestas no están siempre en el mismo orden ni son iguales, las respuestas están en formato texto, pero si que tienen orden con un valor numérico (1,2,3,4,5, ….). La cuestión es la siguiente, la aplicación de encuestas me genera un fichero Excel en el que en la pri…

Hola a todos. Antes que nada, deseo expresar mi felicitación y agradecimiento a este foro, el cual aporta sus invaluables conocimientos a todos los que queremos seguir aprendiendo un poco más de excel. Gracias. Estoy tratando de hacer una macro que me genere secuencias de eventos a partir de una tabla de datos como la siguiente: [TABLE=width: 225] [TR] [TD]Núm[/TD] [TD]Evento[/TD] [TD=colspan: 3]Produce:[/TD] [/TR] [TR] [TD]1[/TD] [TD]A[/TD] [TD]6[/TD] [TD]8[/TD] [TD]10[/TD] [/TR] [TR] [TD]2[/TD] [TD]B[/TD] [TD]3[/TD] [TD] [/TD] [TD] [/TD] [/TR] [TR] [TD]3[/TD] [TD]C[/TD] [TD]5[/TD] [TD]8[/TD] [TD] [/TD] [/TR] [TR] [TD]4[/TD] [TD]D[/TD] [T…

Hola grupo, Soy nueva en todo este mundo (sobra decir que sin ninguna experiencia) y ahora solo se me ocurre pedir ayuda, Les cuento: Donde trabajo; mensualmente descargan un archivo con el nombre de empresas y con diferentes datos, posteriormente, yo debo manualmente filtrar empresa por empresa, crear un nuevo archivo con los datos de esta empresa, enviar un report y crear factura. Busco una manera mas rapida y sensata de dividr esta información por empresa en diferentes archivos de excel Gracias por s valiosa ayuda de antemano

Hola, otra vez estoy dando lata. Quiero agradecerles otra vez toda su ayuda, les comento, estoy haciendo un "programita" para llevar un control de ordenes de compra, pero me atoré en una parte, quiero poder modificar una orden de compra ya existente (solo las guardo en pdf), a la hora de hacer una orden de compra, voy pasando todos los datos de las mismas en una "base de datos", pero para modificar una existente, quiero poder jalar los datos de la base de datos de vuelta a la orden de compra. No he podido hacer que dependiendo del numero de orden de compra que se ingrese, vaya la busque en la base de datos y jale los datos a las celdas correspondientes en la "orden de c…