Buen dia Tengo la siguiente macro que lo que hace es generar un archivo en txt, subi un ejemplo de como me genera las polizas (poliza 3) Esta macro toma los dados de una sola fina, lo que necesito esque la funcion se repita en varias fila, por ejemplo, si se corre en dos filas me debe de crear el txt con la informacion de las dos filas, subo un ejemplo de como necesito que quede en la poliza 2. Si alguien me pudiera ayudar meseria de mucha utilidad de antemano gracias. Póliza3.txt pólizas2.txt

Buenas días, tengo un Libro de excel "nuevos_datos" cuyos datos actualizan otras personas y me lo pasan a mi. Lo que tengo que hacer es pegar en mi libro "referencia" aquellos datos que son distintos del libro "nuevos_datos" y todas las celdas que se actualizan en "referencia" cambiar el color de la celda a Amarillo. Necesitaría una macro que hiciera las siguientes órdenes (o algo similar): Si Referencia.(A1) =nuevos_datos.(A1) 'comparar celda a celda los dos libros entonces Referencia.(A1); 'el valor de la celda se mantiene sino Copiar nuevos_datos.(A1) 'copiar el valor de la celda Pegar en referencia.(A1) Formato= amarillo 'tras pegar el valor tiene que cambiar e…

Buenos Días, soy nuevo en esta pagina y no entiendo mucho sobre macros, estoy mas que nada tratando de aprender ademas de volver mas dinámico mi trabajo. La ayuda que necesito es para crear una macro que básicamente me calcule los intereses, consiste en que tengo dos libros de excel, con dos hojas distintas, en un libro tengo la base de datos, el cual coloco valores negativos o positivos dependiendo de la situación del contribuyente (en el cual los negativos son las deudas), en la otra lista tengo formulas inventadas por mi no mas, para llevar a cabo el calculo de los intereses; Cada planilla esta dividida en conjuntos (0-1, 2-3, 4-5, 6-7, 8-9) según el CUIT de cada uno.…

Hola amigos, tengo varios un combobox en un formulario dentro de excel, en un caso tengo cargado mediante el siguiente codigo: Sub UserForm_Initialize()Plan_inver.List = Array("FERUM", "PLANREP", "PMD", "FRYPMA") Arrastre.List = Array("FERUM 2010", "FERUM 2011", "PLANREP 2010", "PLANREP 2011", "PMD 2010", "PMD 2011") Prog_ant.List = Array("FERUM 2010", "FERUM 2011", "PLANREP 2010", "PLANREP 2011", "PMD 2010", "PMD 2011") Prioridad.List = Array("1 ALTA", "2 MEDIA", "3 BAJA", "REQUERIDO") End Sub en el otro caso estoy cargando los valores mediante la utilidad RowSource. El inconveniente que tengo es que cuando envío los valores seleccionados en el combobox, no funci…

Hola buenas noches, He estado investigando y no consigo realizar una búsqueda con los campos de mas de 10 columnas. El método que utilizo es el Additem y este solo me permite hasta un máximo de 10. Adjunto método y archivo: Private Sub txt_btfiltro_Click() numerodatos = Hoja9.Range("A" & Rows.Count).End(xlUp).Row ListPedidos = Clear Y = 0 For fila = 3 To numerodatos numeropedido = Hoja9.Cells(fila, 3).Value If UCase(numeropedido) Like "*" & Me.txt_pfiltro.Value & "*" Then Me.ListPedidos.AddItem Me.ListPedidos.List(Y, 0) = Hoja9.Cells(fila, 1).Value Me.ListPedidos.List(Y, 1) = Hoja9.Ce…

hola a todos: Tengo un inventario de equipos, el cual se tiene que actualizar diario, lo que quiero hacer es que mediante un buscador, buscar el equipo en todas las hojas existentes, seleccionarlo luego poder modificarlo y trasladarlo a la hoja que corresponde según el estado en que se encuentre o desee. Soy recontra novato en esto asi que quisiera saber si alguno de ustedes me podria dar una mano. Muchas gracias estare pendiente a alguna respuesta prueba.zip

Buenas noches Estimados, Vengo por ayuda. Ustedes van a decir vaya a un foro de access, pero no es que ya monte todo lo que necesitaba en excel y solo me hace falta una pequeñez en access. la siguiente macro que tengo para que me envie una informacion a access de un libro de excel solo me trae la primera hoja del libro no se como corregirla. adjunto el archivo pero esta es la descripcion. Archivo de Excel "Datos" Contiene las siguientes hojas: Hoja1 Manuel Hoja2 Alberto Hoja3 Datos Hoja4 Coy lo que deseo hacer es una macro en access que me traiga el contenido de cada hoja. Aunque esto deberia traerme un listado de nombres me supongo de una tabla de usuarios y …

