hace poco me ayudaron con una busqueda nada mas que ahora necesito que si por ejemplo tengo en dos celdas juan perez garcia y pedro martinez perez al yo teclear en el textbox perez me arroje los dos nombres ya que hambos contienen lo que en el textbox se escribio y de paso creo que es igual pero que me busque en textos mas extensos palabras claves aunque no las escriba por completo ejemple si yo tengo en A1 este texto "el mejor amigo del hombre es el perro y el mejor amigo de la mujer es el gato", en otra A2 tengo "mi mejor amigo es juan" y en A3 "el tigre es el primo del leon que a su vez es primo del perro" si yo en un textbox escribo perro me debe de mostrar todo el c…

Buenos dias, En principio muchas gracias a todas las personas que participan en este foro preguntando y respondiendo gracias a muchos de los mensajes publicados en la web e logrado avanzar un poco con la organizacion de mi empresa. Mi Pequeña empresa se encarga de la elaboracion y comercializacion de productos de limpieza. En el proyecto de excel que estoy elaborando, en la hoja7 quiero poner el producto que elaboro y al costado la cantidad en galones que deseo ingresar(Preparar o Producir) y apriete un boton que diga ingresar entonces automaticamente este busque el producto en la hoja 6 donde pondre mis formulas y descuente la materia prima y los envases de la hoja4 …

Hola como estaN, Camila desde argentina y estoy terminando, Pero me quede trabada y no puedo sacarla a flote El codigo es el siguiente Set RsBusq = .Columns("A2:Z2").Find(what:="cocacola", lookat:=xlWhole, LookIn:=xlValues) If Not RsBusq Is Nothing Then ROFO = RsBusq.Offset(0, 1).Value Necesito que encuentyre todas las palabras"cocacola...." y me copie sus respectivas columnas hacia la derecha, pero no me esta saliendo... Agradezco su ayuda!

tengo unas macros creadas depende de la info que tengo corro una u otra. pero quiero que si por error preciono la que no necesitaba, la macro no corra gracias por la ayuda Tavo09 ejemplo1.zip

macro que pase unos datos especificos de una celda a otra hoja buenas nose si podran ayudarme pero lo explico estoy haciendo un macro que me pase unos datos especificos a otras hoja el problema es que los datos estan por filas no por celdas , le pongo un ejemplo: [TABLE=width: 792] [TR] [TD=width: 1056] SERVICIO DE INDICES[/TD] [/TR] [TR] [TD]Nombre Solicitado : pepito gri fernandez El problema es que el contenido esta por fila(celda) y nose como …

Hola: Me han pasado un libro de excel, Consolidado Mensual, que me carga una macro, esta me copia el rango de los libros existentes en una carpeta determinada. Ahora este rango ha variado y me piden que se amplíe hasta la columna L, pero no sé como hacerlo. Os adjunto los ficheros, espero que me podáis echar una mano. Muchas Gracias Nefe.rar

Hola a todos: Veran, necesito desarrollar una sub-rutina que simplifique una fracción, dado su numerador y denominador, pero no se como hacerlo. Desde ya muchas gracias a cualquier ayuda.

Hola a todos, mi pregunta es la siguiente. Como puedo detener una macro si dos celda (E49 y Z6) de una hoja de excel están vacías y que mande un mensaje de que las celdas están vacias. Encontré en el foro un caso de si la suma de dos celdas no es igual a otra se para, pero no sé como aplicar si lo que quiero es que dos celdas no estén vacías. Este es el caso que encontré. If Range("J12").Value <> Application.WorksheetFunction.Sum(Range("O29:O500")) Then MsgBox "No coinciden", 64, "" Exit Sub End If Muchas gracias por su ayuda

necesito macro para acabar documento Buenos días, he creado como veis una hoja en la que he ido desarrollando poco a poco y me haría falta vuestra ayuda para poder acabarla, en la última hoja la "hoja 9", necesitaría que a través de una macro o algo por el estilo, me hiciera el resumen de las hojas: lunes martes miércoles jueves viernes sábado y que la "hoja 9" quedase tal como la he reflejado grácias control obra.rar

