Estimadisimos amigos del foro: Estoy creando una planilla para controlar avance de una construcción, necesito solucionar el siguiente problema. En la comuna E tengo las fechas de cada día de trabajo. y al lado de cada fecha, tengo campos como avance, rendimiento, etc.. Lo que quiero hacer es que al principio de la hoja (digamos, celda M35), uno pueda escribir la fecha que quiere revisar, y al apretar enter (o pulsar un boton), una macro busque la fecha indicada en la columna B, y si encuentra tal fecha, la seleccione. Esto para que cada día que se quiera ingresar un avance, no halla que navegar para encontrar la fila correspondiente al día que se quiere rellenar, sino…

Buenas tardes, Tengo una macro que me combina por medio de marcadores algunos campos de excel a word hasta ahí todo perfecto, solo que quiero que al momento de ejecutar la macro me cargue los campos y automaticamente me lo mande a imprimir el documento en word sin guardar los cambios Espero haber sido lo mas claro posible Saludos,

Hola buenas tardes ojala haya alguien que me pueda ayudar, tengo un archivo en el cual tengo un Userform que realiza vaciado de datos en las celdas que indíco y asu vez cálculos. Pero al finalizar no me toma llamar Call Condicional_Else2, cada que pongo otra condición al finalizar no la toma en cuenta. cual será el problema en esta macro?. Saludos. Sheets("Factura Carta").Activate Range("C23:M36").Select Selection.ClearContents Range("C23").Select ActiveCell.Offset(0, 0).Value = UserForm14.TextBox2 ActiveCell.Offset(0, 2).Value = UserForm14.TextBox3 ActiveCell.Offset(0, 3).Value = UserForm14.TextBox4 Range("C24").Select ActiveCell.Offset(0, 0).Value = UserForm14…

Buenas. noches , nesecito copiar datos de excel a acces. como lo hago ?

Hola amigos, ayuda con este código If Application.WorksheetFunction.Match(Cells(3, 2), Worksheets("Datos").Range("B:B"), 0) Then Sheets("Hoja3").Cells("B1").Copy Range("I:I").PasteSpecial xlPasteAll End If :smug: :smug::topsy_turvy:

hola !!!, necesito hacer una macro que me identifique cuales vendedores fueron reclutados (vendedor recluta) por otros vendedores (vendedor reclutador) con el proposito de que al vendedor reclutador se le pague una commission por las ventas que haga el vendedor recluta. esto se hara tomando en cuenta lo siguientes: 1- cada vendedor (ya sea recluta o reclutador) tiene un libro individual donde en la hoja llamada hoja de volumen se ponen todas las ventas que este haga y en la hoja llamada programa de reclutamiento se ponen cada una de las personas que el vendedor recluto con una tabla para agregar una letra de la palabra royalprestige cada ves que uno se sus vendedores recl…

Hola. Lo primero felicitar a tod@s por la ayuda prestada. Os cuento, he estado buscando en el foro si ya había alguna respuesta a mi consulta y, la verdad, es que hay unas cuentas pero todas con alguna variedad que me hacen perderme un poco (o bastante..) por lo que pido disculpas si este tema ya ha sido solucionado antes. En fin, lo que necesito, como bien dice el título, es pasar los datos diariamente desde un pestaña que uso como "cajón" para introducir los datos, a la pestaña definitiva desde donde luego uso dicha información. Como los datos se van acumulando, dicha macro deberá ir siempre a la primera fila vacía. Adjunto ejemplo. Un poco de ayuda, por favor. Much…

