Buen día gente, lo que quisiera hacer es que en una celda especifica que tengo, la cual una formula devuelve un numero de 5 cifras, quisiera que las dos primeras cifras sean un poco más pequeñas que las otras tres restantes, subo un captura de pantalla porque excel no me deja hacerlo ni manualmente, al salir de la celda se pierde el cambio. Quizás sea imposible pero con preguntar no se pierde nada (excepto tiempo de ustedes para responderme, jaja el cual agradezco y estimo) Saludos Jose

Buenas noches, Adjunto mi archivo a fin de encontrar una solucion. Cada check ejecuta un userform en la cual con los botones podemos cambiar de color de verde a rojo en el ejemplo solo estoy considerando 5 check. LO que busco es insertar un solo userform para todas las check y que estas se ejecute de manera individual para no seguir insertando tantas userform como numeros pudan haber. Agradezco su ayuda Esperando una respuesta. Saludos...... Un solo userform para todos.xlsm

Saludos a todos los foreros de esta comunidad, por sus conocimientos y ayuda que nos proporcionan a los iniciados al tema de las macros, haber si podeis aclararme que estoy haciendo mal. Si en el textbox9 introduzco la cantidad de 2566,45 en textbox13 debería dar la cantidad de 231,00 y no es así, me devuelve la cantidad de 0,23 (adjunto macro) Gracias por adelantado Private Sub TextBox9_Change() With Me.TextBox9 .Value = TextBox9.Value .Value = Format(.Value, "#,##0.00") End With TextBox13 = Format(Val(TextBox9.Value) * (0.090009), "#,##0.00") End Sub

Buenos dias expertos, dias atras me ayudaron con un formulario que filtra muy bien, ahora necesito pedir una ayuda para que cuando al filtrar y realiza los calculos me haga una condición los que tienen iva muestre con esa y los no los tiene igual sin iva lo que pasa es que la operacion de los calculos saca los totales e iva, en la data hay registros que tiene iva y los que no lo tiene, quiero que al momento de filtrar me salga como esta los que tienen que muestre con iva y los que no lo tienen igual sin iva, pero este ejemplo me saca el iva para todos cosa eso no debe ser asi. por favor espero haber me explicado bien los adjunto el archvio. Cotizaciones.xlsm

Buenos dias, necesito por favor si alguien me puede dar una solucion para el siguiente problema, he creado un macro para insertar unos materiales de un listado en una hoja, los materiales estan en otra aparte y los ingreso mediante un useform que tiene un textbox, un listbox y una command button, cuando escribo algo en el textbox el me filtra el listado de materiales y me da las opciones en el listbox, y al seleccionar el que necesito del listbox solo le doy doble click o clickeo el command button y el material se inserta en la celda que este activa en ese momento, en cualquiera. el codigo es este: -------------------------------- Private Sub CommandButton7_Click() …

Buenas noches, me podéis ayudar con esta macro? es para generar codigo de barras, la cuestion que solo me funciona de la siguiente manera: Code128 20, 20, 20, 1.1, ThisWorkbook.ActiveSheet, "11Q94PTT" Pero me gustaría que se cambiara con un rango de una celda. ¿ seria posible algo asi? pero me da error Code128 20, 20, 20, 1.1, ThisWorkbook.ActiveSheet.Range("=F1C1") y mil gracias code128.rar

Hola Espero No Violar El reglamento pero ya habia cerrado el tema anterior ya que la duda rerferente a el ha sido resuelta antes que nada Hola Macro Antonio Saludos de Nuevo y molestando de nuevamente fijate que como te comente el codigo que hiciste quedo super excelente te doy las gracias nuevamente pero fijate que tengo el problema que al anexar mas columnas tanto en la base de datos como en codigo para el listbox me marca el siguiente error " error 380 en tiempo de ejecucion" estube inventigando un poco y parece ser que la propiedad de listbox en este caso no admite en la propiedad mas de 10 columnas quisiera tu opinion y tu punto de vista al respecto y alguna sujere…

Hola, buenas tardes: Les cuento mi problemilla, ojalá puedan ayudarme: Pues bien, estoy haciendo una macro que me evalue tiempos, en base a una columna de celdas, les platico, tengo tres casos de tiempos: 1.- dato_time >5:00:00 y dato_time <=9:30:00 ->conteo (checada= checada+1) 2.- dato_time <=5:00:00 -> Sumarlo el tiempo tal cual (acumulado=acumulado+tiempo_celda) 3.- dato_time >12:00:00 y dato_time<1:00:00 ->sumar únicamente minutos y segundos, no tomar en cuenta el la hora (el 12) Lo empezé a codificar de ésta forma: cad = Sheets(strnombrehoja$).Cells(fila, 15) cad = Format(TimeValue(cad), "HH:MM:SS") If cad > "0…