tengo la siguiente linea de codigo la cual me sirve para buscar una celda especifica para realizar una actualizacion de la linea y lo hace perfecto con el combobox. el problema es el siguiente que quiero hacerlo atraves de un textbox. y no se como hacerlo si alguien me puede ayudar seria fantastico el textbox se llama TB_LLENADO Private Sub Modificar_Click() Sheets("BD").Activate Cells(ComboAlumno.ListIndex + 2, 1).Select ActiveCell.Offset(0, 0) = TB_NOM ActiveCell.Offset(0, 1) = TB_RUT Range("A2").Copy End Sub

Hola amigos! Necesito vuestra ayuda, he estado creando un pequeño programita para rellenar un formulario y que aparezca en un listbox y en la hoja de excel. El código lo he estado haciendo por mis pequeños conociemientos y buscando por internet. A ver si alguno con mas experiencia me puede ayudar. Tengo muchos problemas, pero os contaré poquito a poco: El primero, cuando relleno el formulario y doy a ingresar y pongo el nombre de una hoja que no existe, me crea la hoja con la cabecera pero sin los datos. Me podéis ayudar? Ando muy perdido. Muchisimas Gracias, para cualquier aclaración ya sabéis. Un saludo viiic Vic1804.xls

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…

tengo unas macros creadas depende de la info que tengo corro una u otra. pero quiero que si por error preciono la que no necesitaba, la macro no corra gracias por la ayuda Tavo09

