hola: Tengo una consulta estoy haciendo una macro con formulario el cual ingreso datos y se traspasa a una planilla excel, pero presentó la siguiente consulta para ver si me pueden ayudar. En un textbox tengo una fecha de validación, y en otro tengo la fecha de vencimiento de ésta última es el resultado, ya que debe contar 5 días y que estos sean hábiles ( no considerar feriados, sábados y domingos), y que no sea modificable por el usuario, salvo si cambia la fecha de validación. Mi consulta es como colocar fecha de vencimiento en forma automática en el formulario y que se traspase a la planilla de excel con estas condiciones: Por ejemplo: textbox1+5 días hábiles= t…

tanto la FACTURA-MES como octubre y setiembre tienen la misma cantidad de datos y el mismo orden deseo que en la columna K (% RECUPERO ) me marque de color verde el que tiene mayor porcentaje de recupero y de color rojo el que tiene menor cantidad de recupero alguna idea de como hacerlo ya sea con semáforos o con flechas ...tambien que me muestre la desviacion de ambas facturas. adjunto archivo con las ultimas modificaciones, de como quedaria que quede de manera manual con datos .. gracias por todo. ejemplo manual de factura-pajuma.rar

Muy buenas amigos la siguiente tiene como finalidad la duda de como puedo hacer en una agenda que realize con varias funciones de busqueda (por cedula y por nombre) el poder visualizar la foto de la persona a la cual estoy pidiendo informacion sin mas me despido esperando esten bien y pronta respuesta. centro de votaciones por trabajador USAR.rar

Buenos días Forista, tengo unas tablas en las cuales deseo colocar unas imágenes dependiendo de los números que tenga esta tabla para luego imprimirlas. No se si se pueda definir el tamaño de la imagen al pegarla Anexo archivo con ejemplo. P.D. Es un juego Loteria.rar

Hola amigos, estoy tratando de exportar un rango en formato PDF. Al exportar todo bien, pero cuando quiero agregar imagen en la cabecera no esta funcionando. La imagen lo tengo en la hoja "hjDatosA" del mismo libro, los datos lo tengo en la hoja "hjDatosB" del mismo libro. He buscando publicaciones anteriores y encontre esto ActiveSheet.Shapes("logo.jpg").Select Selection.Copy ActiveSheet.ChartObjects.Add(1000, 1000, Selection.Width, Selection.Height).Select ActiveChart.Paste ActiveChart.Export Filename:=ThisWorkbook.Path & "\" & ActiveSheet.Shapes("logo.jpg").Name, FilterName:="JPEG" …

Amigos, Quisiera saber si alguno de uds sabe la línea de código que necesito para colocar "Importancia Alta" al enviar un Correo desde Outlook 2010. Si pudieran ayudarme se los agradecería un montón. Les envío el código con el que estoy trabajando, por si le sirve a alguien: Sub EnviarEmail() Dim objOutlook As Object Dim objItem As Object Dim objNamespace As Object Dim ADJUNTO As Variant Set objOutlook = CreateObject("Outlook.Application") Set objNamespace = objOutlook.GetNamespace("MAPI") Set objItem = objOutlook.CreateItem(olMailItem) objNamespace.Logon "EXCELSPACE", , True, True ADJUNTO = "Destino.xlsm" With objItem .Attachments.Add (ADJUNTO) .Display .…

