Que tal buenas tardes, Hace un momento estube revisando el post del buscador con 3 criterios y encontre lo que e estado buscando ya hace mucho, ha sido de mucha utilidad para mi proyecto solo tengo un pequeño problema al buscar me envia los dastos al listbox todos en una sola linea quisiera que al buscar busque cada una de las compras del cliente (lo cual ya lo hace) pero que los presente en el listbox de esta manera 101 Pitahaya Bar EIRL 19/09/2013 (estos son lo datos del cliente hasta aqui todo bien) 1 Limpiavidrios x 1gl 10.00 3 Desinfectante pino x 5gl 55.0…

Que tal a todos Tengo tres cuadro combinados en la Hoja1 y en la Hoja2 tengo las infmacion que necesito manejar Lo que quiero hacer es lo siguiente: Primer cuadro combinado (combo1) tomando los datos de la columna A de hoja 2 Segundo cuandro combinado (combo2)tomando el valor del primer cuadro combinado filtrar la Hoja 2 y solo me muestro lo filtrado El ter cuadro combinado (combo3) que me muestre la informacion solo filtrando con los valores de cuadro combinado uno y dos Y por otro lado Mi cuadro combinado se llama combo1 Se que para ingresar de las columna de los cuadro combinados es con la siguiente instruccion: combo1.column(1) Como puedo hacer para asigna…

Hola, buenas tardes: Solicito su ayuda, pues llevo tiempo generando una macro la cual ya se ejecuta de forma correcta en la hoja seleccionada, pero requiero ejecutarla en algunas hojas del libro activo en forma automática (sin estar ejecutando la macro de hoja por hoja), he incluido un ciclo FOR pero me lo hace de forma incorrecta :S ojalá puedan ayudarme!! Les anexo parte del archivo con el cual estoy trabajando, del cual la primera pestaña es el formato del reporte, la segunda pestaña es reporte ejemplo (resumen) de la 3a pestaña. De antemano agradezco la atención. Saludos!!! reporte.xls

Hola a todos; -Os comparto un video y una macro donde muestr como insertar imágenes usando la propiedad Caption en nuestras Labels y ComandButton. Pinchar sobre el enlace. Video: Saludos a todos MCaptionImg.xlsm

Hola, buenas tardes me podrian ayudar con este proyecto. adjunto ejemplo Lo que necesito es que tengo en una base, datos concatenados en un hoja de excel y he logrado separarlo con split a unos textbox pero ahora me surgio la idea de ponerlos directamente en un listbox sin separarlos previamente. sera que me podria ayudar con el codigo. Salu2 Ejemplo Listbox concatenado.xls

Teniendo el largo de la celda B9 fijo, solamente lo que hago es autoajuste automatico del alto de la celda al cargar el dato, lo que me genera que quede mucho espacio en la celda dependiendo de los caracteres, como puedo hacer para que siempre el alto sea el justo, que no sobre ni un espacio? Dejo adjunto unas imagenes, donde pueden apreciar que la celda B9 se autoajusta pero innecesariamente le sobra mucho espacio en blanco.

Buenas amigos, quería saber si me pueden ayudar por favor con un proyecto donde quiero sumar celdas en un formulario VBA de ingreso de datos, con un rango y criterio especifico, al mismo tiempo que sea dinámico que vaya sumando mientras vaya ingresando los datos en las primeras filas . Saludos BDJOSEITO.xlsm

Hola amigos, tengo un código que lo que hace es al hace es entre dos fechas buscar en una base de datos los cumpleaños que hay entre esas dos fechas. El problema creo que el código esta poco optimizado y en algún lado he metido la pata ya que tengo tres problemas os lo enumero a continuación: 1- Para seleccionar la fecha hago click en una nube y me sale un calendario y selecciono la fecha, el problema es que la fecha me sale según donde esté la celda seccionada y no en B2 que es donde me gustaría. Lo mismo me pasa con la segunda fecha de hasta, la fecha no me aparece en B8 2- Cuando abro el formulario del a fecha no me aparece un botón que he creado de cerrar el calen…

A que se debe que mi exeb no arranca pidiendo habilitar macros y luego no puede hacerlo?

Hola de nuevo caballeros, les adjunto un archivo para ver que solución me dan todo viene explicado en el archivo, lo que quiero es poder identificar primero para despues a ver si se puede limpiar con alguna macro. PARA FORO.zip