Hola buen dia. Es priemra vez queparticipo en algun tipo de foro. Busco ayuda con un formulario, que diseño uno de los botones no hace loque deberia segun yo. Explico: Una vez Abierto el archivo filtro en la celda T con titulo Assigned to El nombre de Nancy Urrieta. Selecciona la celda A7 y doy clic en boton Details Oprimo boton Nex Inv > esto despliega la info de la misma persona de las celdas activas y funciona bien Cuando oprimo el boton Assigned to, no regresa Deseo que cuando oprima Nex Inv haga lo que ya hace pero de donde se quede la celda activa pueda con el boton < Prev Inv regresar y despliege los datos. He utilizado Range(Selection, Select…

Hola amigos primeramente gracias por aceptarme en este foro, soy nuevo tengo un problema con una planilla de sueldos en una hoja de calculo pero quiero automatizarla y crear un comprobante de pago de cada uno de manera que al ingresar un dato me vaya creando cada comprobante para cada uno... gracias y espero me ayuden Junio 2013.xls

Buenas, y ante todo gracias de antemano y disculpas si el tema que busco ya se habia tratado, pero no ha habido manera de encontra la solución. Tengo un archivo Excel para controlar entradas y salidas de materiales: en una hoja tengo productos y en otra ("Stock"), tengo el stock, aparte de tener una de entradas y salidas claro. Bien, lo que busco es que desde la hoja de Productos, y a traves de un formulario, pueda minimizar la fila el producto que yo introduzca en TextBox1 en las dos hojas: Productos y Stock. He de decir, que consigo hacer que se minimize en la hoja productos, pero no consigo ni siquiera que en Stock me llegue a escribir un simple "hola" en una celda …

Buenas noches a todos!! Tengo un archivo en Excel con unos 2500 contactos (nombre y apellidos, teléfono móvil, TFNO fijo y el email. Lo que necesitaría es poder abrir dicha carpeta de contactos en Excel y poder crear diferentes grupos de cintactos(150 en cada carpeta). Lo ideal sería que crease automáticamente carpetas con 150 contactos en cada una y que se pudiesen guardar fuera de dicho Excel. La idea es poder luego importarla por carpetas al outlook (cada carpeta de 150 contactos). Gracias amigos

Saludos a toda la comunidad mi problema es el siguiente: Tengo dos celdas con los valores siguientes tiempo1 = 00:01:30 y tiempo2 = 00:09:00 donde tiempo1 va en aumento y tiempo2 es fijado por el usuario quiero realizar un macro en que el compare dichos valores y en el momento en que tiempo1 sea igual a tiempo2 me mande un mensaje avisandome que el tiempo es igual o si se pudiera una alarma sonora espero su respuesta de antemano gracias

ola a todos espero puedan ayudarme... e realizado un formulario para consultar mi inventario con diferentes criterio mediante combobox, y me funciona perfectamente.... lo q quiero q me ayuden es en el combo de fecha... quiero filtrar las vacias... me explico en la columna de fecha tengo celdas q estan con una fecha determinada y tambien hay celdas q estan vacias... ojo las hojas estan totalmente ocultas.... saludos INVENTARIO DE PIERRE DUCASSE-ULTIMO.part1.rar INVENTARIO DE PIERRE DUCASSE-ULTIMO.part2.rar INVENTARIO DE PIERRE DUCASSE-ULTIMO.part3.rar INVENTARIO DE PIERRE DUCASSE-ULTIMO.part4.rar

Al ejecutar esta macro sobre los datos de la hoja1 funciona perfectamente, sinembargo requiero modificar la coneccion o asignacion de variables deforma que al convertir los datos de la Hoja1 en una Tabla Ver Hoja"TABLA" a la que denomino por el administrador de nombres "TDatos" sea posible ejecutar la misma consulta. anexo la consulta inicial sobre los datos de la hoja1 que entrega el resultado en la hoja2 " Sub ConectarExcel()" y abajo la correspondiente sobre los datos en la hojaTabla en la que el mensaje es que no encuentra el objeto "TDatos". el archivo es Xls dado que no pude subir el xlsm Gracias Sub ConectarExcel() Dim Conexión As Object, rs As Object Set Conex…

Hola. He visto que han ayudado a un usuario. De hecho me resulto muy interesante y satisfactorio el resultado obtenido. Sucede que estoy buscando como adaptarlo a mi plantilla pero no logro hacerlo. Quisiera restringir el acceso a todas las hojas que contiene el libro, con una contraseña que permita únicamente la lectura. Claro tener una contraseña como administrador que permita el control total. Quisiera saber si pueden ayudarme, pues he tenido muy buenas referencias de esta pagina. El archivo que pudieron resolverlo se llama, "Presencia" pero no puedo adjuntarlo. Les adjunto mi archivo para ver si pueden adecuar lo que necesito. BBDD BBDD1.xls

Hola a todos, tengo la siguiente parte de una macro y solicito su ayuda: nombre=prueba.xslx 'creo un objeto: Set XL = CreateObject("Excel.Application") XL.Visible = True 'creo un nuevo libro llamado "prueba", cierro el archivo Workbooks.Add ActiveWorkbook.SaveAs nombre, -4143 ActiveWorkbook.Close 'abro con XL el libro creado XL.Workbooks.Open "prueba.xslx" 'Selecciono la celda "a1" en el archivo prueba creado, hasta aquí no hay problema XL.Workbooks(nombre).Sheets(1).Range("a1", "a1").Select 'aqui está el problema pues al ejecutar estos comandos, estos se ejecutan en el libro desde el que corro la macro 'lo que necesito es que corran desde el nuevo libro "pr…

Desde ya gracias por su ayuda, necesito consultarles una duda acerca del funcionamiento de las tablas dinámicas con macros. Tengo que buscar una fila especifica dentro de una tabla dinámica con una macro, por ejemplo tengo una tabla dinámica que tiene como etiqueta de fila fechas, por lo tanto me muestra una lista de fechas y yo quiero recorrer la lista de fechas hasta encontrar una especifica y luego tomar el valor de algún valor que quiera en la misma fila. También les agradecería si pueden guiarme con algunos manuales o ejemplos donde pueda ver el funcionamiento de las tablas dinámicas con macros, no crear tablas sino operar con las mismas dentro de una macro, por ej…

Hola buenas noches a todos/as. Desde hace mucho tiempo he buscado la manera de crear una macro que me solucione lo siguiente. En mi trabajo utilizo un aplicativo de internet explorer. Me muestra en una tabla hora a hora datos de ventas, asesores, etc, etc. Necesito que mediante una macro, se pueda copiar y pegar esta información a una hoja de un libro específico de excel. Cabe recordar que: - No puedo acceder a ninguna base de datos SQL o similar por permisos. - Necesito que solamente, me abra la pagina y me copie y pegue la información de ser posible. - Siempre la información de internet está bajo la misma estructura. Muchas gracias y espero que tenga solución

Buenas: Resulta que tengo un libro que es el principal que al ingresar en M5 una fecha Ej 04-02-2013 en el libro Principal y me toma solo el año y se va a buscar el libro 2013.xlsx a la ruta indicada quiero que en el momento que abra el libro 2013.xlsx me filtre los datos desde el 01-02-2013 hasta 28-02-2013 que estan en la hoja1 y los copie en la hoja12 que se llama Base datos del Libro Principal con los datos ya filtrados.. Libro en red 2013.xlsx Hoja1 A1 B1 01-01-2013 1 ... 15-01-2013 2 ... 31-01-2013 3 01-02.2013 4 02-02-2013 2 ... 28-02-2013 1 y asi va creciendo Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) Dim l1 …

Como poner hora y fecha en otras celdas Buenas tardes, qusiera ver quien puede ayudarme con esta situacion, en la siguiente sentencia, estoy pidiendo que cuando se escriba algo en la celda B41:B90, en las celdas E y F, me ponga fecha y hora respectivamente, pero no se pone al menos que borre datos( aunque no los hay en la celda , yo quiero que al aparecer los datois que se ponen en la celda B41, automaticamente me aparescan los datos en las celdas E y F. Esta es la sentencia que yo estoy usando: Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("B41:B90"))" Is Nothing Then" Range("E" & Target.Row) = Date …

necesito cargar los datos de una columna "v3:v42" (sin los ceros)a otra hoja(inventario).He intentado varias cosas pero no me funcionaron x ejemp: formato de celdas---->personalizada y escribir Escribe "0;-0;;@", sin las comillas, en la caja "Tipo". Me di cuenta que solo los ocultaba. por favor necesito una macro que" borren los ceros " que puedan aparecer en ese rango(solo eso),ya que los datos los cargo a un inventario a travez de una macro.

Mi problema es el siguiente en una hoja de excel llamada concentrado debo guardar los datos originales de cada uno de los conceptos que columna por columna ponga en cada fila ,y despues mandar esa fila ingresada a otra hoja especifica ( llamese cualquier nombre) pero sin afectar el concentrado. El concentrado se queda para consulta general y los datos copiados de cada hoja para saber las cosas por una zona especifica, tal vez con un boton que me genere el registro. La fila lleva un consecutivo hacia abajo con una condicion que identifique a que hoja copiara la informacion Ojala puedan ayudarme ya que mis conocimientos no son los idoneos y aunque hay programas ya hec…

Estoy creando una macro donde se ajecuta cada ves que cambio el valor a una celda, lo que nesicito saber es que debo poner al final para que al terminar la macro siga a la sigientes celda activa ya que hasta ahora solo me queda selecionado el grafico. gracias

Hola a todos.Estoy programando una macro en Excel para listar los números de los puertos serie disponibles de mi pc (COM1, COM4, COM14, etc.). he intentado con este código Dim TotalPuertos Application.COMAddIns.Update TotalPuertos = Application.COMAddIns.Count ComboBox1.Clear For i = 1 To TotalPuertos ComboBox1.AddItem Application.COMAddIns(i) Next i Pero no soy capaz de que me salga como COM1, COM4, COM14, etc. o incluso como 1, 4, 14, etc. ¿Alguna idea? Saludos

SOS, estoy desesperada leyendo y leyendo en mil paginas y no consigo resolver mi duda. Tengo un documento word que utilizo a modo plantilla (pero es .doc) y en excel tengo un botón que al presionar quiero que copie el documento word, le cambie el nombre y escriba los valores de ciertas celdas en un sitio determinado. Todo me funciona ok con marcadores de word, excepto para poner una tabla excel en un sitio determinado del word. Este es el código que tengo. nGracias por la ayuda porque de verdad ya no se que hacer. muchísimas gracias!!! Private Sub boton1_Click() Dim aDOC As Object Dim varA As String, fs As Object Dim fichero As String vruta_0 = "c:\prueba\"…