Seleccionar entre dos productos iguales el de mayor fecha la idea es la siguiente al seleccionar el producto en el macro me tome el precio del producto con la fecha mas actual osea el precio actualizado Sub detecta_producto() If CmBProductos.Value <> Empty Then Call calcula_importe Else End If End Sub Sub calcula_importe() If txtCantidad.Value = Empty Or cmbClave.Value = Empty Then Else Importefi.Text = CCur(txtPrecio.Text) * CCur(txtCantidad.Text) End If End Sub Sub busca_art_precio() Private Sub cmbClave_Change() If Me.cmbClave.Value = "" Then Exit Sub Dim sUltimaCelda As String Me.txtDescripcion.Text = "" Me.txtPrecio.Text = "" If…

Amigos, Me gustaría saber cómo desde un archivo de Excel leer información de las celdas de otros archivos de Excel sin tener que abrirlos, o sea, como si fuera una base de datos.

Navegando por la red he encontrado un código para seleccionar objetos de autocad, es el siguiente: Public AcadDoc As Object Public AcadUtil As Object Dim objLinea As AcadObject Dim Punto As Variant Sub MacroSeleccion() Set AcadDoc = GetObject(, "Autocad.Application").ActiveDocument Set AcadUtil = GetObject(, "Autocad.Application").ActiveDocument.Utility AcadDoc.Utility.GetEntity objLinea, Punto, "Selecione objeto: " End Sub Sin embargo, al ejecutarse en autocad sólo me pone que designe los objetos. No me los selecciona automáticamente. He encontrado otro código similar, pero no me funciona. Creo que es más adecuado que el otro: es el siguiente: Dim SS As AcadS…

Buenas Tardes, gracias a los que me ayudaron en un tema anterior... En fin, lo que pasa que tengo una hoja excel el cual tengo registrados todos los pagos y saldos de la deuda. Lo que pasa , que tengo que sumar las deudas pendiente desde una fecha hasta otra en especifica , para realizar la provisión. Sera posible esto ? lo que pasa que llevo mucho tiempo y no he encontrado alguna solución a esto. Les adjunto el archivo para ver si me pueden ayudar, por favor. sumar.rar

Buenas tardes tengo la siguiente duda, tengo un formulario de tipo facturación, lo que desearia es que los datos que ingrese al formulario se almacenen en un libro diferente(1 libro especifico), gracias - - - - - Mensaje combinado - - - - - este es el codigo que usa para guardar en una hoja distinta, pero quisiera que lo hiciera en el libro resumen. Private Sub guardarFactura()Dim i As Integer, Fila As Long Sheets("facturas").Activate For i = 0 To Me.lstCantidad.ListCount - 1 Fila = Range("A" & Rows.Count).End(xlUp).Row + 1 Range("A" & Fila) = Me.txtNoFactura.Text Range("B" & Fila) = Me.txtFecha.Text Range("D" & Fila) = Me.txtRazon.…

Hola a todo, tengo una plantilla de excel donde se pueden registrar los contactos,nombre,telefonos,....etc me gustaria hacer un buscador de datos, es decir yo en una ventana donde pongo el nombre dandole buscar me saldria una ventana donde aparecen los datos de la persona buscada. adjusnto el archivo que es donde mejor se ve la idea. Gracias. Un saludo dejo el enlace porque no me deja subir el archivo por ser de 250k https://skydrive.live.com/redir?resid=627BAD36DCF0343B!275

Ya tengo creada una macro, pero me falla muchas veces por ejemplo cuando busco JFET no aparece nada en la tabla ALMACEN y se borran otras tablas que no deberían y al volverlo a buscar si aparece en la tabla ALMACEN. Aparte las sumas y las restas del costado se efectuan una vez o dos, pero despues de borran las formulas al buscar otros datos. Ya no se que hacer, porfavor miren el archivo y miren lo que podria estar fallando. MUCHAS GRACIASSSS. REPUESTOS4.rar

Buenas tardes: Tengo un problema y es el siguiente: Tengo un formulario simple que depende de un listbox para seleccionar un libro a abrir. Mi formulario cuenta con 4 botones de comando, 1 para filtrar datos dependiendo de mi listbox, el 2do para guardar los cambios que se realizen en el formulario, el 3ero es para abrir un hipervinculo y el 4to para cerrar la hoja activa, es decir el hipervinculo abierto. Mi problema es que si por error se activa el 4to boton se cerrara mi archivo principal, cosa que no deseo, en mi logica entiendo que ese boton solo debe funcionar si se activo el 3ero, caso contrario no debe activarse. Espero haberme echo entender, de todos modos les…

