estimados(as) buenas tardes. acudo al foro para solicitarle su apoyo. modificar el siguiente formato al momento de digitar el código requiero que se llene automático el usuario y el N° de PDT asignado y al darle clic en salida se registre en el cuadro / y al devolver digitar el codigo y que automática mente se llene el ingreso. espero su apoyo para resolver el formato. Control de Salida e ingreso de PDTs.xls

Hola como están, una pregunta para los capos de Macros Bueno yo estoy trabajando con una tabla con formulas(que es mi objeto) y tengo una macro que busca insertar/eliminar filas y columnas de este objeto dependiendo de ciertos valores Declaro lo siguiente: Sub ActualizarTabla() Dim f&, c&, oldRows&, newRows&, oldColumns&, newColumns& f = Range("H1") c = Range("H2") With ListObjects(1) oldRows = .Range.Rows.Count oldColumns = .Range.Columns.Count newRows = f + 1 newColumns = c + 1 newRows = Application.Max(3, newRows) .Resize .Range.Resize(newRows, newColumns) If newRows < oldRows Then .Range.Offset(newRows).Resize…

Muy buenas a todos, os cuento por temas de clase necesito crearme una agenda personal para aclararme con los horarios y demás historias. De momento llevo algunas funciones hechas pero con las otras no ha habido manera. Las que me faltan son: -Copiar la hoja oculta en la nueva hoja que se cree. -Poner las fechas correspondientes según el mes en las casilla de color amarillo (en el ejemplo dejo las fechas del mes de enero de 2016) -Seleccionar esta "Estructura con las fechas" Y copiarla tantas veces como se indique en el textbox dentro de la hoja nueva (En el ejemplo resultado se encuentra hecho uno con 5 copias) no se si será posible que Excel VBA detecte las celdas…

HOLA, SOY NUEVO EN ESTO DE LA PROGRAMACION VBA, NECESITO ME AYUDEN CON UNA MACRO QUE OCULTE LAS COLUMNAS SELECCIONADAS SEGUN LA CASILLA DE VERIFICACION QUE SELECCIONO, POR EJEMPLO SI SELECCIONO LAS CASILLA 1 ME MUESTRE SOLO LA COLUMNA "C" SI LA DELECCIONO ME MUESTRE TODAS LAS COLUMNAS , SI SELECCIONO LA CASILLA 2 ME MUESTRE SOLO LA COLUMNA "H" AL DELECCIONAR ME MUESTRE TODAS LAS COLUMNAS , SI SELECCIONO LA CASILLA 3 ME MUESTRE LA COLUMNA "F" AL DELECCIONAR ME MUESTRE TODAS LAS COLUMNAS, PERO SI TENGO SELECCIONADO LAS CASILLAS 1 Y 2 ME MUESTRE LAS COLUMNAS C"" Y "H", Y ASI CON TODAS LAS COMBINACIONES POSIBLES..................................LES AGRADEZCO DE ANTEMANO POR…

Buen día... hoy les escribo con el ánimo que me puedan brindar una ayuda con mi siguiente duda, la cual deseo solucionar mediante una macro vba... La idea es la siguiente... Tengo en C:\ creada una carpeta y esta contiene varios archivos los cuales son unos backups... deseo que sin necesidad que estos archivos estén abiertos o que los abra, pueda buscar un texto especifico, el cual esta en un formulario en un TextBox, y que a la vuelta me devuelva el nombre del archivo, en lo posible que sea un hipervínculo para abrir el archivo en donde se encuentra dicho texto (Label) y si no lo encuentra pues que se indique mediante un mensaje. Faltaba indicarles que dicho Formulario …

Buenas tardes. Tengo una plantilla con la que controlo todas las facturas de mi empresa . Realice una macro para que comprobara si la factura que intento registraR estaba ya en los listados. El caso es que lo hace bien hasta cierto punto. Por un lado no se porque si el numero de factura es muy pequeño del estilo de "1" ó "20" ó "100", lo confunde con cualquier otra factura que contenga esas cifras y la da por registrada (hasta ahora lo solucionaba poniendo un pequeño guion al final del nº de factura, pero no es una solución factible.) Por otro lado si varios proveedores tienen el mismo número de factura también la da por registrada. No se como hacer para que al mismo…

Buena tarde, tengo este código que me abre un archivo que cambia de nombre todos los días, pero contiene los mismos campos que requiere la Macro. Lo que no puedo es cerrar el archivo, ya que el nombre de este archivo cambia cada día. Application.ScreenUpdating = False Dim Mensaje, Estilo, Título, Ayuda, Ctxt, Respuesta, MiCadena Mensaje = "CARGAR ATCON DEL DIA" Estilo = vbYesNo + vbCritical + vbDefaultButton2 Título = "Datos" Respuesta = MsgBox(Mensaje, Estilo, Título) If Respuesta = vbYes Then NombreArchivo = ActiveWorkbook.Name ArchivoAAbrir = Application.GetOpenFilename("atcon_YYYYMMDD (*), *") If ArchivoAAbrir = False Then Sheets(1).S…