Hola, Estoy intentando de adaptar una macro que tengo de otro proyecto y me da error "run-time 424 se requiere un objeto". He buscado información sobre el error en causa pero no me aclaro. Lo que pretendo, en la hoja "LISTADO" atraves de un TEXTBOX en cuanto voy escribiendo un nombre completo o parte de un nombre se me muestra solo la/las fila/s que se aproximan o contienen el nombre completo de la lista de base de datos que tengo en los rangos "B7:H10000". Tal como lo tengo ahora escribo en la celda "C4" el nombre completo y me marca en amarillo la parte de la fila que contiene dicho nombre. Si la lista es demasiado larga costara mucho en localizar la…

saludos nuevamente desde México estoy trabajando con una relacion, la cual quiero copiar en otra hoja la cual tiene unformato especifico y que lo realice la cantidad de meses que se establecen no tengo la menor idea de como empezar por lo que solicito su ayuda, por lo que adjunto el archivo de antemano muchas gracias CONCENTRADO DE SIMULACROS.xls

Buenas noches estimados espero estén bien Dentro del Formulario VTL (frmvtl) estan los TextBox 16, 17, 18, 19, 20, 21, 22 los cuales necesito que cuando contengan un valor cualquiera la macro los tome como 1 (TextBox<>””=1) y cuando los TextBox estén vacíos la macro los tome como 0 (TextBox=””=0) seria como usar la Función Contar de Excel, siendo así y conforme al funcionamiento de la Macro Calculo en el TextBox23 en la medida que se van introduciendo los datos el conteo o suma debe reflejarse de manera automática y simultánea en los Textbox 25, 27, 28, 29, de la siguiente manera: TextBox25 = TextBox16 +TextBox17+TextBox18+TextBox19+TextBox20+TextBox21+Tex…

Hola, veréis tengo una idea para ejecutar una macro que no se como resolverla. Me explico, tengo un libro con siete hojas de las que necesito eliminar, en cuatro de esas hojas, las filas en la que al menos una de sus celdas no tenga contenido. Hasta el momento lo vengo realizando con la macro: Sub EliminarRegVacios() ActiveSheet.Columns(ActiveCell.Column).SpecialCells(xlBlanks).EntireRow.Delete End Sub Pero el problema que me encuentro con esta macro es que tengo que ir hoja por hoja ejecutando la macro y mi idea es poder realizarlo en todas las hojas automáticamente de una sola vez. Además se da la circunstancia que una de las hojas no cumple la condición de …

Hola amig@s... Quiero hacer una macro en la que a partir de una seleccion de archivos de una lista, al precionar un botón localice un archivo, lo abrá, copie cierta información y lo pegue en una hoja de trabajo del mismo libro donde esta el botón. Si no encuentra el archivo, lo que quiero es que dé un mensaje que diga que el "Archivo no existe". Inicie con el siguiente código en casa y si funciona, pero en la oficina no abre el archivo, aun que la ruta sea correcta: Sub IMPORTAR_EDO_CTA() ' ' IMPORTAR EL ESTADO DE CUENTA DE UN CLIENTE DETERMINADO X = Range("M6").Value Nota: esta es la ubicación de la lista en la hoja de excel On Local Error Resume Next Workboo…

Hola Como podría guardar un archivo utilizando el contenido de una celda concreta. El tema es que tengo una plantilla que se irá actualizando en función de la introducción del DNI de la persona y quisiera que se grabara automáticamente según ese campo en concreto. gracias

Hola, Necesitaria saber como hacer que al clickar la pestaña de una hoja para cambiar de pantalla se me abra un MsgBox preguntando si estoy seguro de querer salir ya que al pasar a la hoja principal se me reinician todos los valores. Como lo puedo hacer? Muchas gracias

Buenos días amigos. Mi duda es la siguiente, necesitaría que en mi libro todas las filas de la derecha a las que he llamado salida se me ordenaran en base a las filas de la izquierda que son fijas, a las que he llamado entrada. Adjunto archivo 1 que es como se me cargan los datos y el archivo 2 que es como deberían quedar. Lo he intentado ordenando la parte de salida primero por MAT y luego por STD, pero no se como relacionarlo con la parte de entrada. Agradecería vuestra ayuda. Un saludo Lillo SABANA ORIGINAL1.xlsm SABANA ORIGINAL2.xlsm

Buenas tardes, Estoy a punto de finalizar el proyecto y tengo 2 pequeñas problemas que nos soy capaz de resolverlos. Os comento: 1ª - No consigo de evitar el parpadeo en la hoja "LISTADO" aun que para evitar el parpadeo debo de poner: Application.ScreenUpdating = False y al final Application.ScreenUpdating = True. 2º - Al ejecutar la macro introduciendo la fecha en la celda "K3" me tien que devolver los totale en la ultima fila como en la imagen adjunta. Adjunto el documento Muchas gracias por vuestra ayuda y perdonarme por ser pesado.. Saludios, Jose BREAKFAST LIST - evitar parpadeo y alinear suma total en fila unica - cop…

