MACROS DE UN LIBRO A OTRO por VíctorVargas » 05 Jun 2014 12:59 Hola a todos: Porfa necesito ayuda con esto, es para mi empresa y hace rato estoy estancado en esto. He intentado de muchas formas, me funciona la primera vez, pero al cerrar uno de los libros me sale error. Lo que necesito es saber como puedo hacer una macro que copie celdas de un libro a otro libro. Ojalá me ayuden, gracias!! MACROS DE UN LIBRO A OTRO por VíctorVargas » 05 Jun 2014 12:59

Buenas tardes; El el excel adjunto tengo una tabla de datos y cómo me gustaría que pasara a tabla dinámica. El caso es que como es un proceso que voy a generar semanalmente, lo quisiera automatizar mediante una macro. Grabo la macro, pero siempre tengo algún error que con consigo solventar. ¿Podrían ayudarme, por favor? Muchas gracias. Adjunto el "Visual Basic" (.txt) de la macro que intento generar: Furbo.txt Cuestion2.xlsx

Hola buen día, tengo el siguiente caso: Tengo dos libros, en uno hay una hoja que se llama calculo, y tiene una serie de datos, y en otro libro tengo un hoja PF_OO que se alimenta de los datos de calculo. Para automatizar este proceso necesito una macro que me permita llenar PF_OO con la hoja calculo que este abierta (no siempre es la misma, en diferentes libros hay hojas llamada calculo), por lo que necesito que mi hoja PF_OO identifique que hoja calculo esta abierta y de allí copie los datos, el problema también esta en que voy a generar PF_OO, PF_01, PF_02, y cuantas se necesiten. por ejemplo necesitare que se llene PF_OO con "calculo" que esta abierta en primera co…

cordial saludo tengo el siguiente código para minimizar un formulario: Option Explicit ' Declaración de variantes para los botones de maximizar y minimizar 'para OS 34 bits 'Private Declare Function FindWindow Lib "User32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long 'Private Declare Function SetWindowLong Lib "User32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long 'Private Declare Function GetWindowLong Lib "User32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long 'Private Const WS_MINIMIZEBOX As Long = &H20000 'Private Const WS_MAXIMIZEBOX …

Buenas noches, quisiera que me ayuden con lo siguiente. Necesito una macro para poder poner un mensaje de derecho de autor en la barra de estado de un libro de Excel (En la parte inferior). Ejm. Hecho por Edu..... He intentado con esta macro pero no me sale el mensaje Private Sub Worbook_open() Application.DisplayStatusBar = True Application.StatusBar = "Hecho por Edu" End Sub Nota. El mensaje que quede permanente y nadie pueda borrarlo.

Buenos días, A ver si pueden ayudarme: 1. Tengo un excel con un listado de links en la columna f 2. Necesito una macro que vaya abriendo cada link e importando el contenido de cada página a otro excel que se guardará en una carpeta denominada descargas 3. La idea es que se haga con un bucle y vaya link por link importando el contenido de cada página a un nuevo excel cuyo nombre será el de la columna 2 de esa misma fila del excel principal donde están los links. Muchas gracias EXCEL_PRINCIPAL.xls

Buenos días, Es mi primera intervención en el foro, soy un usuario de excel bastante avanzado pero es ahora cuando estoy descubriendo las amplias posibilidades que ofrece VBA, y en esto me estáis ayudando un montón, así que gracias! Mi duda es: quiero hacer una macro que mediante un popup (userform) me permita desbloquear la hoja introduciendo la contraseña, y luego siga haciendo cosas con otros pupups que salen. Hasta aquí todo ok, el problema está cuando se mete la contraseña incorrecta, que se rompe la macro. Cómo podría hacer para que si se introduce una contraseña que no es correcta, entre en un loop solicitando que se introduzca la contraseña correcta, hasta que s…

Cordial saludo, Hola a todos, alguien me podría colaborar, todos los días lleno una bitacota el cual tengo dos cloumnas la A "fecha de evento" y la B "fecha solucion", he investido la función de DTPicker el caso es que no se como crear un macro con DTPicker seleccione la fecja y la hora y que me la inserten una sola celda, ejemplo(06/10/2013 08:14:00 pm) con DTPicker. pero que sea con macro de selecion. Alguien me podria ayduar como hacer el metodo de como insertar y seleccionar con DTPicker. Muchas gracias a toda la comunidad. Dios los bendiga!