Formula muy larga. VBA me da error. Hola, no me deja adjuntar el archivo, ¿cómo puedo poner mediante VBA en BU10 (marcada en amarillo) la siguiente fórmula? =SI(O($C10="066";$C10="067";$C10="069";IZQUIERDA($C10;2)="66");SI(ESERROR(COINCIDIR(BU$9;'HISTOGRAMA-ITG'!$15:$15;0));0;SI(ESNUMERO(((SUMAPRODUCTO(('HISTOGRAMA-ITG'!$A$16:$A$99=CONSULTAV(IZQUIERDA($B10;5);'[PRUEBA_MACROFABI_Rev4-16R.xlsm]DATOS_BASICOS'!$A:$B;2;0))*('HISTOGRAMA-ITG'!$B$16:$B$99="CONS")*('HISTOGRAMA-ITG'!C$16:C$99)))/100)-((SUMAPRODUCTO(('HISTOGRAMA-ITG'!$A$16:$A$99=CONSULTAV(IZQUIERDA($B10;5);'[PRUEBA_MACROFABI_Rev4-16R.xlsm]DATOS_BASICOS'!$A:$B;2;0))*('HISTOGRAMA-ITG'!$B$16:$B$99="CONS")*('HISTOGRAM…

Estimados navegando en los foros de esta pagina encontré un libro que puedo aplicar para la Empresa en la cual trabajo , esto todo para llevar el control de los ingresos y salidas del personal, mediante botones de control, el problema esta que los botones me entregan solo la entrada y la salida, necesito 4 botones , estos para: boton 1.-entrada Turno mañana boton 2.- salida turno mañana boton 3.- entrada turno tarde boton 4.- salida turno tarde El archivo tiene la opcion de bloquear ciertas celdas que no quiero que sean tocadas o modificadas Desde ya muy agradecido.- CONTROL ASISTENCIA DUEÑA CASA TARDE.rar

El Macro en VBA tiene que detectar de una celda la palabra y lo de 4 celdas mas abajo lo tiene k mover a otra hoja Esta Explicao con un comentario en el ejemplo que voy adjuntar macro1.rar

Estimados necesitaba hacer una función que entregue un valor de acuerdo a dos celdas y que luego de tener ese valor, en otra celda, busque en una columna si se repite el numero de una celda, después si se repite utilizar los valores de las columnas aledañas a las celdas en donde se encontraron igualdades para hacer un calculo de precio según el valor de estas. Primero estuve tratando sin macros pero no se me ocurrió como. Después me ayudaron con esta macro que realiza el calculo en una planilla pequeña, ahora cuando intente realizarlo en la planilla real no pude. Adjunto planilla Ejemplo y planilla Real con la macro no funcionando. Este es el macro que funciona en la pl…

Tengo un archivo con una hoja Compras donde estan los datos correspondientes a productos comprados a varios proveedores. la macro que tengo busca los códigos de la columna A de la hoja Tomate en la hoja Compras y me copia en la hoja Tomate todas las filas donde aparece el código buscado. lo que quiero es que cuando termine de ejecutar la macro en la hoja Tomate, pase a la hoja Papa, ejecute la macro, luego pase a la hoja Cebolla y asi sucesivamente hasta la última hoja del libro, que pueden ser hasta 20 productos. no quiero escribir todo el código para cada hoja, quiero hacerlo con una variable con la hoja activa, para que cada vez que agregue una hoja no escribir el c…

Buenas noches, Me gustaría saber como puedo hacer para modificar el rango del área de impresión de un documento en función de el numero de registros o datos que pueda tener el mismo. Vamos que no quiero que salgan las celdas vacías desde el último registro hasta el fin del área de impresión predefinida. Espero haberme explicado bien, de todas las maneras os mando el ejemplo adjunto. Un saludo y gracias. Libro1.rar

Hola Amigos de Ayuda Excel, De nuevo por aquí solicitando de su apreciable apoyo. Tengo un en el cual con una lista desplegable oculto y muestro cierta cantidad de columnas, conforme al número seleccionado en el cuadro de lista. Quiero hacer lo mismo para las filas pero me da un error y no se a que se debe (La hoja no está bloqueada). Gracias de antemano por su ayuda. saludos, BARB PROPUESTA DE CONTROL POLIZAS ULTIMA 7-5-13 (5).zip

Estimados amigos, Ante todo un cordial saludo, el motivo de mi tema es que tengo dudas referentes al archivo que posteo a continuación, lo que pasa es necesito que en el "ANEXO A", busque el código secuencial de la fila B del "ANEXO B" según el código patrimonial y lo coloque en la fila B del "ANEXO A", pero siempre y cuando la descripción que figura en la fila c del "ANEXO A" sea igual a la descripción del "ANEXO C". Parece sencillo pero he estado tratando de hacerlo por fórmulas pero no tengo los resultados esperados, es por ello que apelo a su apoyo. Gracias EJEMPLO.zip

Hola a todos: Mi consulta se refiere a que he leido y buscado mucho en el foro pero no encontre ninguna respuesta certera. necesito crear o tengo un libro nuevo desde cero sin nada adentro, en un rango de celdas introduzco con un formato que la solapa de Hoja soporte: ejemplo: 09-05-2013 ya que las barras no me las admite y no me interesa en realidad. bueno volviendo... en un rango ej: P1:P31 que serian 31 dias de algun mes o 30 de otros, que ese rango me genere 31 solapas de hojas cada una con una fecha correspondiente a todos los dias que yo ya habia precargado en el rango de celdas anterior, se entiende? es como si me hiciera el calendario completo de el mes en curso…

Estimados Amigos de Ayude Excel, Nuevamente estoy por aqui solicitando de su apoyo. A ver si me logro explicar: Tengo un archivo en el cual quisiera con una macro ocultar y mostrar un determinado rango de columnas, el cual tengo condicionado a una pequeña lista desplegable. La lista desplegable contiene números del 1 al 5 y en una celda a la par relacioné cada número a una letra que me representara las columnas que quiero ocultar. Supuestamente utilizaría esto para que me dejara únicamente el número de columnas visibles indicados en la lista desplegable, es decir si en la lista desplegable hay un tres, entonces me mostrará únicamente las primeras tres columnas. Mucho …

Estimados tengo un libro excel que abro desde mi pc y me da el siguiente error. Se ha producido el error 1004 en tiempo de ejecución. Error odbc. El tema es que lo abro desde otras PCs y funciona bien. Ya intente agregar la misma version de office que de las otras PCS, inclusive agregue los parches hotfix. En la depuración me sale el siguiente error. With Worksheets("PODER_RESCATE") Range("W100").Activate Worksheets("PODER_RESCATE").QueryTables("listDiaActividad").Refresh 'Worksheets("ARQUEO").cargaCombo 'Worksheets("PODER_RESCATE").CB_Fechas.Select 'Worksheets("PODER_RESCATE").CB_Fechas.Clear Acciones.CB_Fechas.Clear Range("W101")…

Estimados, muy buenos días. Necesito de vuestra ayuda. Tengo el siguiente problema, me dieron dos libros Excel en Visual Basic, uno que funciona y el otro no (Que son iguales, salvo algunas modificaciones). El que no funciona precisamente el problema está en la solapa "PENDIENTE" en la botonera de "ACCION" Actualizar, no trae datos y no funciona desde que se agrego el modulo 7. Algo que debo aclarar es que el archivo trae los datos de una red por lo que no puedo adjuntar aquí esos datos, pero a lo mejor algun buen compañero me puede aportar una idea de por que uno trae los datos y el otro no. El que funciona es Libro1. Y el que no Libro Modificado. https://docs.googl…

Muy buenas, estoy tratando de dado la siguiente tabla y en función de 3 parámetros que yo seleccione se dibuje automaticamente una grafica con los datos elegidos. [TABLE=width: 800] [TR] [TD]Defecto: D3[/TD] [TD=class: xl65][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [/TR] [TR] [TD]Fecha: 03-may[/TD] [TD=class: xl66][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [TD][/TD] [/TR] [TR] [TD]Periodo: 4 Con estos 3 parámetros seleccionados, no sé como hacerle llegar al gráfico los valores pa ra que muestre solamente los datos en color azul. Entiendo que debería pasarle valores co…

Buenos dias gente del foro, tengo una consulta, con respecto a fechas automaticas con macros, espero puedan ayudarme,, gracias de antemano.. les adjunto un archivos explicando ñlos pormenores. ayuda.xls

Buenas tardes amigos: Es mi primera consulta aquí, espero no estar violando alguna regla. Mi consulta es si, por medio de alguna macro o algún código, se puede ocultar los campos de la lista desplegable que no tienen nada que ver con lo que filtras en la anterior. Me explico mejor, tengo la tienda "TIENDA 1" que tiene historial de ventas en los años 2012 y 2013, y tienda "TIENDA 2" que tiene solo datos de ventas del 2013. Al poner tienda y año como filtro de informe en la tabla dinámica, quiero que al filtrar "TIENDA 2" y luego al filtrar año, solo me en la lista desplegable solo el 2013, más no el 2012, así como los meses. Se podrá? Ayudenme, si se pudiera mediante …

Lo que quiero es que el usuario ingrese el nombre del archivo y se cree un archivo nuevo en una ruta especifica pero que sea la copia de un archivo con macros que ya tengo diseñado, lo que pasa es que todos los meses se ocupara la misma plantilla, pero con los nombres de los mese, espero alguien me pueda ayudar, saludos

Buenas gente, esot y programando una macro la cual al llegar a la sentencia : Cells(2, columna).Activate me tira: se ha producido el error 1004 en tiempo de ejecucion: error definido por la aplicacion o el objeto me seria de gran ayuda si identifican la causa del mismos. el codigo completo es el siguiente: Dim f As String Dim contadorhija As String copiado = 0 columna = 3 contadorpadre = 3 Windows("Herramienta Patricio.xlsm").Activate Cells(3, 1).Select 'ciclo recorredor de padres Do Until IsEmpty(ActiveCell.Value) ref = ActiveCell Set Fso = CreateObject("Scripting.FileSystemObject") 'suspende macro se falta una estructura If Not (Fso.FileE…