Macros y programación VBA

Buenos días estoy avanzando un pequeño proyecto de mi trabajo, pasa que quiero concatenar la hora de un textbox con un combobox (am y pm) y que aparezca concatenado en un label de otro userform. Quisiera que me ayuden please Gracias de antemano Ayudaexcel control km.zip

Hola que tal, Tengo un archivo donde quiero generar un reporte en el cual me haga busquedas y me mande partes de las hojas donde tengo esa informacion, en mi segunda hoja tengo todas las OC´s, en la siguiente que se llama exp. tengo el detalle de las OC´s y en la ultima tengo tambien informacion de las OC´s, por lo tanto quiero en la primer hoja con un filtro buscar la OC especifica y que me genere un reporte con la informacion de las hojas restantes.

Buenos dias queria una ayudita con una macro, soy un iniciado en esto. Me gustaria hacer una macro que cambie la formula de la celda que tengo seleccionada con un el dato de la anterior columna, misma fila. Ah y despues aplico la formula a las siguientes 11 celdas de la misma fila (como si se tratara de la forma automatica, arrastrando el raton) Por el momento tengo algo como esto... Sub Macro3() ' ' Macro3 Macro ' ' Keyboard Shortcut: Ctrl+q ' Valor = ActiveCell.Range.Previous ActiveCell.FormulaR1C1 = "=+'" + Valor + "'!R33C[-20]" Selection.AutoFill Destination:=Range("AA1032:AL1032"), Type:=xlFillDefault End Sub[/CODE]

Buenas necesito de vuestra ayuda con lo siguiente: 1. Se selecciona de la lista una de las 4 opciones. 2. Si selecciono TODAS deben mostrarse todas las filas con datos. 3. Al seleccionar una de las otras 3 opciones la macro debe: obtener los 3 primeros carácteres de la opción sin incluir los espacios y en mayúsculas. Esto lo consigo con este código proporcionado por Héctor Miguel: Mayus = UCase(Left(Replace(Target, " ", ""), 3)) 3. Con el resultado obtenido, en el ejemplo: IZ UNIDO (con los 3 primeros carácteres el Id para buscar es IZU) , buscar en la columna D si existe algún registro que empiece con IZU. 4.Ocultar las filas que no coincidan. En este caso hay que …

Que tal, he estado buscando en muchos foros pero no he logrado dar con lo que necesito nadamas sale el de convertir fecha en numeros. Lo que necesito es pasar los numeros de las horas y los minutos.. por ejemplo 02.40 = dos horas con cuarenta minutos Como es el codigo si alguien me puede ayudar.. Se los agradezco mucho

Buenas noches. Estoy haciendo una macro para verificar una informacion, pero quiero introducirle dos instrucciones que aun no he podido, solicito de su colaboracion. las instrucciones son: Que las fórmulas que están en el rango F6 a R6 se copien hasta la última celda de la columna A que tenga valor. Yo lo hice como esta en la macro que ejecuto con el botón (lupa) allí insertado, pero solo me copia uno a uno cada vez que aparece una celda vacía, yo quiero copiar todo el bloque con un solo clik. Los Nits que están registrados en la columna A me los busque en la base de datos de TERCEROS, y si no encuentra nada, entonces que me permita crearlos mediante un userform …

Hola a todos. Bendiciones. Estoy haciendo una pagina web para un colegio. y necesito generar correos institucionales por cada alumno y como sabrán es una tarea extensa si se piensa hacer manualmente ya que dicho colegio consta con mas de 1.000 estudiantes hay algún macro o función en vb que me permita generar dichos correos automáticamente, teniendo almacenada la información del alumno en celdas? Gracias.

