si me pueden ayudar por favor tengo el siguiente problema al aplicar esta formula: SI(Y(AK1>AJ1;AK1=SALIDA!I1);SALIDA!$G$5;FALSO) SI(AK2<>FALSO;SALIDA!$B$5;FALSO) SI(AK3<>FALSO;SALIDA!$B$3;FALSO) SI(NOMXXI<>FALSO;SI.ERROR(BUSCARV(COLXXI;SALIDA!$A$8:$I$27;9;0);"");"") si me busca lo que kiero y todo pero nomxxi depende de otras celdas y todo se hecha a perder cuando en mi hoja cambio el valor de SALIDA!I1 todo se me vuelve y los valores que había buscado con buscarv se me borran y se pasan a la siguiente columna que tiene las mismas formulas hay alguna forma de que los busque ahi me lo deje aunque lo demaqs se vuelva falso Dirección de correo: …

Buenos dias. Les cuento. Estoy intentando desarrollar un macro, soy nuevo en esto, y es para mi trabajo. Lo que necesito hacer es lo siguiente: .Copiar el sombreado de todas las celdas Doc A desde J2 hasta J850 al Doc B desde la J2 a la J850, mediante un buscarv donde los codigos unicos del Doc A y Doc B se encuentran desde A2 a A850 de ambos documentos. .Esto necesito aplicarlo solo a aquellas celdas que tengan color distinto al Gris. Se me ocurre un For, con un If adentro, y luego algo asi pero nose como hacer que varie. Dim micolor micolor = Range("'[Pendientes de ingreso.xls]Sheet1'!J2").Interior.color Range("J2").Interior.color = micolor Range("K2").Interior…

Hola, tengo un problema con un bucle. El caso es que en el Mac me funciona pero en windows no. El código es este: Private Sub Worksheet_Calculate() Dim KeyCells As Range If Range("C13") = 1 Then Range("D7").Value = Range("D7").Value - 1 End If Do While Range("C13") = 1 Range("D7").Value = Range("D7").Value - 1 Loop If Range("C13") = 0 Then Range("D7").Value = Range("D7").Value + 1 End If Do While Range("C13") = 0 Range("D7").Value = Range("D7").Value + 1 Loop Range("D7").Value = Range("D7").Value - 1 End Sub El caso es que quiero que cuando una celda (la C13) sea 1, me reste 1 de la celda D7, y así hasta qu…

Hola Chicos, tengo este archivo el cual depure en su máxima expresión para poder subirlo..... El tema es que desde un USERFORM realize el macros que ocupo en la plantilla Excel, es decir, si ingreso los datos en la USERFORM y preciono el boton me realize la accion del boton que tengo en la planilla Excel..... Adjunto el archivo....... Esta depurado por eso salen errores, el tema es que busque los datos en base a lo ingresado en el USERFORM.. Esperando de su compresión. PD: Corresponde a un Macros gravado. Saluda, DNP_CONSULTA.xls

FELICES FIESTAS, y que los Reyes Magos os sean benignos. Os deseo los mejores parabienes a partir de este año 2015 A lo nuestro. Hacia el año 2009 conseguí en este foro un calendario, que para mí es excelente en mi desarrollo cotidiano, siendo deciros que no sé quien fue el autor. Pero si lo lee gracias. Desearía ya que mis conocimientos son muy escasos, si podeis ayudarme . En el calendario se vienen coloreando los días disfrutados de vacaciones Me gustaría llegar a poder colorear los días de ausencia, permisos y enfermedad Agradeceros vuestra cooperación y un saludo CalendVac.v2.xls

En un trabajo anterior que me ayudo [uSER=188524]@Marco Antonio[/uSER], Control horas de vuelo pilotos, el cual es un gran trabajo, habia un control de horas de 45 en 15 dias y de 75 en un mes, he llenado estas hojas y no me sale mensaje o alerta o condicional de esta parte aunque en el codigo esta la parte de control 45 horas en 15 dias, este no ha operado, que hace falta?, adjunto el archivo final que subio Marco Antonio. Mil gracias de antemano HORAS_HELICOPTERO_MA_II.rar

Hola a todos. Llevo tiempo atascado con una macro y no se cual es el problema para poder solucionarlo. Estoy intentando descargar datos de una web, ejecuto la macro y me da los datos de la web bien pero si vuelvo a ejecutar la macro, no me da datos o me da otra tabla de la web. Este proceso es aleatorio, puede darme los datos mal y despues bien, parcialmente los datos bien y mal, o los datos mal. Creo un array con unas URL para despues con un bucle for ir recorriendo todos los enlaces que tengo en el array. Lo que no entiendo porque unas veces realiza la consulta bien y otras no. Como no me deja subir un archivo en este mensaj…

