Jump to content

Search the Community

Showing results for tags 'macros y vba'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • First visit?
  • Dudas y consultas sobre Excel
    • Excel General
    • Macros y programación VBA
    • Power BI
    • Access, Word, Power Point, Outlook etc...
    • Comparte tus aportes
  • Sobre ayudaexcel.com
    • Solicitud proyectos
    • Blog
    • Plantillas
    • Productos de ayudaexcel
    • Megaguías
  • Otras aplicaciones de Microsoft Office
  • Variedades
    • Presentaciones
    • Cafeteria Ayuda Excel
    • Temas resueltos
    • Temas Abandonados
  • ¿Eres nuevo? Lee las Normas y Reglas del Foro
  • Archive
  • Resources
    • Ideas y aportes

Categories

  • Tools
  • Add-ins
  • Store
  • Finance
  • Dpto. Admin
  • Purchasing
  • Agendas
  • Data registry

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


AIM


MSN


Website URL


ICQ


Yahoo


Skype


Facebook


Twitter


Localización:


Interests

Found 406 results

  1. Hola, buen día! Tengo la siguiente tabla el lado izquierdo es como tengo mi tabla original. De lado derecho asi es como quiero que quede el resultado. quiero que por cada llave repetida me concatene los valores, si no se repite solo me ponga el valor actual de esa llave. En esta liga del mismo foro vi este tema parecido donde se usan matrices y diccionarios: Me podrían ayudar a modificar este código para mis propósitos. Manejo miles de registros en excel, y creo el uso de diccionarios es lo mas adecuado para agilizar la concatenación de los valores; porque tengo una macro pero es a nivel celda(no uso matrices ni diccionarios) y al ejecutarla tarda muchísimas horas. Quiero ver si con el uso de diccionarios mejora el tiempo de ejecución. adjunto el archivo de excel. slds!!! Prueba_Conca.xlsx
  2. Necesito realizar una consulta desde un userform en excel a una base de datos Acces y que dicha consulta se almacene en un listbox del userform de excel, el problema es que mediante bucles y loops con additems se tarda demasiado en llenar, y necesito saber si es posible que se realice mediante un rowsource como si fuera en un listbox alojado en acces. Si pudiera conseguir esa velocidad de filtrado de información estaría mas que agradecido- Actualmente utilizo este código poco elegante que copia los datos filtrados de la base de datos acces a la hoja de calculo de de excel y desde ahí se captura el rango de datos para almacenarlo en el listbox. Si bien al realizar el doble trabaje se tarda un poco mas, sigue siendo mas rápido que utilizar loop y additems. Private Sub CommandButton1_Click() Dim Base As String Dim Sql As String Dim rscopy As String Dim Conexion As String Conexion = "PROVIDER=MICROSOFT.ACE.OLEDB.12.0;DATA SOURCE =" & "E:\Dropbox\MIS PROGRAMAS\ACCES\Buscador de Precios 64 bits 9-4-19.accdb" & ";PERSIST SECURITY INFO FALSE;" uf2 = Sheets("ACCES").Range("I" & Rows.Count).End(xlUp).Row Sheets("ACCES").Range("B11:I" & uf2).Clear 'LLAMAMOS AL OBJETO ADO Set cn = New ADODB.Connection 'ABRIMOS LA CONEXION cn.Open Conexion 'CREAMOS LA CONSULTA Set rs = New ADODB.Recordset With rs .CursorLocation = adUseClient .CursorType = adOpenStatic .LockType = adLockOptimistic End With 'Consulta = Consulta & " WHERE " & Me.cmbCampo & " Like '*" & Me.txtBusqueda.Text & "*'" 'Sql = "SELECT * FROM Personas where Descripción like " & "'%" & Range("D6") & "%'" 'Like Replace("'%" & UCase(txtBusqueda.Value) & "%'", " ", "%") And 'Sql = "SELECT * FROM Personas where Descripción like " & "'%" & txtBusqueda & "%'" Sql = "SELECT * FROM Personas where Descripción like " & Replace("'%" & UCase(txtBusqueda.Value) & "%'", " ", "%") rs.Open Sql, Conexion Range("B11").CopyFromRecordset rs uf = Sheets("ACCES").Range("I" & Rows.Count).End(xlUp).Row Me.Lista.RowSource = "ACCES!B11:I" & uf cn.Close Set rs = Nothing Set cn = Nothing End Sub Desde ya muchas gracias y saludos.
  3. Saludos estimados Foristas, tengan la gentileza de apoyarme en una consulta, tengo algunas funciones las cuales tengo que insertarles en un módulo en cada libro nuevo. Para evitar esto puedo hacer un complemento para que el excel quede personalizado y reconozca todos los libros creados. Gracias
  4. Buenas compañeros quiero pedir por favor su ayuda,les comento: tengo un combobox control activex cuando selecciono algo en el combo me aparece en una celda relacionada un numero, con una funcion si determino el texto en este caso un cliente,cuando traiga el nombre de ese cliente y cambie el valor de la celda se ejecutara una macro que me filtrara por el nombre de ese cliente,el problema es que cree un codigo: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$2" Then call filtrar End If End Sub y no funciona tengo que dar enter para que se ejecute,y no es lo que quiero ,lo que quiero es que al seleccionar un valor en el control Activex(combo) y la celda relacionada cambie de valor sin dar enter se ejecute el filtro,espero me haya hecho entender gracias a todos de antemano saludos
  5. He logrado hacer el vinculo, con el código: windows(libro1.xls).activate ( recomendado por gerson p) Pero resulta que el libro2 tiene que estar abierto para que funcione la instrucción,,, hay alguna forma que al hacer clic en el botón de comando que contiene el código: windows(libro1.xls).activate Abra o inicialice el otro libro2,, ¿es decir abrirlo desde el primer libro1? para abrir otro libro desde otro libro, Y la espabiladera cuando se ejecuta se puede quitar,,, es decir cuando se pasa de un libro a otro hace un efecto visual extraño, ¿se podría quitar?
  6. Hola a todos, necesito hacerlo no en formato condicionado si no en VBA: cambiar el color de una celda o rango, dependiendo del valor de otra celda, ejemplo: si (A10) = 5 cambie el color de celdas (A1:A6) si el valor de (A10) es distinto, que no haga nada. Podéis ayudarme ? Gracias a todos.
  7. Estimados les comento me dedico hace muchísimos años a la Logística y fui desarrollando pequeñas herramientas De gestión y de análisis de Procesos, en esta oportunidad les comparto una herramienta que les va a servir para visualiza como se esta pickiando en un almacén con 18 calles, 7 niveles de altura y 69 posiciones. En la solapa (Picking) van a encontrar 3 campos el único y importante es el de la columna C que son las coordenadas de donde va a tomar el material, una ves completo este campo vamos a la solapa (Monitos stock) y presionamos el botón Ejecutar macro y verán lo que sucede. les dejo mi mail por cualquier ayuda que pueda darle Matias-161085@hotmail.com Me gustaría dedicarme a la mejora en proceso Logísticos de Pimes si saben de algo me chiflan Saludos Picking_Logistica (2).zip Logistica Picking
  8. Version 1.0.0

    35 downloads

    Hola amados todos: ¿ Os acordais que siempre hemos dicho que no se puede usar el método AddItem en un Listbox/Combobox con más de 10 columnas ? Bueno, pues es falso. Analizando esta consulta Sumar 3 columnas de un listbox, me he dado cuenta que si es posible. Ver el código del adjunto. Paz y amor Mas de 10 columnas en un control ListBox con el método AddItem.xls
  9. Version 3.0.0

    654 downloads

    Este es un aporte que había compartido en el foro de ideas y aportes por allá del 2014, se trata de una macro que puede crear un formulario para ingreso y modificación de datos sin necesidad de que el usuario escriba códigos. Lo subo de nuevo aquí ya que por lo que veo en el foro de ideas y aportes el archivo dejo de existir, dejo el link del post original ya que en el se encuentran mas detalladas las instrucciones y un video de como utilizar el aporte. POST ORIGINAL El mismo es un archivo .Bas y debe importar desde la ventana de VBA para después ejecutar la macro "MakeForm" que es la que crea el formulario. IMPORTANTE: Se debe tener habilitada la opción "Confiar en el acceso al modelo de objetos de proyectos VBA", ya que el formulario se crea en tiempo de ejecución.
  10. Version 1.0.0

    193 downloads

    Se trata, se puede decir la evolución de este aporte Chat en red local desde excel, con la diferencia de que en lugar de utilizar textbox para mostrar los mensajes utilizo únicamente un control WebBrowser, lo que da mayor personalización. En el rar nos encontramos con un archivo excel y uno de access, el access debemos copiarlo a una ruta compartida en una red local, se debe modificar la ruta del mudulo1 del archivo excel(por defecto utiliza la misma donde se ubica el archivo excel). Podemos: *Cambiar el nombre de Usuario a mostrar en el chat. *Cambiar la imagen del Usuario, incluso utilizar gifs para la misma. *Compartir imágenes locales o de direcciones de internet. *Cambiar el color de las letras. *Crear salas privadas o publicas. Espero que les guste y cualquier recomendación es bien recibida. Salu2 Chat Excel.rar
  11. LeandroA

    MSO UI Editor

    Version 1.0.0

    37 downloads

    MSO UI Editor es una herramienta para personalizar la interfaz de usuario de Microsoft Office como ser la cinta Ribbon, Menu contextual entre otras, mediante el formato XML, es casi una copia del “Custom UI Editor For Microsoft Office” pero éste trae unas pequeñas mejoras. Esta programado en Visual Basic 6. Cuenta con un detector de errores en la formación del xml y utiliza .xsd que garantizan una mejor validación. También genera automáticamente los Callbacks para los eventos en VBA, otra opción extra es que se puede buscar y reemplazar en el xml. Me hubiera gustado poder armar algunos ejemplos pero me ganó el cansancio y opté por subir algunos que encontré en la web. Si desean leer mas sobre esta herramienta o conocer su codigo de fuente pueden acceder desde mi Blog donde estaré publicando nuevas versiones. http://leandroascierto.com/blog/mso-ui-editor/ Espero que alguien de aqui le pueda sacar provecho y subir algún trabajo que realicen.
  12. Hola a todos, tengo un ligero problema con una macro espero un poco de ayuda este es el codigo que pretendo usar y la idea es que busque ese texto para despues ponerlo en negrita, pero al parecer solo me funciona con textos cortos (2 palabras) pal = "Se encuentra entre las calificadas como solventes por satisfacer la totalidad de los requerimientos solicitados y asegurar las mejores condiciones disponibles en cuanto a precio, calidad, financiemiento, oportunidad y demás circunstancias pertinentes.." Set b = Cells.Find(pal, LookAt:=xlPart) If Not b Is Nothing Then ncell = b.Address Do b.Characters(InStr(1, b, pal), Len(pal)).Font.FontStyle = "Negrita" Set b = Cells.FindNext(b) Loop While Not b Is Nothing And b.Address <> ncell End If Alguna idea?? gracias
  13. Hola amigos del foro Gracias por la colaboracion de siempre Estoy tratando de hacer un proceso que involucra generar correlativos a un archivo de excel desde otro archivo excel... Tengo 3 Archivos A.-Diario B.-Asientos_Resumen C.-Mayor analitico 1.-Archivo Mayor analitico (c) mediante este archivo genero asientos manuales con un userform (tendra un textbox llamado txt_asiento.text que servira para manejar el correlativo) 2.-Archivo Asientos_Resumen (B) Este archivo contiene los asientos que paso mediante un codigo ADO del Archivo C (mayor analitico) a una hoja llamada Libro Diario en este archivo (B) 3.-Archivo Diario (A) Este archivo generara asientos como el tercer archivo C (Mayor analitico). Posee un formulario con el textbox del correlaivo txt_asiento.text Disculpen el enredo pero lo que inteto es que desde el archivo A (diario) y C (mayor analitico) puedan generar los asientos y pasarlos al archivo B Asientos_Resumen... Mediante ADO pase la informacion de los asiento del archivo C (mayor analitico) al Archivo B (Asientos_Resumen)... se dio sin problema Es importante informar que cada archivo que genera asientos archivos A Y c manejan un correlativo en un txt_asiento.txt Mi inconveniente seria que si paso informacion de dos archivos distinto que generan su correlativo Cuando los copie me duplicaran los correlativos... en algun momento... anexo codigo que uso para el correlativo Private Sub CorrelativoPartidas() Dim Final As Long Final = nReg(Hoja1, 2, 3) - 1 If Hoja1.Cells(Final, 1) = "Asiento No." Then MsgBox "1" ' Me.txt_Asiento.Value = 1 Else MsgBox "" & Hoja1.Range("C" & Final).Offset(0, -2).End(xlUp) + 1 & "" Hoja1.Cells(2, 9) = Hoja1.Range("C" & Final).Offset(0, -2).End(xlUp) + 1 ' Me.txt_Asiento.Value = Hoja1.Range("C" & Final).Offset(0, -2).End(xlUp) + 1 End If End Sub Para solventar este problema mediante un codigo pense entrar al archivo B (Asiento_cpro.xlsm) y buscaria el ultimo correlativo generado para cargarlo en un formulario en el archivo A (Diario) y/o archivo C (Mayor analitico) que es desde donde deseo generar los asientos. En resumen lo que intento es que desde dos archivo A y C generar los asientos que se guarden en el archivo 2 y para ello debo manejar los correlativos que deberan estar en el archivo B. al cargar los formularios de carga archivo A y C debera aparecer en el txt_asiento el correlativo que estan en el archivo B Es decir si en el Archivo B el ultimo asiento generado es el 21, cuando cargue el formulario de archivo A o C el textbox txt_asiento.text debera mostrarme el numero 22 que es el numero correlativo siguiente... Anexo el archivo A y B Con este codigo se abre el archivo B (asiento resumen) pero me da error en la ultima linea (error no coinciden los tipos) Sub CORRELATIVOASIENTO() Dim fila As Integer Dim Final As Long Set ObjExcel = CreateObject("Excel.Application") With ObjExcel RutaArchivo = ThisWorkbook.Path & "\Asientos_Resumen.xlsm" If IsFileOpen(RutaArchivo) Then MsgBox "El libro " & RutaArchivo & " Debe estar Cerrado para proceder" ¿ESTA BIEN CERRAR EL ARCHIVO CON QUIT? .Quit ' Exit Sub ' Else With .Workbooks.Open(RutaArchivo) Final = nReg(Hoja1, 2, 3) - 1 If Hoja1.Cells(Final, 1) = "Asiento No." Then Me.txt_asiento.Value = 1 Else Me.txt_asiento.Value = Hoja1.Range("C" & Final).Offset(0, -2).End(xlUp) + 1 End If .Quit End With End If End With End Sub Me esta dando error esta linea pues me dice que no coinciden los tipos Me.txt_asiento.Value = Hoja1.Range("C" & Final).Offset(0, -2).End(xlUp) + 1 Gracias por la ayuda que puedan darme,, ayuda correlativo.rar
  14. Buenas noches amigos, tengo un Form que quiero que sume fechas de acuerdo a la fecha de ingreso y estas sean grabadas al activar los checkbox de los diferentes meses que tengo como opción,además que el combobox "producto " sea dependiente del textbox "código" que al ingresar el número de código me aparezca automáticamente el nombre del producto. Por favor cuento con su valiosa ayuda. Adjunto un archivo como ejemplo de lo que quiero conseguir. Muchas gracias Calcular fechas al acitvar Checkbox Individuales.xlsm
  15. Hola como están? EStoy trabajando en un archivo de stock que realmente ya esta cocinado y en uso. Pero le estoy agregando un programa de balance de stock el cual hace que pueda modificar grandes cantidades de celdas al mismo tiempo (el programa funciona de a 5 a la vez.) El problema que tengo es este. Tengo datos en Hoja1 que serian el balance que hice. y datos en la hoja 2 que serian el saldo que ya tengo. entonces si el articulo que esta en la celda a1 de la hoja 1 es igual a el articulo que esta en la celda 2 hoja 2.. me sume, me reste o no haga nada si no hay modificación de stock. paso un ejemple de archivo muy simple pero que es parecido a lo que quiero hacer. si me pueden dar una mano.. tantisimas gracias! Libro1.xls
  16. Buenas tardes, Tengo dos listas con referencias de productos: Lista1 en Hoja "Resumen" a partir de A2 Lista2 en Hoja "StdCost" a partir de A2 Lo que quiero es comparar ambas listas y que me liste en la hoja "Errores" aquellas referencias que me faltan en la Lista2 "StdCost" Ejemplo Lista1 LISTA2 ERRORES A A C B D C Es decir, me da igual que la D no esté en la Lista 1, solo me interesa saber que la C es la que falta en la lista 2 Lo he intentado con esta macro pero algo falla... Sub errores() Dim celda, valor As String Sheets("resumen").Select Range("A2").Select Do While ActiveCell.Value <> "" celda = ActiveCell.Address valor = ActiveCell.Value Sheets("stdCost").Select Range("A2").Select Do While ActiveCell.Value <> "" If ActiveCell.Value = valor Then Exit Do Range(celda).Select End If ActiveCell.Offset(1, 0).Select Loop If ActiveCell.Value = "" Then Range("A2").Select Do While ActiveCell.Value <> "" ActiveCell.Offset(1, 0).Select Loop ActiveCell.Value = valor End If Range(celda).Select ActiveCell.Offset(1, 0).Select valor = ActiveCell.Value Loop End Sub Adjunto fichero por si es de ayuda. Muchas gracias de antemano. Mermas v3.xlsm
  17. Buenos dias, Tengo una hoja con nombre REGISTROS necesito que cuando venza la fecha se anoten cada registro en su hoja correspondiente y que cambie la fecha automaticamente para el mes si es semestral que cambie cada 6 meses y anual que cambie el año. Muchas Gracias. Registros automaticos.xlsx
  18. Estimados buenas tardes, buscando macros encontré un código que me alerta cuando las celdas están el blanco, la quise adaptar a una formato que ya tenía pero, el detalle está, que la macro me detecta la celda en blanco y a la ves me permite registrar mi informe, cuando debería esperar antes de completar la acción de registrar a que complete la celda en blanco y luego termine de completar la macro, espero haberme dejado entender y tener la ayuda necesaria para completar mi formato, de antemano gracias por siempre estar dispuestos a ayudar.- INF_TEC_INFRA_LA HACIENDA_2017 - 1.xlsm
  19. Buenas. Desde ya muchas gracias por la lectura y espero ser lo mas claro posible Tengo el siguiente inconveniente: Necesito agregar comillas entre 2 palabras únicamente, las cuales tengo identificadas, y luego que con la modificación se genere un TXT. Actualmente para obtener todos los casos que quiero modificar (serian los casos que quiero que se modifiquen agregando comillas entre palabras), ejecuto varias formulas y luego mediante una tabla dinamica selecciono y filtro los casos que quiero agregarle comillas. Una vez filtrado, selecciono la columna y ejecuto buscar y reemplazar así le agrego las comillas. Luego de agregarle las comillas, copio y pego en un TXT de manera manual, proceso que quisiera evitar y automatizar mediante una macro. En fin, espero haber sido claro y que me puedan ayudar en una macro que me permita modificar dichos datos (agregar comillas) y luego, generar un txt que me permita subir el archivo al sistema. Desde ya muchas gracias, Saludos.
  20. Hola Estoy intentando crear un excel para control de vacaciones. La idea es que muestre en una hoja "calendario" los días que se coge cada uno. En la imagen adjunta podréis ver más o menos como está el tema. Las fechas de los períodos vacacionales se introducen en una hoja a parte (Vacaciones) en una tabla con una estructura: Nombre Trabajador | Inicio vacaciones | Fin vacaciones En el caso de un mismo trabajador, se muestran los períodos vacacionales en distintas filas. Hasta ahí he llegado con fórmulas y formatos condicionales. Lo que me interesaría es que todos los períodos de un mismo trabajador se mostraran en una misma fila. Alguien me podría ayudar? Entiendo que quizá se necesite VBA, pero mis conocimientos de programación son muy básicos. Por otra parte, sería posible utilizar colores distintos para cada trabajador? Saludos! Dani
  21. Buen dia Amigos de foro... Recurro como siempre a su valiosa ayuda.. Tengo una userform con informacion que voy cargando en los textbox, Listbox y demas controles Lo que requeria es que con la informacion que cargo me alimente un listbox que funcione para previsualizar una transaccion o asiento contable ejemplo cuando cargo la factura Tengo datos fecha, item, cantidad, costo y totales en un listbox quiero que el formulario me haga el asiento contable de forma automatica Ejemplo Compra de Mercancia por 80000, este seria el asiento Asiento 1 Cod Descripcion Debe Haber Fecha 511102 Inventario de Mercancia 80000 01/01/2017 211101 cuentas por pagar 80000 01/01/2017 Mi listbox tiene 5 columnas Con este codigo logre cargar al listbox la primera linea con el codigo la cta y el monto With Me Col = ListBox1.ListCount Primera linea ListBox1.AddItem Cbo_cta 'Codigo item ListBox1.List(Col, 1) = "INVENTARIO DE MERCANCIA" 'Descripcion item" ListBox1.List(Col, 2) = VBA.FORMAT(CDbl(Txt_SubTotal) + CDbl(Txt_IVA), "#,##0") ' monto items Seguna linea ListBox1.List(Col, 0) = Cbo_cta2 'Codigo Cuenta" ListBox1.List(Col, 1) = "Cuenta por pagar" 'Descripcion item" ListBox1.List(Col, 2) = VBA.FORMAT(CDbl(Txt_SubTotal) + CDbl(Txt_IVA), "#,##0") ' monto items End With pero la segunda linea no se como hacerla agregarla en el listbox, ya que deberia generar linea y que el monto lo coloque en la columna 4 y no la 3 (Col, 2) , con esto se deberia ver el asiento completo en el listbox Asiento 1 Cod Descripcion Debe Haber Fecha 511102 Inventario de Mercancia 80000 01/01/2017 211101 cuentas por pagar 80000 01/01/2017 Muchas Gracias a todos
  22. ¡Hola a todos! Para iniciar este año, y con el fin de crear alguna diversión a los amantes de este maravilloso programa como lo es Excel, propongo un ejercicio a modo de reto para resolverse ya sea con fórmulas o VBA. Dadas unas horas de entrada y salida de vehículos de un parqueadero, la idea es hallar la cantidad máxima de vehículos que se alojaron al mismo tiempo en el mismo. De forma adicional, se podría complementar la solución con el horario en el que ocurrió esta cantidad. Prontamente, y dependiendo de la acogida de este ejercicio, subiré mi respuesta. ¡Bendiciones! Parqueadero.xlsx
  23. Buenas tardes, Tengo una hoja de excel con datos de locales vendidos (NombreLocal, NombreComprador, área m2, precio final, etc) necesito un formulario para filtrar por nombre de comprador por medio de un combobox todos los locales que estan a su nombre ya sea uno o varios y en una hoja nueva mostrar todo su historial de la siguiente forma: Cliente: Juan Manuel Vazquez Locales comprados: Local1, Local2, LocalN Total área comprada (suma de los metros cuadrados de sus locales): 500 m2 Monto total locales(suma de los precios de todos sus locales): $ 5,589,145.00 Podrían ayudarme para realizar esta macro. adjunto mi hoja de excel de antemano muchas gracias. localescomerciales.xlsx
  24. Hola a todos aqui con la siguiente cuestion. Les explico tengo en un rango de celdas expresiones, en dichas expresiones aparece varios conceptos incluyendo el nombre del proveedor. Lo que necesito es extraer el nombre del proveedor, ya probe con extrae, buscarv con comodines, con texto en columnas etc etc y nada . Bueno despues de tanto buscar en la red encontre una udf la cual me funciona pero solo con unos proveedores con la mayoria no, no se a que se deba. Anexo el archivo Espero me puedan ayudar De antemano muchas gracias BUSCAR UNA PALABRA EN UN TEXTO.rar
  25. Hola, buenas tardes estimados, Me llamo Juan José Díaz, soy de Lima - Perú y tengo 29 años; soy nuevo en el campo de Macros y VBA, el uso que le daba a Excel era intermedio. Actualmente estoy trabajando en un Excel que requiere aplicar Macros y también debe estar compartido en RED para que lo pueda usar con más usuarios en simultáneo, el detalle es que no se como aplicar el Compartir archivo. Mi Archivo consta de 5 Hojas, llamadas Comercial, Programación, Seguimiento, Emisión y Resumen. En Comercial se ingresan varios campos que pertenecen a un cliente, cada fila cuenta con un combobox del cual si el usuario le da clic en CERRADO, automáticamente 3 celdas de COMERCIAL pasarán a la hoja PROGRAMACIÓN, en un orden específico, luego en la hoja PROGRAMACION también se llenan una cierta cantidad de datos en la fila y también consta con un combobox del cual al seleccionar AUDITADO, también pasarán 3 celdas (las mismas que pasaron anteriormente de comercial) a la hoja SEGUIMIENTO, de SEGUIMIENTO es el mismo proceso, cuenta con un COMBOBOX y al seleccionar EMITIDO, pasará automáticamente ciertas celdas a la hoja EMISION y NC's, hasta aquí tengo la programación, pero mi problema viene cuando quiero sacar el resumen de las 5 hojas, la hoja RESUMEN me debería mostrar a los clientes con sus datos completos (los cuales se recopilan de las hojas COMERCIAL, PROGRAMACION, SEGUIMIENTO Y EMISION, siempre y cuando se cumplan 3 condiciones: Las condiciones son: que en COMERCIAL, la fila se encuentre con el Combobox en estado CERRADO, en la hoja PROGRAMACION se encuentre la fila con estado AUDITADO y que en SEGUIMIENTO también la fila se encuentre con el Combobox seleccionado en EMITIDO, para la hoja EMISION le creé un sub estado que es igual al de la hoja SEGUIMIENTO el cual se genera automáticamente cuando en SEGUIMIENTO se le hace clic en EMITIDO, no logro hacer que me cumpla las 3 condiciones y estas pasen automáticamente al RESUMEN. Alguien podría ayudarme? por favor tengo varios días tratando pero no me logra salir lo solicitado, tampoco puedo hacer que se comparta en RED para que lo pueda usar un usuario más aparte de mi. Adjuntaría el archivo pero pesa mas de 200 KB y la página no me permite hacerlo. Gracias a todos por su atención.
×
×
  • Create New...

Important Information

Privacy Policy