Buenos días A todos Hice esta hoja pequeña macro para elaboración de cheques en una impresora epson L220 normal la intención de esta es para no hacer los cheques manuales si no en una impresora cualquiera, como verán en la macro esta una hoja que se llama cheque si le dan imprimir se emprime únicamente la información del cheque y si le dan generar hace una copia del cheque asignando como nombre el numero de cheque en referencia ahora si se posicionan en la nueva copia que se genera para vaucher y le dan imprimir imprime todo el vaucher hasta aquí esta bien pero lo que deseo es que me ayuden hacerle cambios, en la macro esta la hoja 1 esta la información de algunas…

Hola chicos tengo un problema con un formato, en el archivo adjunto lo que pasa esque se me baja la informacion de esa celda con algun tipo de caracter especial o con tabs dentro de el, me di cuenta porque al hacer un text to column para convertir a texto la celda me remplaza sobre la siguiente. He tratado de quitar ese caracter o tab con la formula trim, clean o substitute y funciona pero cuando le doy a la celda copy paste special - values para quitar la formula que hice me lo vuelve a poner en el estado original con ese caracter. Gracias por cualquir sugerencia Espacios.zip

Hola, quiero crear una macro que haga lo siguiente: Tengo un rango de celdas (A1 - C34) en la hoja1 con una formula de condición en la cual, si es mayor que 0 me pone el numero (del 1 al 9) en función del rango A1 - c34 de la hoja2, si el numero es cero entonces no me pone nada (""). La macro que quiero crear es que me convierta a valores el rango (A1 - C34) en la hoja1 y despues elimine las celdas dentro del rango (A1 - C34) en la hoja1 las cuales no contengan informacion (""). Me puedes ayudar por favor?

Hola buena tarde, estoy tratando de hacer una macro para eliminar filas que con base en la celda que contiene la hora , si estas horas estan fueran de los rangos se eliminen, es decir tengo registro durante todo el dia pero lo únicos válidos son de 06:00:00 a.m. a 09:31:00 a.m. y de 06:00:00 p.m. a 9:31-.00 p.m todo lo demas se elimine, pero no encuento la forma correcta, algunas ayudas hablan de formatos condicionales especificamente xlentre, pero por mas que busco no encuentro, agradezco.

Hola a todos, quisiera solicitar su ayuda con un problema que tengo generalmente trabajo con varios archivos de excel que me envían por el trabajo y muchos vienen con filas y columnas en blanco entre medio de los datos, por lo cual busque en Internet unos códigos para eliminar filas y columnas vacías lo cual funciona el problema es como. Me explico las macros que encontré que son dos independientes y esta bien por que algunas veces elimino solo las filas y otras las columnas el detalle es que buscan hasta la ultima fila y columna lo cual hace que el computador se me pegue y tengo que esperar que termine para poder seguir trabajando pero algunas veces el tiempo es demasiad…

Eliminar una carpeta cuyo nombre lo tengo en la celda A1 Gracias anticipadas por la ayuda

Buenas tardes. Me podrían apoyar por favor en darme una guía de como puedo obtener lo siguiente: tengo una macro que recorre la fila 1 hasta el último dato.. ejemplo A1 hasta AA1. Lo que trato de hacer es que si el valor es mayor a 3 letras entonces me limpie el contenido, pero cuando se encuentra con celdas combinadas me marca error. No puedo eliminar las celdas combinadas, porque me descuadraría mi archivo. Sub Eliminar_texto() Dim lc As Long, col As Long lc = Cells(1, Columns.Count).End(xlToLeft).Column For col = 1 To lc If Len(Cells(1, col).Value > 3) Then Cells(1, col).ClearContents Next End Sub Gracias por la ayuda y su tiempo. ☺️ MiEje…

Buenas tardes...ésto si que es un reto, llevo semanas dandome cabezazos contra el monitor, supongo pq seré muy torpe. a ver quien me puede ayudar. He creado una macro que introduce unos numeros de cartera en una ficha q desps me guarda en pdf.. el codigo es asi... Range("C1:E1").Select ActiveCell.FormulaR1C1 = "NÚMERO CARTERA" Range("C2").Select ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Documents and Settings\USUARIO\Desktop\pdf\NOMBRE ARCHIVO 00.pdf", Quality:= _ xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _ OpenAfterPublish:=False ...ésto se repetiria para cada numero y archivo por lo que es muy…