Buenas tardes bueno la idea es la siguiente tengo que dar soporte a usuarios de una empresa pero cada usuario tiene que solicitar sobre el formato que adjunte y yo darle un resultado a cada solicitud , lo que necesito es que cualquier usuario o varios usuarios puedan ver el libro de excel y colocar el requerimiento , y por otro lado yo como la persona que da el soporte pudiera ver una alerta o algo asi que tengo cosas que hacer y estan pendientes , no se si fui claro o no la idea es algo a si como un ticket que me alerte a mi que alguien necesita algo. de antemano muchas graciasd si me pueden ayudar o darme una idea de como lo puedo hacer. prueba tecnologia1.xls

Buenas Tardes Tengo un problema con una macro que cree para ejecutar una consulta desde excel y que traiga los resultados en una celda en particular. Hace meses la vengo usando y funcionaba perfecto, pero desde la semana pasada me tira este error: RUN TIMER ERROR 1004 Application defined or objet defined error y se tilda la siguiente sentencia .Refresh BackgroundQuery:=False Llevo toda una semana investigando que puede ser y no encuentro nada. Agradezco su ayuda *******!!!! Dim varSQL ' OBTIENE EL NUMERO SIGUIENTE DE BASE varSQL = Sheets("ArmadoQuery").Range("c23") Sheets("Resultado").Select Range("F15").Select Selection.ClearContents…

Saludos a todos, Realice una macro que realiza la simulación Montecarlo, pero debido a mi poca experiencia en programación VBA, el uso excesivo de los ciclos hace que mi programa sea muy lento al realizar varias iteraciones (alrededor de 5000 iteraciones), por lo que necesito ayuda para optimizar el código. Se que se puede usa la sentencia "With Sheets....." pero no entiendo muy bien como se usa. Alguien podria ayudar a optimizar el código? Les presento algunos casos: 1. Primero se carga un archivo con los datos y precios de los títulos que se evaluaran en la simulación Montecarlo, una vez cargados, debo tomar los títulos y colocarlos en otra pestaña, pero estos título…

Buenas tardes: soy maestro de colegio y he creado un libro de excel que funciona como un registro de control docente en el que se ingresa calificaciones y comportamiento y a demás genera reportes para impresión. Necesito una macro para crear nuevos libros, según las materias grupos a cargo. Una interfaz (menú) que administre todos los libros creados y algunas de las hojas de cada uno de ellos. La ayuda de ustedes sería de mucha utilidad. Gracias de antemano.:encouragement:

Buenas noches, Realice un calendario en excel 2007 pero al abrirlo en excel 2010 no me lo muestra en el userform, como debo configurar el visual para que me lo acepte en la versión de 2010. Esto es debido que debo enviarlo a los clientes y sin conocer cual excel utilizan es necesario dejar una versión que todos puedan abrir. Entendiendo que mis clientes no manejan mucho excel. muchas gracias. calendar1,click(2007) vs MonthView1_DateClick(2010)

Tengo que conseguir unificar el almacén en una sola hoja. Mirar en la hoja de excel que os adjunto necesito: - concatenar la descripción de la columna C, junto con la descripción de la columna L, basándome en que el código de la columna A, sea el mismo que el de la columna I, o el código de la columna B, igual que el de la J. - Y la columna G, sustituir el contenido por el de la columna K, en función a los mismos códigos de antes ( columna A, igual que el de la columna I ). He tenido que eliminar datos e inventarme el contenido....., pero es que esto lo tengo que ejecutar en un archivo que tengo mas de 8.000 líneas de excel, es decir , 8.000 artículos diferentes Mi…

Hola expertos, Me gustaría hacer una macro que al seleccionar varios rangos (de manera diferente cada vez) se copiaran/pegaran valores en la misma celda. Las celdas seleccionadas contienen formulas, pero me gustaría convertirlas a valores. Lo querria hacer todo de una vez. Por ejemplo El usuario seleccionaría el Rango A2, B2:C3, D4:D7,... y al pulsar un boton que estos rangos/celdas se copiaran y pegaran a si mismas con valores. Es posible? Muchas gracias!

Hola amigos expertos les molesto a los tiempos no se si me pueden dar una manito; lo que pasa es que tengo datos de resultado de unos análisis en mi hoja tengo ordenado A:Fecha, B: Muestra y C:resulados, el problema es que al siguiente día se repiten las mismas muestras en la semana igual y al mes; a veces tengo valores y a veces no me pueden dar una idea como graficar ya sea por día por semana o por mes pero quiero añadir una macro en un botón que al escribir una fecha o rango de fechas en dos textbox me grafique automáticamente ese rango con los respectivos valores y no tener que estar haciendo manualmente y este gráfico debería crearse en una hoja nueva para imprimir. …

Estimados dado que no puedo adjuntar la data real por temas de tamaño, adjunte esta foto. Lo único que quiero que haga la macro es que sume por colores de celda por ejemplo: Las celdas amarillas - sumen las celdas blancas " ". Las celdas azules - sumen las celdas amarillas " ". Las celdas celestes - sumen las celdas azules " " Las celdas verdes - sumen las celdas celestes " " Las celdas naranja - sumen las celdas verdes " " Las celdas rojas - sumen las celdas naranja " " La celda morada - sumen las celdas rojas " " Esto lo hago dado que a veces agregan filas blancas de nuevos productos, y mis formulas o celdas vinculadas se mueven, y es un lio tremendo. Alguna id…

