Buenas, tengo esta macro para obtener el tipo de cambio de cualquier moneda que ponga en B4 contra el Euro, lo consigo con este código: [/FONT][/COLOR][COLOR=#2E8B57][FONT=Monaco]Sub Macro1()[/FONT][/COLOR] [COLOR=#2E8B57][FONT=Monaco]Dim currency1 As String[/FONT][/COLOR] [COLOR=#2E8B57][FONT=Monaco]currency1 = ActiveSheet.Range("Currency")[/FONT][/COLOR] [COLOR=#2E8B57][FONT=Monaco]With ActiveSheet.QueryTables.Add(Connection:= _[/FONT][/COLOR] [COLOR=#2E8B57][FONT=Monaco] "URL;http://uk.advfn.com/p.php?pid=fxcalculate&action=convert&amount=1&from=" & currency1 & "&to=EUR&btn=Convert", Destination:=Range("C1"))[/FONT][/COLOR] [COLO…

Buenos días, tengo una consulta. Tengo una tabla en excel con muchas líneas, la cual se actualiza desde otra en access. El problema es que la tabla de access son muchas líneas (tiene datos de 2010, 2011, 2012 y 2013) y al actualizarse la de tabla excel tarda mucho. Mi consulta es ¿Se puede actualizar la tabla excel con los datos de access, pero solo los datos a partir de una fecha determinada mediante código en VBA? Es decir que solo se actualicen los datos a partir de 2013. PD:Sé que tendría que adjuntar un archivo pero como es una consulta sobre actualizar datos desde excel no sé cómo hacerlo.

Buen día para todos encontré un archivo en la web que permite hacer facturas y poder manejar una base de datos de inventario, mi problema es que soy novato para VBA y no comprendo muchas cosas y quiero hacer unos ajustes en el programa; necesito que el programa me genere automáticamente un consecutivo cada vez que le doy nueva factura también necesito que la factura cuando me genere el subtotal de la compra no me sume el iva sino lo me reste ya que el valor del producto de la lista es con iva incluido y por ultimo no se como cambiar el formato de impresión la idea es que el recibo salga en formato colilla. De verdad agradecería la ayuda no es para fines lucrativos sim…

Tengo en una hoja llamada (Control-Caja) dos datos: * Celda "L31" una fecha(puede ser cualquier fecha del año) * Celda "M31" un valor en pesos(perteneciente a un gasto) y en otra hoja llamada(Ganancias Dia-Año) tengo una tabla con: columna "A" Fecha;columna "B" Ganancia Bruta;columna "C" Gastos;columna "D" Ganancia Neta. Mes Enero columna "E" Fecha;columna "F" Ganancia Bruta;columna "G" Gastos;columna "H" Ganancia Neta. Mes Febrero columna "I" Fecha;columna "J" Ganancia Bruta;columna "K" Gastos;columna "L" Ganancia Neta. Mes Mzo columna "M" Fecha;columna "N" Ganancia Bruta;columna "O" Gastos;columna "P" Ganancia Neta. Mes Abril columna "Q" Fecha;c…

Hola: Gracias de antemano por la atención de leerme. Mi problema es que mis macros son muy rudimentarias, por mi falta de formación. Cuando tengo que extraer un dato determinado de otra columna, hoja, libro, etc... Siempre utilizo el mismo sistema: Sub Ejemplo()[/b] Range("AJ2").Select ActiveCell.FormulaR1C1 = _ "=INDEX(CLIENTE_GESTOR!C3,MATCH(RC[-35],CLIENTE_GESTOR!C1,0),1)" A = 2 While Cells(A, 1) <> "" A = A + 1 Wend Range("AJ2").Select Selection.Copy Range(Cells(3, 36), Cells((A - 1), 36)).Select ActiveSheet.Paste Range("AJ:AJ").Copy Range("AJ:AJ").PasteSpecial xlPasteValues Range("AJ:AJ").Replace What:="#N/A", Replacement:=""…

Amigos, elabore este codigo, y me esta funcionando sin problema, pero he batallado mucho para lograr que esta cita que crea, sea enviada; ya logre que se guarde, pero no como se envíe, me pueden ayudar?. la finalidad es que tanto a mi, como a los invitados (por correo en el campo invitados), outlook nos arroje la ventana emergente de citas y recordatorios para asi no olvidar el vencimiento de un crédito de un cliente. la prueba manual ya la hice, ya que hago aparecer el display, le doy comprobar nombres y despues enviar, y SI le aparece a mis invitados, pero quiero que sea automatico, ademas que no he encontrado como hacerlo con muchos registros (solo lo he logrado con da…

Buenos dias a todos. Con este codigo: Option Explicit Const PATH As String = "C:\Documents and Settings\LAMOGA\Escritorio\Formulario Web\" Public Sub Form_Load() Call CountFileType("xlsm") End Sub Public Sub CountFileType(ByVal fType As String) Dim c As Long If LenB(Dir(PATH & "\*." & fType)) <> 0 Then c = c + 1 Do While (LenB(Dir()) <> 0) c = c + 1 ' found another file increment counter Loop MsgBox "Number of " & fType & " = " & c Else MsgBox "Cant find any " & fType & " files!" End If End Sub [/CODE] me cuenta los archivos tipo xlsm en una carpeta deter…

Hola a todos Poco a poco estoy progresando con mi hoja de cálculo y le intento ir añaciendo más y más funciones. El caso es que no sabiendo como ni porqué, cometí un error en la programación de Visual, y al presionar el botón "Salir" en el primer formulario, me sale un error. ¿ Alguien me lo puede solucionar ? Tengo otra consulta. Tengo una fórmula para calcular los años y los meses entre dos fechas. En la primera fórmula me calcula los trienios. =SI(F6>0;ENTERO((AÑO(F7-F6)-1900)/3 &","&MES(F7-F6)&"");"") [/CODE] Como podréis ver, extraigo el entero de la cantidad calculada, que es la que me interesa. Pero para realizar éste cálculo, pongo como…

Hola mi nombre es Rodrigo Domino bastente bien casi todo de excel 2010, pero mi talon de aquiles son las Macros. Me gustaría aprender desde la base hasta alcanzar el nivel super-sayayin. Es por este motivo, que he creado este topic. -Donde puede encontrar buenos manuales de Macros que comiencen desde la base -Donde puedo encontrar ejercicios resueltos de macros? Espero me puedan ayudar. Saludos desde el fin del Mundo. PD: Si este topic no pertenece a este apartado por favor mover.

Hola: Alguien con Excel 2007 me puede probar el formulario del adjunto. Parece ser que al realizar búsquedas se produce el error que cito en el título de la consulta. Yo tengo Excel 2010 y no consigo reproducir el error. Ver último adjunto de este tema: https://www.ayudaexcel.com/foro/macros-programacion-vba-10/poner-barra-progreso-boton-buscar-30114/ Gracias anticipadas.

Buenas. Primero gracias al foro pro la excelente ayuda que brindan a los usuarios, me he inscrito para agradecer y por primera vez preguntar y resolver mis dudas. Mi problema es el siguiente: Tengo 2 archivos Ventas y Planta. En ventas tengo la información ya estructurada, en planta tengo 2 hojas ya enumeradas respectivamente (1 y 2) en cada una deben ir los datos de Ventas, cada fecha de acuerdo a una hoja, el día 1/2/13 en la hoja 1 y el día 2/2/13 en la hoja 2 y asi hasta llegar a la hoja 28, solo copio y pego valores pero esto es muy tedioso, intente hacer mi propia macro pero no me funciono, así que resumo mi problema. Estoy en busca de un macro, que copie los d…

Estoy diseñando una planilla excel en donde se incluirán muchos trabajadores en que dependiendo de su cargo llevaran diferentes implementos de trabajo, los cuales tendrán un registro de ingreso y termino. Me conseguí ayuda en este mismo foro hace un tiempo pero no e podido avanzar mas que: En la hoja1 van los nombres y al poner el cargo se actualizas sus implementos automáticamente. en la hoja 2 al agregar mas implementos y cargos la hoja1 los reconoce. Pero los problemas son: al borrar un implemento o al agregar no se actualiza de inmediatamente en la hoja 1, a menos que se vuelva a escribir el cargo. Esto me produce otro error que hace que se eliminen todas las fech…

Hola gente Necesito si me pueden colaborar en lo siguiente : Estoy generando un archivo de informacion con todos los registros carpetas y subcarpetas que tengo en una ubicacion , este archivo los genera de la siguiente manera: ejemplo: R:\3. ACTAS\COMITE DE SEGUIMIENTO TECNICO\ACTA DE REUNION No 97.PDF R:\3. ACTAS\COMITE DE SEGUIMIENTO TECNICO\ACTA DE REUNION No 97A.PDF R:\3. ACTAS\COMITE DE SEGUIMIENTO TECNICO\ACTA DE REUNION No 98.PDF R:\3. ACTAS\COMITE DE SEGUIMIENTO TECNICO\ACTA DE REUNION No 99.PDF R:\3. ACTAS\COMITE DE SEGUIMIENTO TECNICO\esquema enlace 16.xlsx R:\3. ACTAS\COMITE DE SEGUIMIENTO TECNICO\pendientes\ACTA DE REUNION No 98.P…

Tengo la versión 2007, el planteamiento es el siguiente: es un libro con una sola hoja de calculo, en la cual está definida un área de impresión, la parte superior (las primeras filas) se repiten en la impresión para las filas posteriores bajo ese encabezado, en la columna "M" a partir de la celda "M11" hay una formula con un =SI condicional, la cuestión es que si no hay cantidad indicada en la columna "H" no se muestra nada en estas celdas de la "M", pero al momento de imprimirlas, me manda todas las hojas hasta donde esta la formula que es la celda "M2516", lo que necesito es que me imprima las paginas resultantes (que a parte se están auto-numerando conforme se llenan…

Que tal espero me pueda ayudar en como resolver lo siguiente, Requiero que se realize la busqueda de los valores contenidos en una de las hojas y si coinciden entonces tomar ciertos valores de esa columna para ser copiadas en una tercer hoja donde se alojaran todas las coincidencias. La operacion seria de la siguiente forma. Se realiza la busqueda en la hoja "Cob" en la fila C Si se encuentra alguna coincidencia con los elementos de la hoja "bd" de la fila M se realizara la copia de la hoja "BD" de solo las filas F,H,J,K,M a la hoja "HOJA2" en las filas N,O,P,Q,R. No se si me di a entender adjunto archivo con el cual estoy trabajando. fiscales.rar

Cuadros de Texto dependiente de un cuadro de lista (Userform) Hola, soy nuevo en el foro.saludos. Tengo una hoja llamada clientes: [ATTACH]40060.vB[/ATTACH]1.1 la cual contiene diferentes datos de clientes (fig 1.1). necesito crear un userfomm que al elegir el rut del cliente en un cuadro combinado, automáticamente modifique todos los datos (cuadros de texto) correspondiente al cliente. ejemplo La idea es elegir del cuadro combinado el rut (111-1), y los cuadros de texto sean llenados modificados (de acuerdo a la información de la figura 1.1) [ATTACH]40062.vB[/ATTACH] al seleccionar el rut, automáticamente el nombre , la dirección, la ciudad, tipo cliente …

Se que me dirán que es fácil, que lo encontramos en las opciones de pegado. No, tengo dos tablas, en una tengo datos de nombres fechas y mas. Y tengo otra tabla donde pongo los datos de la otra tabla jalándola con formula "=tabla2!c3" quiero que el formato de color se repita en la tabla1, según el formato que tengo en la tabla2. En este mismo foro encontré que hacían algo parecido pero con celdas desplegadas, en la misma tabla, yo lo necesito en tablas diferentes. Espero ser claro en lo que busco hacer. de antemano Gracias.

Hola buenas noches, tengo este archivo el cual quisiera que me permita ingresar los datos del casillero Trabajo Nº, ya que al momento solo se muestran los datos que ya estan ingresado, pero no puedo ingresar mas. La ides es que me permita buscar y lo ya ingresado pero que muestre todos los casilleros del adjunto asi como que peda ingresar nuevos datos en el sistema. Muchas Gracias por su ayuda. Saludos, Copia de O COMPRAA -13 MA II .xls

[ATTACH]40054.vB[/ATTACH][ATTACH]40055.vB[/ATTACH][ATTACH]40056.vB[/ATTACH]Estimados ayudantes! buenas dias/tardes/noches segun corresponda y gracias por leer antes que nada! Les comento mi problema, soy bastante nuevo en esto de macros y excel, pero es una herramienta tremenda, estoy armando una planilla, como esta (adjunto imagenes para que sea mas simple la explicacion) [ATTACH]40054.vB[/ATTACH] Como veran en la imagen es bastante basica, genere unos combobox (que los tengo en la hoja2 por una cuestion de orden solamente, en la que cargo el "Tipo de Archivo" y la "Tarea", luego con una macro bastante simple hice que cuando se cargue el "N° de aviso" aparezca automat…

Hola alguien me podria ayudar a crear una userform para este archivo de antemano GRACIAS por su ayuda Tesss2013 - Copy.xls

Buenas, les cuento, tengo casi nulos conocimientos de VBA para las macros de excel y se me asignó una tarea para los próximos días, la cual intento llevar adelante hace un tiempo pero no logro realizarlo. El problema a resolver es: En una carpeta se encuentran 7 archivos -libros de excel-, 1 por cada vendedor con su nombre. (este el formato base: https://dl.dropbox.com/u/10387731/Ejemplo.xlsx ) Y necesito generar un nuevo libro que reúna en UNA SOLA HOJA (las filas una debajo de la otra), la primer hoja de cada uno de los 7 libros de cada vendedor (se llaman "CARGA" las Hoja1, aunque no se si este dato importa demasiado). Ahora bien, necesitaría que se genere con cier…

Hola ! Necesito crear una macro que seleccione una serie de campos de una hoja excel y los pegue al final de unos registros de otra hoja diferente. Por favor, ¿ podéis ayudarme ? Muchas gracias y un saludo. P.D. Os adjunto un fichero ejemplo de lo que necesito Fichero_macro.xls

Buenas, Tengo un report en .txt de facturas, unas 5000, bien, lo que me gustaria es una vez tengo los datos en excel buscar la palabra descripción y copiar su fila y las 8 siguientes en una celda de otra columna y así sucesivamente. Sabeis alguna manera rápida y sencilla? Intento hacer una macro pero solo me repite lo q yo hago en la macro y no lo repite en todo el libro. facturas.xls

Hola a todos, Tengo una pequeña dificultad y no encuentro la manera de solucionarla. Me explico. Tengo una hoja simple con datos numéricos en tres columnas, la B, C y D y quiero ordenarlos cada vez que introduzco números nuevos. El caso es que si uso el ordenar de Excel y le indico que me ordene de menor a mayor, la coluna B, C y D, sólo me hace la B las otras no y yo lo que necesito es que me ordene la columna B empezando por el nº más bajo de las tres columnas, cuando terminen los datos de esa columna siga en la C con el siguiente que corresponda tras el último de la B y en la D igual pero con respecto a la D. Ejemplo: Columna B: 3, 5, 1, 4, 9 Columna C: 6, 11, 2…

Buenas tardes a todos, y si me he equivocado de foro de antemano una disculpa, ocupo algo sencillo que no he podido encontrar, tal vez no he buscado como debo. Ahí voy... Quiero que en una celda (a través de una formula o macro) pueda llamar el numero de pagina y el total de páginas que he mandado imprimir, es decir, lo que Excel hace en encabezado y pie de pagina, cuando le das '&[Página] de &[Páginas]'. Pues lo ocupo para un libro que tiene 41 hojas, cada una contiene de 1 a 5 páginas, pero el formato de llenado no lo puedo cambiar, y lleva este dato en una celda, pues tener que poner a mano "Hoja 1 de 54", la que sigue "Hoja 2 de 54", etc., etc., es bastante e…