Bunas a todos los del foro, necesito saber si alguien me puede ayudar necesito hacer los siguiente; tengo una conjunto de celdas en dos columnas que necesito se repitan hacia abajo 148 veces. ejemplo que los datos de la columna 1 y 2 se repitan hacia abajo 148 veces. ojala me puedan ayudar gracias. Columna 1 Columna 2 [TABLE=width: 160] [TR] [TD=class: xl65, width: 80]5001113[/TD] [TD=class: xl66, width: 80, align: right]990[/TD] [/TR] [TR] [TD=class: xl65]5004148[/TD] [TD=class: xl66, align: right]280[/TD] [/TR] [TR] [TD=class: xl65]8000966[/TD] [TD=class: xl66, align: right]1090[/TD] [/TR] [TR] [TD=class: xl65]8000970[…

Buenos días estimados, estoy lidiando con un tema que no encuentro ayuda en ningún lado. El problema es así, en un libro de excel se le agregó dos filas con campos dinámicos de datos. Antes de que se le agreguen estos campos, el libro funcionaba bien, generaba una copia de una de las hojas en una hoja nueva y copiaba bien todo ahora no copia el alto de las filas, sale todo en tamaño normal. La verdad que ya no se que hacer para resolver este problema. El código que genera este informe es el siguiente: Option Explicit Sub genDefinitivo() ' ' Macro3 Macro ' Macro grabada el 28/10/2008 por dapezteguia ' ' Dim tArchOrig As String, tArchDes As String, tArchDefinitiv…

Estimados, Necesito una manera rápida de definir una acción para varios textbox. Por ejemplo, me gustaría definir la misma acción al hacer click para los textbox 1-5, otra para 6-10 y otra para 11-15. La idea es que voy a tener un contador que me diga para cuales textboxes voy a hacer la accion A, B o C. Saludos Textbox.zip

Estimados, buenas noches Ando buscando algun archivo interesante que pueda controlar los tiempos de vehiculos o camiones, tanto como reparto y descarga en la planta. Gracias y espero que me puedan ayudar Saludos Cordiales

Saludos, Necesito una macro que pueda utilizar en excel 2010, explico el tema: [TABLE] [TR] [TD]si(A2) tiene la fecha enero pegue los valores de la columna C (C2:C1048576) en la columna H (H2:H1048576) [/TD] [/TR] [TR] [TD]si(A2) tiene la fecha febrero pegue los valores de la columna C (C2:C1048576) en la columna I (I2:I1048576) [/TD] [/TR] [TR] [TD]si(A2) tiene la fecha marzo pegue los valores de la columna C (C2:C1048576) en la columna J (J2:J1048576) [/TD] [/TR] [TR] [TD]si(A2) tiene la fecha abril pegue los valores de la columna C (C2:C1048576) en la columna K (K2:K1048576) [/TD] [/TR] [TR] [TD]y asi sucesivamente, hasta llegar a diciembre [/T…

hola buenas noches aqui molestando de nuevo:cower: solicitando su ayuda de la manera mas atenta si pudieran auxiliarme poniéndole un boton de modificacion de datos a este formulario :smug:si alterar lo ya hecho, todo esto con la idea de poder completar este formulario que en lo personal me parece muy util pero siento que le hace falta esa parte de modificacion de datos mediante el formulario. De ante mano les agradesco. Saludos anexo: archivo de excel comprimido Base.rar

Saludos, Tengo una macro con un formulario de registro en excel, necesito que los campos de número sean numéricos y no de texto como se encuentran en la hoja "TABLAS" estos son los nombres de las columnas que necesito con formato número: (FACTURA-VALOR-DESCUENTO-AVERIA-RETENCIÓN-RETEICA-PAGO), también requiero que en la columna "PROVEEDOR" me deje registrar en la filas nombres repetidos, puesto que la macro no deja repetir nombres en esta columna. Adjunto archivo con la macro. Gracias por su colaboración. Hugalex10 LibroDiario JM.rar

Hola, Estoy mirando por la red y seguro que mi duda también está perfectamente explicada en algún sitio ya que es increíble la cantidad de información que existe pero, no puedo demorar más el envío que me han encomendado, así que me he atrevido a pedir nuevamente vuestra inestimable ayuda. Tengo que enviar un informe y a su vez solicitar información a diversas empresas. Tengo que filtrar la información correspondiente a cada una de ellas pero sólo me tiene que filtrar la información que existe. No sé como decirle que si no hay nada, que no haga nada. Bueno no se nada. Envío un archivo que quizá os ayude a comprender mejor lo que necesito. Gracias de nuevo y un saludo…

Hola, En un libro, en una hoja, tengo información muy extensa, de todo tipo, de muchas ciudades pero tengo que solicitar un nuevo dato a cada una de ellas y para ello necesito crear una hoja personalizada con su nombre donde incluiré la información relevante que necesitan para poderme dar ese dato que les reclamo. Estoy utilizando una tabla dinámica. El campo ciudad lo he puesto en el campo filtro y utilizo esta macro: Sub InsHoja() Dim MyName As String Sheets("BaseDatos").Select MyName = Range("I10").Value Sheets.Add After:=Sheets(Sheets.Count) Sheets(Sheets.Count).Select Sheets(Sheets.Count).Name = MyName End Sub[[/CODE] Funciona muy bien pero claro pri…

Hola, Gracias a todo el que lea mi pregunta y en especial al que pueda respondérla. Lo que pasa que estoy programando en vba la simulación de una situación y para obtener resultados finales necesito hacerla 100 veces por lo que decidí meter todo el código dentro de un For y echarlo a andar 100 veces (o mas). Lo que pasa es que cada vez que lo haga, necesito que guarde el resultado de una variable en una Hoja diferente. Como resultado, me gustaría tener todos los resultados obtenidos en una columna de otra hoja. De ante mano, Muchas gracias p.d: actualmente el resultado solo me lo muestra por un MsgBox, pero cuando lo ponga dentro del For, no va a funcionar.

Buen día a todos!!! Solicito de su apoyo para saber si es posible agregar código a un formulario para que verifique la ortografía de un cuadro de texto (o varios) mientras se escribe como lo hace Word. Hasta el momento solo he hecho lo mas facil que es agregar el código Cells.CheckSpelling SpellLang:=2058 para que verifique el texto una vez exportado a excel, pero esto me quita tiempo, por lo que quisiera hacerlo desde el mismo formulario. Gracias! PD: No me permite subir el archivo, me marca un error

Buen día, Tengo una hoja de Excel en donde se va generando una base de datos con un folio consecutivo, realizo una búsqueda por el número de folio y lo cargo en un formulario donde complementan información y la guardan en otra hoja donde que vinculado por el numero del folio. El problema es que cuando encuentra el folio y carga el formulario no pone los datos, tengo que salir del formulario y volver a buscar y entonces ya lo carga correctamente, una ves mostrado se complementa la información guardo y todo bien, pero busco otro folio y se queda con los datos anteriores, tengo que salir y volver a buscar...Cómo puedo hacer para que lo haga a la primera? Gracias de anteman…

Hola a todos los que leen este tema, Directo al grano, tengo un archivo donde quiero ocultar las columnas donde se cumpla la condición que tengan el número cero, en el área marcada en amarillo, todo esto con una macro. Agradezco mucho su ayuda, saludos desde México. Ocultar_Columnas.xls

Hola amigos: quisiera que me ayudaran con lo siguiente, tengo un listbox que carga unos datos, dentro de los que se encuentran las fechas lo que deseo es que por medio de un boton poder filtrar un rango de fechas, pero que al filtrar tome los datos del listbox previamente cargado y no de la hoja, y que idealmente lo muestre en el mismo listbox, sino aunque fuera en otro listbox. Gracias fechas.rar

Hola, que tal! Estoy creando una especie de nota de remicion que utilizaran 6 compañeros a cada uno se le asignara una secuencia de folios unicos de 1000 en 1000 la cosa es que soy nuevo en esto de exel y quisiera ver si me pueden hechar la mano a crear un macro para generar secuencialmente los folios que tome el ultimo usado y le sume 1 para asignar uno nuevo y que cuando se llene la nota se guarde en una carpeta para llevar un control y registro de los mismos espero de verdad me puedan ayudar ejemplo.rar

Estimados; Junto con saludarlos, les informo que he estado intentando de generar una formula en una macro y me arroja un error, necesito saber si pueden ayudarme. la formula es: =SI(A2<>A1;G2*I2;SI(Y(A2=A1;G2=0;J2=0);0;SI(Y(A2=A1;G2=0;J2<>0);"";SI(Y(A2=A1;G2<>0;G1=0;J1=0);G2*I2;SI(Y(A2=A1;G2<>0;G1=0;J1<>0);(J1*K1)+(G2*I2);SI(Y(A2=A1;G2<>0;G1<>0);(L1+(G2*I2));"ERROR")))))) donde como aun no se programar muy bien la genero mediante la opcion de grabar macro y me arroja este codigo: Range("L2").Select ActiveCell.FormulaR1C1 = _ "=IF(RC[-11]<>R[-1]C[-11],RC[-5]*RC[-3],IF(AND(RC[-11]=R[-1]C…

Hola, Acerca del ejemplo del cual adjunto un ejemplo, hago la siguiente consulta: En cada celda de la columna A tengo una fórmula. En esas mismas celdas (las de la columna A) el usuario puede escribir un número; por lo cual la formula que estaba en dicha celda se borraría. La pregunta es ¿cómo hacer una macro para que si un usuario escribe un numero sobre la formula, y luego borra dicho número, al quedar la celda vacía en ésta se vuelva a reescribir de manera automática la formula que tenía originalmente? Cabe destacar que no es posible bloquear la celda, porque en la misma columna A se debe poder: o escribir el número que uno quiera, o dejar que actúe la fórmula en b…

Hola queridos amgios, un saludo muy cordial , estoy mejorando una aplicaciosita en excel que la vez pasado me ayudaron, esto es para mi objetos perdidos, bueno el problema es: 1.Tengo dos TextBox, uno donde pongo la fecha donde se econtro el objeto olvidado y otra textbox donde aparece una fecha limite para tenerlo almacenado que son 90 Dias , y en esta quiero que automaticamente me le sume los 90 dias al textbox1, para que el textbox2 se almacene la fecha de caducidad, tengo este codigo : este codigo lo tengo en textbox3 que la descripcion del objeto Private Sub TextBox3_Change() TextBox1.Value = "" If TextBox1.Value > 0 Then TbExpireDate = CD…