Buenas a todos, este es mi primer post, y lo primero decir que me parece un gran foro, con gente que controla mucho y tienes ganas de ayudar. Por eso, enhorabuena a toda la comunidad. Al grano con un problema que me tiene un poco loco: Primero decir que soy totalmente novato en vba y estoy haciendo una aplicacion simple para gestionar una tabla con datos, a modo de base de datos, para consulta con filtros predefinidos y posiblidad de impresion de reportes. Mi problema es con las fechas...tengo un listbox para las busquedas y desde esos datos filtrados saco el reporte (son 11 columnas), todo funciona correcto y me lo muestra dentro del control listbox perfectamente, p…

Buenas, me encuentro con el siguiente inconveniente: Tengo un archivo con diferentes hojas, las cuales quiero imprimir en PDF es un orden diferente, por lo cual cree un codigo para ello, donde puedo definir el orden de impresion segun se requiera, y asi mismo, seleccionar el rango de impresion. El problema que cuentro que es quiero que se genere un solo archivo PDF, con el codigo que desarrolle imprime N cantidad de archivos en PDF. Sub Imprimir() Dim Hoja As String Dim Rango As String Dim i As Integer Application.Dialogs(xlDialogPrinterSetup).Show For i = 1 To 5 Hoja = Worksheets("Print").Range("A" & i) Rango = Worksheets("Print").Range("B" & i) Workshe…

Hola a todos, He buscado para ver si había algo como lo que busco y si lo hay no lo encuentro. Lo que necesito es lo siguiente si el valor de la celda A1 esta entre 1 y 2 que la celda A2 cambie a verde. Se puede hacer. Muchas gracias

buenas tardes amigos¡¡¡ tengo un libro que diseñe en el que no ocupo las herramientas de excel ni la ventana solo las pestañas. hay manera de aplicar una macro para eliminar esta ventana. de manera que aparente un programa y no una hoja de excel. de antemano agradezco su ayuda.

Hola Masters, Soy nuevo en este foro y primero que nada los quiero felicitar por que ayudan muchísimo a las personas que vamos comenzando en este mundo de excel avanzado. Estoy construyendo una interfaz tomando como base algunos ejemplos que han subido al foro pero me he atorado en querer editar datos de mi listbox y que se actualice en la base de datos al dar clic en el botón "Guardar", espero que me puedan ayudar, les dejo mi excel. Saludos a todos y de nuevo GRACIAS!! Matriz KPI´s OK.xlsm

hola a todos tengo varios libros excel (son 40 en total uno por cada trabajador) de los cuales debo extraer algunos datos determinados y pasarlos a otro libro independiente. todos los libros son iguales en formato, solo cambia la informacion contenida en ellos. en cada libro existe una hoja por cada mes. (se podria preguntar antes de copiar los datos, que mes es el que se necesita ) adjunto archivos para que tengan una referencia. necesito extraer de cada libro: ejemplo. Macarena Jimenez : Total 40 horas actividad código 20122 proyecto 1: 20 horas total primera semana : 12 hrs total sagunda semana: 6 hrs actividad código 14133 proyecto 2: 20 horas …

Hola buenas, tengo una consulta alguien sabe algún código para crear una variable dentro de un for cambiando los nombres seria algo asi como col = 0 y = 10 For cell = 10 To 16 If Cells(y, 29) = True Then col = col + 1 ####criterio + col = dalomismo ## la idea es que se cree una variable llamada criterio1, criterio2, criterio3, hasta que termine el for End If y = y + 1 Next cell siento fallar en algo así pero no pude hacerlo se agradece cualquier ayuda, de antemano gracias

hola Gente, gracias por la respuesta antes que nada.. yo utilizo el citrix para las descargas y tránsitos marítimos.. encontré en el vba un controlador llamado ica client para citrix lo cual en teoría debería conectarme con el servidor citrix desde mi excel gracias a la ayuda de un userform... el tema que no puedo hacer que funcione me dice error del protocolo.. mi pregunta es como lo debería configurar para que me funcione? alguien posee alguna idea al respecto?? muchas gracias

Buenas a todos! Necesitaría hacer lo sisguiente. Tengo un libro TOTAL con una pestaña que se llama RESUMEN y es la suma de las pestañas RESUMEN de otros 5 libros que tengo. Como podría automatizar el cálculo con una macro?. El formato de la hoja de resumen es igual en todas es decir: la celda A1 del libro TOTAL = suma de celda A1 de mis cinco libros. Alguna sugerencia? Muchas gracias!