Deseo enviar los datos de la hoja "Datos" a tantas hojas "Muestra" como filas estén llenas. Se deben crear las hojas nombradas en función de la columna B de la hoja "Datos", P0403 en el ejemplo. Se copian los datos en los lugares oscurecidos de la hoja "Muestra", atención que al final también hay algunas, como también dejé en el ejemplo de la hoja "P0403". Tan solo dejar una macro, ya colocaré el botón. Puede ser complejo al final de la hoja, con los datos de años anteriores, columnas N,O,P, ... de la hoja "Datos", porque cada año se añade una columna. Cojo el año del análisis de la casilla A1. Gracias de antemano. Evaluacion mensual.xls

Hola con todos tengo un pequeño problema, en el libro que les adjunto pueden ver 2 grupos de datos, venta y gasto. Cada uno esta separado por mes donde hay una cantidad y un determinado precio. A la derecha hay 3 botones, Ocultar que oculta todo lo de venta y los precios de gasto, mostrar que muestra las celdas de precio pero solo para gasto y clave que de introducir la clave,darkside, se mostrara de nuevo la parte de venta. Mi problema es que la parte de venta debe de estar bloqueada es decir, solo la gente que tiene la clave puede modificarla. E tratado de mil maneras durante mucho tiempo y no se que hacer porfavor alguien ayudeme jaja prueba 1.rar

Buenas tardes, Tengo un problema con macros en visual basic para excel y que, por más que mire, no consigo solucionar. Tengo el siguiente código: Option Explicit Dim oConexion As ADODB.Connection Sub ConnectDB() On Error GoTo err Set oConexion = New ADODB.Connection oConexion.Open "Provider=SQLOLEDB.1;Password=bandoiberica2015b;Integrated Security=SSPI;Persist Security Info=True;" & _ "User ID=Administrador;" & _ "Initial Catalog=BANDOIBERICA_2015;" & _ "Data Source=bandoserver3" 'ip o nombre del servidor 'MsgBox "Connexió establerta.", vbInformation, "1" Exit Sub err: MsgBox "E…

Muy buenas tardes comunidad. El día de hoy se me presento un problema con una base de datos que se encuentra en una carpeta compartida, se elimino la función indirecto de la columna "Estado" para la columna "Situación". Realizando la esta función en otro archivo me funciona pero no puedo subir este porque ya se encuentra compartida y tiene ciertas restricciones que no me permiten el cambio del archivo. Quería comentarles que esta base tiene un macro donde al cambiar el dato de la columna "estado" la información de esta fila se remite directamente a la hoja de "inhabilitados". MuchasGracias por su ayuda. BASE DE DATOS PARA 2013.zip

cordial saludo estimado, tengo un archivo en excel con una consulta sql en el editor de visual basic para extraer informacion de la base de datos de un programa de la empresa donde laboro. Hoja1.Range("A10:U20000").Clear Hoja1.Range("A10:U20000").Interior.Color = &HF5F5F5 Hoja1.Range("A10:U20000").Font.Color = &H8000000D Hoja1.Cells(4, 1) = "Intervalo:" & Me.cmb_Fini & "-" & Me.cmb_FFin Hoja1.Cells(5, 1) = "Linea de Producción:" & Me.cmb_LProd SQL = "Select C.nom_cliente,O.Cod_Cliente,O.Cod_Obra,O.Estado,O.FAprob,O.FDesp,P.NoOrden_Pprog,P.CodLote_pprog, L.nom_linea,min(P.Fecha_Pprog) Fecha_Pprog,Sum(P.Cantidad_Pprog) Cantidad, OT.descrip_to…