Buenos días a todos. Desde un formulario1 y a través de un ComboBox voy a otro Formulario2 o Formulario3 El problema surje cuando vuelvo al Formulario1, y es que no me acepta de nuevo el valor marcado por primera vez, ej. Formulario2 Adjunto el fichero para que veais más claro el problema. Gracias anticipadamente Ensacamo Código Formulario 1 Private Sub ComboBox1_Enter() Dim UltimaFila As Integer On Error Resume Next ComboBox1.Clear Sheets("Hoja1").Select Sheets("Hoja1").Activate UltimaFila = Range("A1").End(xlDown).Row For a = 1 To UltimaFila Dato = Cells(a, 1) ComboBox1.AddItem Dato Next End Sub Private Sub ComboBox1_Change() On Error Resume Next If Co…

Hola amigos necesito ayuda con un archivo me super urge. Tengo un archivo con una base de datos y en el cual se van llenando y ordenando por fechas, al momento que se termina de llenar los datos de la fila que sigue despues de la ultima que se dio de alta. Se da clic en el boton que tiene una macro que se posiciona en la celda C1 y de ahi baja hasta el ultimo registro y selecciona toda la fila completa y de ahi la copia en un correo nuevo de Outlook y lo manda al destinatario del correo que ponemos en el codigo de la macro, es aqui donde necesito ayuda, ya que quiero que en ese mismo codigo en lugar de seleccionarme solo el ultimo registro que primero me seleccione la pr…

Buenas... Tengo una tabla en excel que estoy ingresandole datos por medio de un formulario.. solo se le digita CODIGO y CANT CODIGO NOMBRE CANT STOCK DIFERENCIA Los campos NOMBRE, STOCK son traidos por medios de un buscarv de otra hoja del mismo libro.. y la diferencia es la resta entre STOCK y CANT. cual es el inconveniente..que si digitan por eJ; CODIGO NOMBRE CANT STOCK DIFERENCIA 123 Producto1 20 30 10 456 Producto2 10 11 1 123 Producto1 5 30 25 el producto 123 ya habia sido digitado y deberia sumarselo al primero que fue ingresado osea deberia q…

Buenas tardes a todos y muchas gracias por tomarse la molestia de leer mi problema. Encontré una macro aquí en este gran foro y la modifique, pero el problema que tengo es que al exportar al txt, las columnas me las separa por tabulador y necesito que solo me las separe con un espacio, que se tendría que modificar? Sub net_user() Dim archNum As Integer Dim Datos As Variant Dim i As Long Datos = Range("aa1", Range("ah" & Rows.Count).End(xlUp)).Value2 archNum = VBA.FreeFile Open ThisWorkbook.Path & Application.PathSeparator & "2A.txt" For Output As #archNum For i = LBound(Datos) To UBound(Datos) Print #archNum, Datos(…

Buenas noches, Alguien sabria crear una macro segun la NORMA 34 para subir fichero de remesas a los bancos? Por mas que he mirado no he encontrado nada de nada.

Neesito vincular el Valor de na Celda, al desplazamiento que de un Deslizador, insertado de Microsoft Slider Contro, versión 6.0 Solicito que me colaboren Gracias EMIRO ERAZO Deslizador de Excel.rar

Hola a todos, Tengo varios grupos de 3 palabras que necesito agregar en tres celdas de una fila, una seguida de la otra. Son al menos 10 grupos de 3 palabras. Lo que necesito es una ventana adicional con 10 botones, uno por cada grupo de palabras, al dar click sobre el botón, deben aparecer las tres palabras en el documento, teniendo en cuenta la celda activa, de tal forma que si la celda activa es la G5, la primer palabra del grupo se escribe en esa columna, la segunda palabra en la celda H5 y la tercer palaba en la celda I5. La idea es que me pueda desplazar verticalmente con las teclas de dirección por la columna G y asignar los valores correspondientes a cada fila …

Hola muy buenas tardes amigos, soy nuevo en esto de los foros, me gustaría realizar un filtro de varias celdas pintadas de un solo color, el filtro quisiera realizarlo con una macro pero no me queda.

Buenas Tardes!! Una vez mas solicitando de su amable ayuda Tengo Un Libro conformado así: Hoja Layout de un casino donde me muestra la distribución de los juegos, Hoja Thermo Indicador donde corresponde la Licencia de cada juego Hoja Base x maquina que contiene la base de datos correpondiente a las licencias Por medio de VB deseo que cada vez que se seleccione un juego, un Msgbox me arroje los datos de la licencia Adjunto Ejemplo De antemano muchas gracias MsgBBuscador.rar