Buenas noches, espero puedan ayudarme: El problema es el siguiente, tengo una columna desde A5:A30, cada celda tiene una fórmula asociada a una lista (meses del año) que cada vez que elijo una opción de la lista (por ejemplo elijo FEBRERO), se actualiza la información de las celdas mediante la fórmula, ahora cada vez que haga una actualización, por ejemplo si escojo de la lista "FEBRERO", estos valores queden copiados en otra columna (por ejemplo se copie información del rango A5:A30 (este rango puede aumentar por ejemplo A5:A35) a la C5:C30 pero en forma de valores, si elijo marzo, se copie información de la A5:A30 a la celda D5:D30etc.

Bien pues les explico resumidamente el trabajo que estoy realizando. Me entregan una base de datos de registros de polizas contables en varias hojas que estan definidas por Cuenta Bancaria, mi trabajo es concentrarlas para despues separarlas tomando ahora como referencia la cuenta contable a la que se aplican y asignarles una hoja por cada cuenta con sus respectivos registros. Esto ya lo tengo, donde estoy atorado es que al repartir la información en algunas hojas me puede dar simplemente un registro y en otras más de 500, por lo cual no se que codigo utilizar para que se apliquen las sumatorias a los rangos de valor numerico. Mis rangos de valor numérico empiezan a par…

Hola quisiera saber como hago para mandar emails con archivo adjunto a una lista de email que tengo en una hoja de Excel. Muchas gracias.

Hola, Buenas tardes: He insertado una FDU (FillRate), luego mediante esta FDU, quiero que cumpla la condición de que el resultado sea mayor a 0.85, hasta aqui, todo correcto. Ahora mi duda es, como puedo saber para que valor de la variable S, se cumple la condicion. Muchas Gracias. Function stock(tipovar As Byte, param1 As Double, param2 As Double, r As Double, r1 As Double, p As Double) As Double Dim result As Double Dim Suma As Double s = 1 FRob = 0.85 stock = FillRate(s, tipovar, param1, param2, r, r1, p) While stock < FRob s = s + 1 stock = FillRate(s, tipovar, param1, param2, r, r1, p) Wend End Function Un saludo.

Muy buenas, agradezco de antemano la ayuda que me brindarán. mi consulta es la siguiente, Tengo un macro que me hace correr un cronómetro o temporalizador mejor dicho, este necesito que funcione con una userform la cual tiene otros botones de mi interes; los problemas que presento son 3, y los describo a continuación: 1.- al colocar el tiempo en la userform y esta colocarlo en la celda donde esta instalado el cronómetro este no corre, me imagino por que va como texto, pero al revisar la celda esta si tiene el formato establecido. 2.- y más importante, necesito que el temporalizador haga pausas, dado que necesito detener los tiempos de forma seguida y reanudarlos. 3.…

Hola a todos en primer lugar dar las gracias a todos de antemano, y en segundo pues voy a exponer mi problema. Tengo una lista de 2.000 celdas con números diferentes. Bien, pues en esas celdas he añadido un formato condicional, de tal forma que si x=10 por ejemplo, la celda quede de color verde. Vale, una vez hecho esto, necesito saber cuántos verdes hay, porque sino de nada me sirve lo anterior. Estoy de acuerdo en que se podría hacer de otra forma, pero este problema no es mío, sino de una persona que me ha encargado resolvérselo y por tanto ha de ser de esta manera. Así que eso, tengo x celdas coloreadas de color verde y necesito saber qué numero es x. He probado …

Buena Tardes les escribo por la siguiente duda. Estoy construyendo una macros, para enviar datos de UserForm en excel a word, todo funciona perfectamente. excepto la validación de un texbox en el formulario, los cuales estan agrupado en unos frame. al precionar la tecla enter, en un texto en blanco lanza un mensaje de error, pero al ir al ultimo texbox de cada frame, no realiza la validación y simplemente pasa al otro texbox les adjunto mi archivo para dejarlo todo mas claro prototipo_luminaria.rar

Lo he intentado y el codigo no es muy brillante que digamos, me funciona al menos, pero lo unico es que los datos se deben ir grabando al final de la tabla dependiendo del "Quartal" que haya introducido el usuario en el ListBox del principio. Pues al ir introduciendo los datos me los va grabando donde le da la gana, no detras de la fila correcta... Ademas como no se sabe el numero de filas que tendra un Quartal pues depende del numero de facturas, habra que introducir filas a mano y creo que desbaratara el codigo... Gracias help.zip

Buenas noches: Espero puedan ayudarme con este problema, tengo una tabla dinámica que se actualiza cada vez con las notas de distintas oficinas (base viene de la hoja 3), en otra celda (I5), necesito solo sacar el promedio de estos meses conforme se van actualizando cuando de la lista desplegable J1, selecciono el mes, por ejemplo si coloco Enero, me tiene que salir la nota de enero, si en la lista selecciono Febrero, me tiene que salir el promedio de Enero y Febrero, o sino jalar la nota del total general, que es el promedio de ambos meses, y asi voy actualizando mi tabla dinamica conforme agrego información a la base, hay una f{ormula para obtener este promedio. Graci…

Ya se que se ha preguntado un monton de veces, pero no se si es por la version (Excel 2010) o que es lo que pasa, pero no se como poner el codigo para que una macro me abra un archivo de excel que estan alojados en la misma carpeta. La macro se en cuentra en el libro personal, no en la misma carpeta del archivo que quiero abrir ni del que estoy ejecutando la macro. Con esto no me sirve ya que me da error 1004 Workbooks.Open ThisWorkbook.Path & "\" & "TARIFADATA.xls"[/CODE] ¿Alguna sugerencia?. Gracias de antemano.

Hola: Quisiera saber la línea de código que permite insertar en el cuerpo del mensaje enviado la imagen pegada en una determianda celda (por ej. L1). Saludos. Envio email cc.rar

Hola, alguien me puede ayudar?? He definido una FDU, pero necesito otra, que de valores a una de las incógnitas de la FDU que he definido, hasta que el resultado de la FDU sea superior o igual a 0.85, y me devuelva el valor de la incógnita que hace cumplir que la FDU=>0.85. El valor que busco es el del parámetro S.(Ver función) Function FillRate(S, tipovar, param1, param2, r, r1, p) As Double Dim infinito As Integer Dim x As Double infinito = 150 FillRate = 0 For NSo = 1 To S x = S - NSo FillRate = FillRate + (fdL(x, tipovar, param2, r1, p) * ((FR(NSo, tipovar, param1, r, p) - FRde0(tipovar, param1, r, p)) / (1 - FRde0(tipovar, param1, …