Buenas tardes; Estoy utilizando una macro que encontre aqui para presionar un boton e incrementar (m) el valor de un numero (ubicado en "I") y otro boton para bajarlo (ubicados en 0 , mi pregunta es como puedo hacer para que si el valor de la celda supera el "3" vuelva a 1, espero que me hayan podido entender. Nos se programar en visual pero estoy buscando algo similar a "If value >3; 1 " . Muchas gracias Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If IsEmpty(Range("I" & ActiveCell.Row).Value) Then GoTo Linea1 If Not Intersect(Target, Range("M" & ActiveCell.Row)) Is Nothing Then Range("I" & ActiveCell.Row).Va…

Buenas tardes a todos, es la primera vez que posteo aqui, aunque he buscado varias cosas, siempre con buenos resultados, pero esta vez no encuentro lo que busco: Busco colocar, siembre que exista, los datos de la columna A, en la primera celda libre que encuentre de su misma fila: No soy experto en VBA ni programacion, pero he encontrado una formula que modificandola queda asi: Sub ttt() ActiveSheet.Cells(17, 1).Select Selection.Copy ActiveSheet.Cells(17, 1).End(xlToRight).Offset(0, 1).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False ActiveSheet.Cells…

Buenas tardes, Ojalá me podáis ayudar. Realizo una tarea repetitiva de obtención de datos CAT, BBDD en bruto similar al Excel que adjunto aunque mucho más largos. Y entre otros tengo que filtrar y depurar las filas que empiezan por "14", pasarlas a Hoja2 y ordenar de mayor a menor por columna T. En total son 3 acciones bastante sencillas: Paso 1: Filtro las filas que tienen el dato "14" en sus celdas de la columna A, copia los datos resultantes y los pego en Hoja 2. Paso 2: Cambio el formato de las celdas de la columna T a integuer o Entero a través de una formula. Seguro que hay un atajo pero no lo conozco. La finalidad es que Excel reconozca los datos de esta…

Hola a todos y desde ya le agradezco por su tiempo y paciencia.. Tengo una planilla, en la cual tengo un Userform no modal, en esta tengo dos Textbox, en los que hago búsquedas, y que al darle doble click me arroja en cualquiera de las celdas de la columna "B" donde se encuentra mi cursor....ademas... Tengo un TextBox3, en la cual quiero ingresar números ej. 123-123-465799 y que este número me arroje a la celda de la columna "D", a partir de la fila 7, ademas tengo 3 ComboBox, en los cuales tengo lista a seleccionar, del ComboBox1 al seleccionar el tipo de documento que me arroje a la celda de la columna "F", a partir de la fila 7 del ComboBox2, al seleccionar e…

Hola a todos, Para una simulación docente utilizo un archivo de Excel que contiene columnas pareadas de datos que forman grupos. Adjunto archivo con datos y código para se entienda mejor lo que tengo y lo que necesito. Con esos datos quiero: · Que en determinados puntos de cada par de columnas (mismo color) se permuten datos de forma aleatoria. · Que el resultado el proceso de permuta se copie en una nueva ubicación. · Que el proceso se realice para todos los grupos de datos hasta acabar. Que es lo que tengo: · He escrito una macro que realiza correctamente todo el proceso (está en el archivo y contiene comentario…

Buneos dias y muchas gracias de tod@s de antemano, tengo una base de datos de personal en la cual tienen asignado un puesto de trabajo asi como un material que se le asigna , me gustaria que cuando finalicen su periodo de trabajo el mateiral asignado , casco, chaleco, linterna, taquilla, se les quitaran y aparecieran como que estan disponibles para poder asignarlos a otra persona. pero si me gustaria que los datos de la persona permanecieran , sin tener asignado material. Muchas gracias por vuestra ayuda. tabla de material.xlsx

Buen dia comunidad. Necesito generar un conjunto de combinaciones formada por 03 números ALEATORIOS desde el (01 al 09) de forma ascendente. Que en su orden correlativo son 84 combinaciones desde el (1-2-3) hasta (7-8-9). Dentro del archivo se detalla más. Gracias.. 1.- CRT.xlsm

Hola muy buenas tardes, Me gustaría su ayuda al respecto de un sistema de captura, búsqueda y constante agregado de datos según hojas de un libro. Cada hoja corresponde a una carpeta y necesito ingresar estos datos a una base de datos de otro libro para que el libro donde se encuentran las hojas que corresponden a cada carpeta no tenga un proceso ralentizado que ya me ha sucedido. Ademas me gustaría crear esa base de datos con estos datos que muestro en la imagen para hacer un filtro de búsqueda y poder mostrar en una hoja resumen los datos relevantes según cada hoja con buscarv. La pregunta es ¿por que asigno una carpeta a cada hoja? y la respue…

Buenos días esta pregunta esta relacionada con el hilo anterior el cual me dieron una solución perfectamente valida, copio en enlace para que sepáis de que hablo. Pero claro ahora me surge la duda, cuantas o que formas hay de "sacar" valores de un modulo, cual es la que normalmente utilizáis o recomendáis. Vuelvo a pedir perdón si soy muy pesado pero creo que mientras mas conocimiento se comparte mas se aprende.

Estimados amigos del foro, junto con saludarlo queria que me ayudaran con una planilla que quiero implementar, bueno quiero que por un combobox se genere una tabla con los siguientes filtros (segun archivo adjunto): E-CL A por escalon I me entregue el coordinado, S/E y el valor asociado. Lo mismo para E-CL B y los distintos escalones... por lo tanto filtrar por escalon I, II, III, etc. y que me entregue coordinado, S/E y el valor asociado tanto para E-CL A y E-CL B... Espero puedan ayudarme.... EDAC.zip