Buenos dias a todos. Nuevamente recurro a ustedes para pedir ayuda. Les explico, tengo un archivo con varias hojas las cuales son mis Ordenes de Compra otra hoja que se llama "Explosion de Materiales". Lo que quiero es que de las hojas que son mis "ordenes de compra" tomar el valor de la celda "J10" y pegarlo en la hoja explosion de materiales en la columna "G" siempre y cuando el nombre que esta en "A12" de la hoja que seleccione (Cualquier Orden de Compra) coincida con los nombres que estan en la hoja "Explosion de materiales" Anexo archivo y ahi tengo el ejemplo de como deseo y quede. Gracias y desde ya agradezco por su ayuda. Libro2.xls

Buenas. Necesito de su ayuda, en la oficina manejamos muchos archivos de excel q pasamos al sistema de la empresa codigo por codigo. Hay manera de crear una macro en excel que salte entre excel y el sistema incluyendo la informacion por nostros? Explico: Codigo Descripcion Cantidad 10000 pañal 1 10001 toalla 1 ahora bien, necesito q al activar la macro excel vaya a mi sistema y ponga esos datos, cuanto termina una linea, sigue con la otra, Es posible?

Buenos dias, necesito ayuda tengo una lista de nombres hypervinculados y he creado una macro para q me copie esos nombres de una hoja a otra del mismo libro pero el problema es q me copia solo los nombres sin el hypervinculo como lo puedo solucionar para que me haga una copia exacta? Muchas gracias Un saludo Este es el código q tengo: Public Const columna_inicio = 4 Public Const fila_inicio = 21 Sub prueba() Application.ScreenUpdating = False Sheets("Inicio").Select Servicios = Cells(fila_inicio, columna_inicio) Sheets("Hoja1").Select i = 2 j = 13 Do While Cells(i, 2) <> "" If Cells(i, 2) = Servicios Then servicio = Cells(i, 1) Sheets("Inicio").Sel…

Hola gente del foro, de nuevo yo lo que pasa es que en la macro que ando haciendo quiero implementar un combobox (el codigo que tengo no me quiere dar y no me muestra los datos que están en la hoja que le indico los debe tomar). fuera de esto no sabría como hacer que en un listbox me muestre unos datos dependiendo del nombre en el combobox y que estos los pueda agregar a una columna en una hoja. les adjunto un ejemplo a ver que tal. De ante mano muchas gracias por la ayuda . :nevreness: PRUEBA MACRO - copia - copia.rar

Hola!!, Aquí voy con mi duda que por más vueltas que le doy no doy con ello. En esta macro estoy intentando escribir en la fil a 29 que filtros se han "SELECCIONADO" en el /los SEGMENTOS de la Tabla dinámica. Si filtro por [Tamaño de Empresa] = "Pequeña", implica que sólo me muestra un [Concepto], "Concepto AAA". Hasta ahí bien. En este caso los filtros que me muestra como "SELECCIONADOS" son: Para el segmento [Tamaño de empresa]: "Pequeña" Para el segmento [Concepto]: Todos los items de este segmento, cuando en realidad no se ha seleccionado ningún item en este segmento , además me muestra los 2 items cuando tendría que selecc…

Hola a todos, si alguien me pudiera ayudar a modificar una macro que encontré por ahí, la cual consolida varias columnas en una sola, para ello primero se tiene que seleccionar el rango a consolidar y luego ejecutamos la macro y la consolidación se realiza justo en la columna siguiente del rango seleccionado y lo que deseo es que la consolidación se realice pero no en la columna siguiente si no en la tercera columna siguiente del rango seleccionado. Muchas gracias Sub rango_columnas() 'macro une varias columnas en una sola columna 'para ello primero seleccionamos el rango a unir 'y luego ejecutamos la macro Dim rango As Variant Dim i As Long…

Buenos días a todos; En este foro he encontrado la macro que adjunto creo recordar que el autor es Antoni. Se trata de un Userform que contiene un "SCROLLBAR" y según se desplace o pulse sobre dicho scrollbar va aumentado el tamaño del frm. Mi pregunta es la siguiente, ¿se puede poner un tope para que no aumente mas su tamaño una vez alcanzado dicho tope? Saludos y buen día a todos. Redimensionar formulario.xls

Estimados Tengo excel llamado Base que al ejecutar me aparece mi formulario, dentro de ese formulario tengo un botón para abrir un archivo excel(ejemplo), al hacerlo me muestra en la pantalla el archivo abierto, lo que quiero es que se siga apareciendo mi formulario y no estar minimizando el excel que se abrió para seguir en mi form.

Estimados, utilizo en siguiente código VB para cambiar dinamicamente una imagen asociada a un shape cuando una celda cambia de valor. "Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address(0, 0) = "B1" Then _ Me.Shapes("logo").Fill.UserPicture "C:\logos\" & Target & ".jpg" End Sub" el tema es que ademas utilizo un plug-in que refresca los datos desde un webservice, sin embargo al actualizar los datos el modulo no me cambia la imagen, a menos que se edite el campo en el cual se encuentra el "target" y luego enter, como información adicional, el target y el shape que hace referencia a la imagen se encuentran en una hoja que hace refe…