Muy Buenas, bueno por molestarles una vez mas, ya que he tratado de realizar un Complemento(.xlam) que me permita ejecutar una macro en cualquier libro. En ocasiones anteriores dos personas me ayudaron con la duda que tenia(Cambiar color de celda - modificado). La cual consistía en cambiar de color una celda que modificara. Pero se lo podía realizar únicamente colocando el código en una hoja en concreto: Private Sub Worksheet_Change(ByVal Target As Range) Target.Interior.ColorIndex = 6 End Sub Pero deseo utilizar esta macro desde el complemento. En el he creado un Checkbox donde debería permitirme activar o desactivar dicha macro. Pero no lo he logrado, y es ahí dond…

Hola: Es posible utilizar una macro que tenemos creada, pero que no esta en el archivo abierto donde se trabaja. Gracias,

amm alguien me podria ayudar para hacer una macro que me ayude a identificar las preguntas de un cuestionario que no estan contestadas y para que las responda automaticamente , las respuestas ya son fijas GRACIAS SALUDOS

Buenas tardes, Me parece genial este foro, pues se ve que hay bastante ayuda en cuanto a este tema de excel. Soy nuevo y me agradaria que alguno me ayude con lo sig. He encontrado este macro, en algún lugar jeje la verdad no recuerdo; y sirve casi perfectamente para lo que necesito. Lo que hace es pasar varios datos de columnas, uno debajo del otro, Obteniendo los datos en las filas, iniciando en 1 celda y terminando en la número 13 y los datos de la fila 2 acomodarlos de la celda 14 a la 27 y así sucesivamente hasta terminar con los datos iniciales. Aqui lo comparto, ------------------------------------- Sub Columna() Const NUMERO_…

Hola tengo el siguiente archivo en excel lo hice en 64 bits pero necesito correrlo en 32 bits como puedo hacerlo mil gracias

hola tengo la siguiente tabla en access. "tblarchivoplano" la cual tiene los siguentes campos Id Acta Fecha De Rvisión Instalación Dirección Fecha_Estado Justificación Estado Area Causal Tipo_Tarifa Municipio Nombre_Usuario Fecha_dp Observacion requiero pasarlos desde una macro en excel a esta tabla en access, "tblasignados", los campos de esta tabla son Id_asignado User Fecha De Rvisión Instalación Dirección Fecha_Estado Justificación Estado Area Causal Tipo_Tarifa Municipio Nombre_Usuario Fecha_dp Observacion Aclaro que los campos son del mismo tipo en ambas tablas por favor si ayuda indicandome si es posible y cóm lo haría. Gracia…

Buenos días: Ante todo saludados y agradeceros lo que, poco a poco he ido aprendiendo en este foro, aunque de forma anónima, Este es mi primer post y entro preguntando y con una consulta ya que me encuentro atascado en una hoja y no se como solucionar mi problema, os cuento: Tengo una hoja en la que dependiendo de la categoría profesional que se le ponga, permite poner dietas o no. La Categoría se coge de una lista desplegable y la celda dietas tiene una validación de datos personalizada con formula que "mira" en una celda que número hay, el número viene de una función "O" que analiza anteriormente las categorías que se han introducido y solo muestra "VERDADERO" si s…

Hola ojala q alguien me pueda ayudar, necesito una macro que me guarde un archivo adjunto de Outlook, pero que sea de un dominio especifico ej. @ssss.com y que sea guarde cuando reciba el mail, osea que no lo tenga q ejecutar yo q se ejecute automaticamente cuando me llegue dicho mail de dicho dominio, ya tengo un Scrip Este es mi codigo, y la verdad es que lo encontre, ya qu no se programas , espero q puedan ayudarme.... Sub GetAttachments() Dim ns As NameSpace Dim Inbox As MAPIFolder Dim Item As Object Dim Atmt As Attachment Dim FileName As String Dim i As Integer Dim SubFolder As MAPIFolder Dim strInter As String 'Abajo pongo el nombre o parte del nombr…

Buenos días les agradezco de antemano si me pueden ayudar, hice este macro para ingresar la formula de SUBTOTALES me parece que lo escribe bien pero da un error y no lo encuentro, apelo a ustedes si ven el error o alguna otra opción que pueda utilizar.Mil gracias Consulta.xlsm