En el formulario tengo 100 Proveedores y elimino el de la linea 42, me queda la numeracion salteada como se ve en la imagen, la numeracion no continua porque las lineas se corren hacia arriba COMO DEBE SER y esta bien pero la numeracion queda salteada Para ordenar los datos al ingresar o editar datos, tengo desde la columna B hacia adelante porque no puedo ordenar por la A porque entonces me quedaria los nombres desordenados y los quiero seguir teniendo ordenados Rem Ordena la columna NOMBRE ( alfabeticamente (A a Z) X = ActiveSheet.Range("B" & Rows.Count).End(xlUp).Row Set myrange = ActiveSheet.Range("B2:J" & X) 'ordena hasta la columna J myrange.Sort Key1…

hola expertos de excel mi pregunta es como hacer un codigo de acuerdo a esta condicion , si el numero de la hoja 1 se encuantra en cualquier cuadro de la hoja cundi1 colocarlo debajo de este ejemplo el 2687 esta en la hoja 1 y aparece en un cuadro de la hoja cundi1 colocandolo debajo de donde se encontro dicho numero les agradezco su colaboracion ejemplo2.xlsm

hola buenos dias a todos estoy tratando de buscar un patron numerico entre los cuadros de acuerdo a sus movimientos cada vez que cambie el numero y primero me gustaria que los numeros queden en color blanco como en el ejemplo del primer cuadro para visualizar mejor sus movimientos y lo segundo seria que hiciera el movimiento de color rojo en los cuadros de acuerdo a cada celda de la columna A en vez de lo que esta haciendo con las flechas actualmentey como dije desde un principio busco un patron numerico tomando como ejemplo los movimientos en la tabla de ajedrez si alguien tiene una gran idea para identificar o que me acerque al patron numerico se los agradeceria mucho …

Estimados amigos del foro, saludos cordiales Esta es una consulta aparentemente corta, como puedo lograr colocar una cifra cualquiera por ejemplo 994257851 (en formato numero) al ir pulsando cada boton cualquiera y que se vaya llenando en el textbox pero limitarlo a no mas de 10 dígitos ni menos de 2 subo el archivo para que lo vean Gracias anticipadas Colocar numeros en Textbox.xlsm

Saludos amigos! Estoy desarrollando un formulario en VBA y se me ha presentado el inconveniente de que no logro controlar el formateo de mis cuadros de texto para que cuando el usuario ingrese los datos, automáticamente el formulario coloque las separaciones de miles (.) y de decimales (,). Ejemplo: el usuario ingresa 100000 y quisiera que el cuadro de texto coloque 100.000,00. Agradezco su experimentada ayuda!

Saludos, Estoy preparando un archivo el cual se encarga de recopila (acumular) información dìa a día de un determinado archivo y va a uno general, una vez ya copiado aplico formulas las procesa, las selecciono y las convierto en valores, el còdigo de una parte (que es casi todo) es el siguiente: 'RegistrosActuales (es desde donde se quedo el anterior ingreso y lo nuevo continúa) ' Entonces tenemos esto 'Agrega fecha de actualización Range("g" & RegistrosActuales & ":g" & (Cells(1048576, 1).End(xlUp).Row)).Formula = Now() Range("g" & RegistrosActuales & ":g" & (Cells(1048576, 1).End(xl…

Buenas a toso necesito saber como puedo cambiar esta formula: =SUMA(AE17:AT17)/CONTAR.SI(AE17:AT17;">-1")*0,45, en el caso de que estén vacías o sin datos el resultado final me muestre un valor de 0. Gracias.

Buenas noches Foristas, mi nombre es Juan Carlos Jones y deseo que por favor me ayuden con esta plantilla. Lo que deseo hacer es que cuando le coloqu el mes de la aplicacion o uso de un producto este se el mes en el que se le coloque valor economico en el mes o los meses que correspondan. En la cedal C26 coloco la repeticion o cada cuanto se usa o plica el producto y deseo que el valor se coloque solo en el mes de su aplicacion. Ejemplo: Control de malezas se aplica cada 2 meses, esto quiere decir que cada dos meses debe aparecer el valor de esa aplicacion, mes 2, 4, 6 y 8 No he podido resolverlo. Muchas gracias por su ayuda. Anexo…

Buenos dias, Necesito ayuda para ver y aprender como modifico algunos detalles sobre la siguiente macro. Me explico. He encontrado esta macro por internet y quiero que las celdas tengan un color antes de introducir los datos, para que despues de introducir los datos el formato de las celdas sobre el color de fondo y la fuente quede igual como en toda la plantilla. Adjunto el documento, para que se haga una idea de lo que pretendo. Gracias. Saludos, COLOR CELDAS.xlsm

Amigos, quiero pasar el color de fondo de una celda a un control textbox he intentado con este pero no sale, por favor sus comentarios For X = 2 To Productos.Range("A1").End(xlDown).Row If Me.CbPoductos.Text = Productos.Cells(X, 2) Then TxtLunes.BackColor = Productos.Cells(X, 2).Interior.Color End If Next[/CODE] a la espera de sus comentarios Celest3 [/b]

Buenas tardes estimados programadores, Acudo nuevamente a su conocimiento, de antemano, agradecer siempre a la persona que se tome el tiempo de ayudarme. Como lo indico, lo que requiero es lo siguiente Tengo un TextBox15 en el cual una vez el usuario hace clic arroja un tiempo en formato "hh:mm:ss", este tiempo sale después de restar 2 fechas del mismo formulario. Ahora bien, la ayudita que quiero es que dependiendo del rango de tiempo le ponga un color u otro, de la siguiente manera si es >= 00:05:00 ponga el color del forecolor del textbox15 rojo si es > 00:02:00 y 00:05:00 ponga el forecolor en amarillo si es < de 00:02:00 p…

Hola de nuevo, tengo un programa (sacado de consultas por foros de Internet) que me funciona perfectamente, se trata de cambiar el color de una forma, (es un círculo) pero no consigo hacer lo mismo si tengo 10 o mas círculos, como puedo hacerlo ? Mando código para una forma pero como hacer para cambiar a mas formas ? Gracias a todos Private Sub Worksheet_Change(ByVal Target As Range) 'Updateby Extendoffice 20160704 If Intersect(Target, Range("B1")) Is Nothing Then Exit Sub If IsNumeric(Target.Value) Then If Target.Value < 100 Then ActiveSheet.Shapes("Oval 1").Fill.ForeColor.RGB = vbRed ElseIf Target.V…

algun codigo que arroje todos los colores de excel en una sola columna gracias

Hola Amigos, nuevamente solicitando su ayuda, lo que quisiera saber es como colocar a toda una fila según condición de una celda, en la hoja1 tengo mis registros, y en la hoja2 los colores según estado, si yo cambio el estado me coloree según condición "PENDIENTE, REPARADO, IMPORTADO", gracias. adjunto archivo. COLOR SEGUN SELDA.xls

Buenas tardes estimados programadores, Acudo nuevamente a su conocimiento, de antemano, agradecer siempre a la persona que se tome el tiempo de ayudarme. Como lo indico, lo que requiero es lo siguiente Tengo un TextBox15 en el cual una vez se le hace clic arroja un tiempo en formato "hh:mm:ss" en el mismo textbox, este tiempo sale después de restar 2 fechas del mismo formulario. Ahora bien, la ayudita que quiero es que dependiendo del rango de tiempo le ponga un color u otro, de la siguiente manera si es >= 00:05:00 ponga el color del forecolor del textbox15 rojo si es > 00:02:00 y 00:05:00 ponga el forecolor en amarillo si es &lt…

Buenas tardes estimados programadores, Acudo nuevamente a su conocimiento, de antemano, agradecer siempre a la persona que se tome el tiempo de ayudarme. Como lo indico, lo que requiero es lo siguiente Tengo un TextBox15 en el cual una vez se le hace clic arroja un numero decimal en formato "0.##0" en el mismo textbox, este numero decimal sale despues de restar 2 fechas del mismo formulario. Ahora bien, la ayudita que quiero es que dependiendo del rango decimal le ponga un color u otro, de la siguiente manera si es >= 0.333 ponga el color del forecolor del textbox15 rojo si es > 0.166 y <0.333 ponga el forecolor en amarillo si …

hola buenos dias maestros mi idea es la siguiente tengo en una columna un listado de numeros de cuatro cifras en mi ejemplo columna N y necesito resaltar aquellos numeros de las tres ultimas cifras en el rango e1:k40

hola buenas tardes como puedo marcar aquellas celdas que coincidan tanto en el primero como en el segundo cuadro de numeros y lo marque de olor rojo como se muestra en el ejemplo MarcaSimilitudes (3).xlsm

He revisado los temas con el buscador y aunque he encontrado algunos que pudieran valerme no he sido capaz de adaptarlos a mi necesidad obteniendo por ello toda clases de errores. Mi petición es la siguiente: Llevo el control de uso de una serie de edificios y salas donde se realizan diferentes presentaciones y actos y necesito destacar el final o inicio de cada Orden coloreando la fila correspondiente con un color suave (gris, violeta, ..). Agradeceré las ayudas que me podáis prestar.Control de actividades.xlsx Un saludo