Hola a todos. Trato de explicaros lo que necesito. En la hoja tengo una celda donde voy a introducir una cadena de texto. Lo que necesito es una macro que compruebe si el texto de esa celda está en el nombre del documento. Imaginaros: Tengo en la celda 123456. Si el documento se llama 'Documento 123456 Provisional.xlsx', me tendría que salir un mensaje de 'OK'. Si en el nombre no estuviera esa cadena '123456' me tendría que salir un mensaje de 'Renombre el fichero con la el nº de documento'. No sé si para hacer esto sería con el Cells.Find... no sé, ando un poco perdido. El fichero adjunto es un poco simple, pero no se me ocurría que poner para hacerlo algo más compl…

Buenos dias desde Zaragoza, Estoy intentando guardar una hoja en una carpeta que se grabe con el texto que contiene una celda, he estado haciendo pruebas con temas solucionados de aqui y de otros foros y no he llegado a buen puerto con ninguno. Os dejo unos detalles de como lo estoy intentando hacer y el archivo. Desde grabar pedidos se generan dos tipos de albaranes"telefonicos" y "just eat" que pasan a "FACTURA PLANTILLA" para pedidos telefonicos y "FACTURA PLANTILLA (2)" para just eat. A) Intento una macho para que la hoja "FACTURA PLANTILLA" se dispare desde grabar pedidos y vaya a C:\Users\come\Desktop\pedidos\TELEFONICOS y se grabe con la celda F1 de factura "FAC…

Necesito de su ayuda ya que tengo un archivo en donde tengo datos los cuales necesito copiar y pegar en otra columna, los datos en cuestión son generados de una aplicación que los scanean y los ponen en una misma columna por ejemplo en la celda A2 me deja el código y en la siguiente A3 la cantidad y así sucesivamente y lo que necesito es que me copie las celdas impares y me las pegue en la columna b, pero en las celda pares por ejemplo si la cantidad esta en la celda A3 me la copie y la deje en la celda B2 Espero haberme explicado lo más claro posible gracias de ante mano prueba.xlsx

buenas noches nesecito un poco de ayuda con una macro lo explico la macro busca la ultima fila con datos y luego deberia copiar desde esa selda seleccionada hacia la derecha(rango variable) luego pegar en una columna de otra hoja buscando la ultima fila vacia con trasponer espero haberme explicado lo mejor posible a continuacion solo he llegado hasta esta, pero no encuentro el resto Dim ultimaFila As Integer ultimaFila = Cells(Rows.Count, 3).End(xlUp).Select

Se tiene una tabla en la cual existen datos duplicados en los cuales solo el campo "Tma" varia y todos los demas datos son iguales, por lo cual necesito elimar todos lo datos duplicados y solo dejas uno en el cual pueda unificar los datos de los demas archivos en una mismo en donde en el "Tma", se vean reflejados las variabñles de los demas que se elimnaron!!... Ejemplo: [TABLE=class: outer_border, width: 50] [TR] [TD]NOM [/TD] [TD][TABLE=width: 50] [TR] [TD]CAR [/TD] [TD][/TD] [/TR] [/TABLE] [/TD] [TD][TABLE=width: 50] [TR] [TD][/TD] [TD]EQUIPO [/TD] [TD][/TD] [/TR] [/TABLE] [/TD] [TD][TABLE=width: 50] [TR] [TD][/TD] [TD]NUME [/TD] [/TR] [TR] …

Buen dia para todos o les traigo un problemilla que tengo con un programa en excel que me imprime facturas pero cuando estoy en el programa y le doy nueva factura no me genera un numero consecutivo y en verdad lo necesito ya que cada factura necesita su consecutivo pero no doy como crear una macro que me genere un numero consecutivo ya que es dentro del mismo formulario no doy estoy desesperado :hororr: el documento no es mio los descargue por la red y no SOY UN EXPERTO EN MACROS PERO SI CONOZCO TODAS LA APLICACIONES QUE TIENE por eso me cuesta mucho entender la programación; son cuatro hojas productos, clientes, factura y impresión en la hoja impresión me vota los datos…

Hola buenos días tengo el siguiente problema tengo dos archivos uno con información y el otro vació lo que intento hacer es copiar de un archivo al otro pero mi complicación es que el encabezado o el orden varían el uno del otro pongo el siguiente ejemplo en el archivo 1 tengo la siguiente estructura. Archivo 1 Código usuario Nombre Apellido Ocupación Ciudad Teléfono 01 Carlos ramírez medico Moscú 012234566 02 Andrea Jimenez ingeniero …

Amigos, buenos dias la verdad me dejaron este programa para realizar en excel y no tengo mucha nocion. tengo mas o menos un prototipo en java. si me pudieran dar algunas link o algunos metodo de programacion para poder realizar este trabajo, se los agradeceria.