Buen día, Necesito organizar una base de datos de municipios que está organizada : Municipio Subtotal Categorias de superficie 1 Categorías de superficie 2 Necesito que quede: Municipio Categoría superficie 1 Municipio Categoría superficie 2 Eliminando los subtotales. Adjunto envío una muestra de los datos. Espero puedan ayudarme. Gracias municipios.xls

Hola amigos capos de la programación: En primer lugar felices fiestas y muchas bendiciones. En segundo lugar viene lo bueno, miren les adjunto mi archivo de excel, donde estuve aplicando las enseñanzas de Cacho R., pero me encuentro con un problemita, en realidad no se si es problema pero si quisiera saber si se puede hacer. En el archivo especifico lo que quisiera hacer. Les explico yo tengo una macro que a travez de un formulario ingreso datos, al momento de consultar los datos, se abre una ventana de internet explorer con el resultado, que es un codigo, yo quisiera saber si es posible extraer ese codigo a una celda de excel sin abrir el internet explorer, saber si e…

Hola Chicos; tengo echo un Acumulador, pero mi problema es que quiero que la celda que actúa, sea con una condición. Es decir, que la celda A1, haya una fórmula. y que actúe después el Acumulador. Si en la Celda A1, le meto un Valor, el Acumulador si funciona, pero quería hacerlo a través de una formula Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then Range("B1").Value = Range("B1").Value + Range("A1").Value End If Un Saludo Teo Acumulador.rar

Hola estoy intentando hacer una macro para descargar unos datos de una web, con este comando, .Open "GET", URL del sitio , False El programa me funciona, pero quiero hacer que la url la coja, de una celda de la hoja de calculo, y no ponerla fija en el código, suponiendo que la web es mipagina.es/folder/123 En la celda de la hoja de calculo, solo se tendría que cambiar el ultimo numero, 123. El resto de la url es constante para todas las consultas.

Hola a tod@s. Tengo una aplicación muy sencilla aparentemente que no se como terminar y espero que alguien pueda arrojarme algo de luz. Tengo una Tabla dinámica con unas columnas y quiero cargar los datos de dos columnas desde un Formulario. Una de estas columnas es una Fecha y el problema es que al copiar el TextBox de fecha en la casilla correspondiente, no me reconoce el formato de Fecha. He mirado en muchos foros y probado múltiples posibilidades (hasta trocear la fecha en día, mes y hora y luego "pegarlas" de nuevo, he probado con el comando Format, etc y no hay solución. cunado me refiero a que no me reconoce la fecha es que cuando meto la fecha con el Formulari…

hola tal como dice el titulo es posible pasar una imagen/shape de una hoja a otra sin utilizar copiar pegar, es una lastima tener que borrar el contendió del portapales y no parece una solución muy adecuada.

Hola amigos foreros, tengo un problema en mi formulario con la opcion buscar, que me lanza un error y no doy con el problema, espero y agradezco su estimada colaboracion, gracias. Saludos Personal.rar

Buenos dias, Estoy tratando de crear una macro que me produzca un indice que me linkee ubicaciones diferentes en una misma hoja. No logro que funcione y en internet encuentro ejemplos pero solo linkeando una misma ubicacion en diferentes hojas. En base a un ejemplo que crea un indice de diferentes hojas he estado tratando de realizar la macro pero no lo puedo lograr. El codigo es el siguiente: Sub Crear_Indice_Hojas() Fila = 1 For Each Hoja In Worksheets ' Agregar vinculo a cada hoja del mes If Hoja.Name <> "Indice" Then With Worksheets("Indice") .Hyperlinks.Add Anchor:=.Cells(Fila, 1), Address:="", _ SubAddress:=H…

Estimados, les quiero consultar por un problema que tengo con un codigo. El tema es que cuando utilizo ActiveSheet.Unprotect y ActiveSheet.Protect me produce un error y no se bloquean las celdas programadas. Les subo el archivo con el codigo para ver si me pueden ayudar. Saludos y gracias!! Asistencia (Macro).rar

Buenas tardes desde México Ayuda Excel. primero que nada un FELIZ AÑO y los mejores deseos de Paz y Prosperidad a todos. En esta ocacion tengo el siguiente problema, el cual no se como resolverlo, se trata de realizar un buscador en la pestaña entradas, este buscador tiene que buscar todos los registros que aparescan con el mismo numero de pedido, como se puede apreciar en el userform4 y en el area de resultados mostrar toda la informacion correspondiente, he tratado de realizar el codigo pero no encuentro la manera de que esto funcione ,el formulario debe ser similar al que aparece en la pestaña base modelos al presionar el boton consultar pero desconozco como se pued…

Buenas tardes, mi duda es que tengo una Base de Datos y un formulario hecho en otra hoja de calculo, ahi puedo seleccionar un número de referencia y segun eso aparecen los datos en el formulario, quiero que se guarde una imagen por cada Número de referencia que tenga la Base de Datos, que son unas 1000 aproximadamente, tengo ya hcha una macro pero solo guarda una a la vez, lo que quisiera es que tenga un botón que al seleccionarlo guarde las aprox 1000 imagenes de todos los "num. de referencia" con sus respectivos datos y la imagen ActiveX que apareciera, en el que he echo lo hace 1 a la vez, pero lo hace en mala calidad, eso tambien es un problema. BD-Inmuebles.zip

Hola gente tengo un problema con esta macro, lo que quiero hacer es que los gráficos que tengo en excel se copien en un PowerPontl ya activo, y estos gráficos se vayan copiando en cada diapositiva diferente..... Luego de esta linea de código ( PPSlide.Shapes.Paste ) debería hacer algo para que vaya iterando las diapositivas, pero todo lo que pruebo me tira error,. ayuda por favor ... Sub ExcelToExistingPowerPoint() Dim PPApp As PowerPoint.Application Dim PPPres As PowerPoint.Presentation Dim PPSlide As PowerPoint.Slide ' Reference instance of PowerPoint On Error Resume Next ' Check whether PowerPoint is running Set PPApp = GetObject(, "PowerPoint.Application") If…

Hola a todos. He tratado de añadir una nueva condicion a mi codigo de combinaciones pero en cada intento, solo saco errores, o no produce ningun resultado. Este codigo produce una lista de combinaciones de 6 numeros y puedo controlar cuantos primos y pares como tambien la suma de cada combinacion. La condicion que deseo añadir ahora es Columna "Q" - col "L" si el resultado esta comprendido entre los numeros minimo de la celda E9 y el maximo de la celda E10 entonces mostrar la combinacion, de lo contrario no mostrarla. La lista de combinaciones esta en el sheet2, y el modulo es el 1. Quiero ser un poco mas claro, para poder recibir ayuda. VARIABLES. minV = valor mini…

Hola Amigos, les comento el problema. Estoy realizando este documento-proyecto, en el cual tengo en la hoja "Datos citas" el historial de citas de c/cliente. Lo que necesito es que a partir de un UserForm este seleccione datos del historia, y copie/filtre en otra hoja llamada "Estadistica". Adjunto el archivo. Gracias checo_10 SeguimientoCClientes_desm.zip

Hola Buenas. Por lo que he podido informarme de lo que necesito veo que es una macro, mezcla de combinar números y coincidencias, de lo cual en macros salvo meterla en un módulo hecha ya y crear el botón en hoja para ejecutar poco más. Bueno explico lo más resumido que puedo de lo que se trata en el libro que subo. Como ejemplo, en columnas naranja Q: AN celdas en blanco 2, 8, 9,10 a su vez en columnas azules AQ: BN fila 5 debajo de sus encabezados correspondientes las veces que se repite la cadena de 4 números en columnas naranja Q: AN O sea se trata de buscar las coincidencias POR FILAS en Q: AN a bloques o grupos de 4 números y reflejar el resumen de estos en colu…

Buenos dias, mi consulta es: tengo una Base de Datos (de planetas del sistema solar) en Excel, cuando actualizo los datos del excel tambien quiero que se actualize los datos de esa tabla en Power Point, es eso posible?. Que se creen tantas diapositivas como planetas agrege en la bd con las mismas caracteristicas. Gracias. BD_Sist_Solar.zip

Buenos dias, mi problema es: tengo 2 hojas, en la 1 hoja tengo una tabla con 5 campoa (Cod, Nom, Apell, Area, Pais) con datos, en la 2° tengo un buscador, coloco el codigo y me aparecen los demas datos segun la tabla1, ademas aparece la imagen de la bandera del pais segun el que aparesca del filtro (B7). Lo que sucede es que no aparece la bandera cuando escribo un codigo en el filtro, pero he probado escribiendo el pais aparte y modificando el codigo que hice y asi si funciona. ¿Como podria hacer que al actualizarse el buscador tambien se actualize la imagen de la bandera?. Ademas las imagenes de las banderas tienen el mismo nombre que en la tabla, pero los espacios en bl…

hola amigo de ayuda exel les comento trabajo en un acceso a una mina, y por ganas de hacer el trabajo mas ameno y mas llamativo. una de las mociones en mi trabajo es tener registro de todos los buses que ingresan y salen de la mina y dejar registro de pasajero, patentes, numero de maquina, hora de ingreso y salida, destino dentro de la mina, empresa, les comento esto para que se agan una idea en el contexto que quiero su ayuda: quisiera que me ayudaran con un código VB que capture la información y la derive a una hoja en un orden determinado, e creado las siguientes hojas principal, informes , datos y listas donde en la principal se capturaran los datos y serán envia…