Macros y programación VBA
Temas sobre la automatización de Excel utilizando macros y VBA. Errores de VBA. ¿No consigues que tus macros hagan lo que necesitas?
8682 temas en este foro
-
Buenos dias, necesito ayuda tengo una lista de nombres hypervinculados y he creado una macro para q me copie esos nombres de una hoja a otra del mismo libro pero el problema es q me copia solo los nombres sin el hypervinculo como lo puedo solucionar para que me haga una copia exacta? Muchas gracias Un saludo Este es el código q tengo: Public Const columna_inicio = 4 Public Const fila_inicio = 21 Sub prueba() Application.ScreenUpdating = False Sheets("Inicio").Select Servicios = Cells(fila_inicio, columna_inicio) Sheets("Hoja1").Select i = 2 j = 13 Do While Cells(i, 2) <> "" If Cells(i, 2) = Servicios Then servicio = Cells(i, 1) Sheets("Inicio").Sel…
-
0
Reacciones de usuarios
- 2 respuestas
- 716 visitas
-
-
Hola amigos! Me encuentro una vez mas por este foro, requiriendo su ayuda generosa.... me encuentro con la siguiente dificultad: Necesito agregar a una planilla en formato "Hoja de cálculo habilitada para macros de Microsoft Office Excel (.xlsm)" un correlativo que al abrir el archivo se actualice automáticamente y que ademas al guardar el archivo me arroje por defecto un formato predeterminado... buscando por este foro me encontré con el siguiente código: Private Sub Workbook_Open() Range("I1") = Range("I1") + 1 'Anota en la celda I1 el numero de archivo a guardar Application.Workbooks("Sat").Save ' Salva el archivo para poder asignar numeros consecutivos Ruta = "C…
-
0
Reacciones de usuarios
- 1 respuesta
- 1.3k visitas
-
-
Hola a tod@s de nuevo Como ya he dicho antes no tengo casi nada de idea de excel,asi que voy bastante perdido. Estoy trabajando en un libro para hacer escandallos de los trabajos que realizo, l que quiero hacer es copiar unas celdas que se repiten en todas las hojas y colocarlas en otra como una tabla y si se puede (que no lo se) despues de la tabla poner las imagens que inserto en cada hoja. he mirado en el foro y he visto un tema antiguo que pedía lo mismo que yo, he mirado la formula y como si viera chino,a si que os pido ayuda para ver si puedo conseguirlo. os adjunto un archivo de ejemplo para que veais la formula (es el modulo 5) para que me expliqueis lo que te…
-
0
Reacciones de usuarios
- 1 respuesta
- 3.1k visitas
-
-
Hola, soy nuevo en el foro, necesitaria ayuda para crear una alerta/alarma... Yo tengo una hoja con 4 columnas "Entrega", "Pago", "Cliente" e "Importe", lo que yo necesito es que al iniciar el programa(frmMenu) me de una alerta sobre que clientes tienen entre 15 y 10 dias para que llege a la fecha de pago, y lo mismo de 5 a 1... En el caso de que pagen, que pueda marcarlo de alguna manera para que el sistema lo pase por encima y no me avise... Estube buscando en todo el foro, pero todo lo que encontre no logre hacer nada... se me complico mucho, el Programa en si es mas grande, solo puse esa parte para no hacerlo pesado. Estube pensando, y podria poner de color amari…
-
0
Reacciones de usuarios
- 0 respuestas
- 787 visitas
-
-
Subo esta macro muy encilla que me esta volviendo loco. Se trata de lo siguiente. Abro un userform1 con un evento initilize que carga mediante RowSource un rango determinado en un combobox. Si elijo un valor del rango me va a un segundo userform2 donde me añade por additem otro valor al combobox. Oculta el segundo userform. Se me mete en un bucle que no puedo parar porque considera que se ha producido el evento change del combobox. Lo que pretendo es poder añadir nuevos valores en el userform dos y volver al combo1 para seleccionar entre estos La segunda pregunta es si en vez de añadir inicialmente por rowsource lo quisiera hacer con un nombre de rango de los …
-
0
Reacciones de usuarios
- 1 respuesta
- 876 visitas
-
-
Hola....Tengo una lista con dos columnas en excel 2007, en la columna A tengo una lista con muchos nombres de sucursales, en la columna B tengo datos aleatorios.....quiero que a un costado exista de la lista exista un boton que al presionarlo se generen archivos excel por separados con nombre de cada sucursal y que en el interior de cada uno de estos archivos aparezca en una celda especifica, el dato aleatorio que le corresponde a cada sucursal. Gracias
-
0
Reacciones de usuarios
- 0 respuestas
- 913 visitas
-
-
Buen dia a toda la comunidad, quisiera realizar una busqueda de la hoja consulta legajos segun lo siguiente: 1.- en el boton de la primera opcion que realiza la busqueda por (Apellidos y Nombres) segun corresponda a cada usuario. 2.- en el boton de la primera opcion que realiza la busqueda por (Cod. Modular) segun corresponda a cada usuario. Adjunto archivo, Espero sus brillantes aportes e ideas.. Saludos formula_buscar (2).rar
-
0
Reacciones de usuarios
- 3 respuestas
- 952 visitas
-
-
Hola, soy nuevo en el foro y los quiero felicitar por el buen contenido que tienen. Mi consulta es la siguiente: Tengo una planilla de varias columnas a las que luego quiero convertir a .txt pero donde cada columna debe estar separada de la siguiente por punto y coma. Normalmente guado la hoja como .csv y listo, pero quería automatizar algunas cositas que paso a nombrar: a) El archivo se compone de una cabecera en la primer fila, la que incluye el total (sumatoria en F1 que viene de una tabla dinámica) de valores de las filas del cuerpo. En este punto mi problema es que si son mas de 50 registros no me sirve como tengo actualmente el archivo, ya que el total lo traig…
-
0
Reacciones de usuarios
- 0 respuestas
- 5.2k visitas
-
-
Hola a todos Soy nuevo y de excel no tengo casi ni idea, estoy haciendo un libro para hacerme escandallos de trabajos y necesitaria hacer un boton para insertar una imagen, en una posicion y con un tamaño en la hoja con la que estoy trabajando.Buscando por varios foros he conseguido hacer este macro . Sub InsertarIMGcorte() ActiveSheet.Range("K5").Activate Application.Dialogs(xlDialogInsertPicture).Show With Selection .ShapeRange.LockAspectRatio = msoTrue .ShapeRange.Height = 290 'Alto de la imagen .ShapeRange.Left = .ShapeRange.Left + 1 'Añadimos 1 para que se vea la línea divisoria de la celda (izquierda) .ShapeRange.Top = .ShapeRange.Top + 1 'Añadimos 1 pa…
-
0
Reacciones de usuarios
- 2 respuestas
- 2.1k visitas
-
-
Hola a todos, me gustaría saber como se puede enviar un mail con una macro desde un archivo excel sin enviar el propio archivo excel (si es posible). Me explico, ahora a través de una macro envío por mail el archivo excel con el que estoy trabajando con un texto en el asunto del mail, pero realmente solo necesito enviar el texto del asunto. El archivo excel ocupa mucho y me llena el correo electronico. Resumiendo necesito enviar un mail sin el excel a traves de una macro. Gracias
-
0
Reacciones de usuarios
- 2 respuestas
- 750 visitas
-
-
[TABLE=width: 1024] [TR] [TD=class: xl64, width: 1024, colspan: 16]Holaa espero que me puedan ayudar. Por mas que lo intento no me sale y creo que la macro es mas sencilla de lo que suena. Aqui estan los datos Genere una macro de tal manera que al capturar en una celda el # de tienda se obtengan los datos de nombre, region, ventas, costo, gastos y utilidad de la misma[/TD] [/TR] [/TABLE] La Macro debe estar funcionando en otra hoja de calculo Base de Datos: [TABLE=width: 601] [TR] [TD]Tienda #[/TD] [TD]Tienda[/TD] [TD]Región[/TD] [TD]Ventas miles[/TD] [TD]Costo de productos miles[/TD] [TD]Gastos miles[/TD] [TD]Utilidad[/TD] [TD]Utilidad meta[/TD] [/…
-
0
Reacciones de usuarios
- 3 respuestas
- 1.1k visitas
-
-
Buenas noches, en el link https://www.ayudaexcel.com/foro/macros-programacion-vba-10/necesito-copiar-importes-hoja1-si-cumplen-criterio-mediante-macros-gracias-27923/ Disculpen si no es la manera de mostrar la referencia, hay algo parecido, a lo que necesito resolver. Se trata de que con una macro, pasar el resultado en valores de la hoja1 a la hoja2, al acumular los valores de las celdas en una columna, conforme a lo que muestro en el archivo adjunto. Aquí no se trata de cumplir criterios en las celdas, pero algunas de ellas pueden estar vacías, o tener por valor cero. Salvo estar equivocdo, en la macro utilizan la función SUMAPRODUCTO. Gracias de antemano por la a…
-
0
Reacciones de usuarios
- 0 respuestas
- 657 visitas
-
-
Buenas tardes; tengo algunos problemas tratando de diseñar esta formula, necesito que de un rango especifico, ejemplo a2:a100 me indique cuantas palabras ABIERTA, CERRADA y P.O. encuentre, pero por colores, dentro de ese mismo rango, tengo 20 celdas de color rojo, 30 de color verde, etc, y las palabras esparcidas aleatoriamente, y el problema es cuando necesito saber cuantas abierta, cerrada y po se encuentran en cada color, quizá por separado? indicar el rango total, pero que solamente que me filtre un color? estoy completamente confundido con que función usar..
-
0
Reacciones de usuarios
- 7 respuestas
- 1.1k visitas
-
-
Lo que busco sería posicionarme por ejemplo en A y que a partir de ahí elimine dos columnas, osea B y C, que D la deje intacta y siga con E y F y así sucesivamente. Es para eliminar dos columnas de info que ya no necesito únicamente.
-
0
Reacciones de usuarios
- 6 respuestas
- 975 visitas
-
-
La pregunta es genérica y de concepto. Cuando abro un userform _ Activate para que me cargue un combobox, si luego lo oculto mediante userform.hide, si llegara a reabrirlo una segunda vez mediante un userform. show, ¿me volverá a cargar el combobox porque se activa, o no porque .Hide no desactiva el userform?. En caso de que Hide no desactive el userform como se desactiva?.
-
0
Reacciones de usuarios
- 2 respuestas
- 4k visitas
-
-
Filtro en Macro (Tabla Dinámica) Estimados, Tengo parte una programación en la que necesito su ayuda. ---- ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _ Worksheets("Hoja1") _ .Range("A1:AF" & Sheets("Hoja1").Range("AF1").End(xlDown).Row).Address(External:=True)) _ .CreatePivotTable TableDestination:="", TableName:= _ "Tabla dinámica1", DefaultVersion:=xlPivotTableVersion10 With ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("Incoterm") .Orientation = xlPageField .Position = 1 End With ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("Incoterm").CurrentPage _ = "(All)" With Active…
-
0
Reacciones de usuarios
- 0 respuestas
- 1k visitas
-
-
Buen día. El problema es el siguiente. Tengo que hacer un concentrado de información de alrededor de 30 hojas con múltiples registros. El primer problema que tengo es que estos registros están por columnas y parte de esa información ocupa dos columnas o más Ejemplo: Juan perez perez Rodolfo perez perez 465465 789 7979 78999 4546 45646 12 13 12 13 12 159 210 1369 1233 155 564 568 987 Y me lo piden de la siguiente manera: Juan perez perez 465465 789 7979 12 12 12 159 155 210 564 *Nota: Los nombres de las pers…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.2k visitas
-
-
Hola espero me puedan ayudar... temgo un problema en un combobox que puse en un formulario... lo que necesito es que el combobox 1 me de los valores de la celda F2 a F5 de mi hoja 2 y que si Seleccione F2 me de los valores de la celda G2 a G10 de mi hoja 2 en el segundo combobox o si selecciono F3 me de los valores de la celda H2 a H10 de mi hoja 2 en el segundo combobox.. ojala me ayuden ya intente de todo y no puedo conseguirlo. Gracias
-
0
Reacciones de usuarios
- 1 respuesta
- 958 visitas
-
-
Necesito encontrar la estación por medio de la columna auxiliar y que el valor 0 ENCONTRADO EN OFFSET Ó EL LADO QUE SEA L.C (LINEA CENTRAL) sume los valores de los lados (L.I y L.D) izquierdo y derecho Se me complica en el monento que la L.C pasa al final del orden de la estació o a su inicio Me dirán que ordene los valores en las columnas del offset y la elevación pero debido a que se tiene que llevar el registro de esta manera no debo. En la columna "E" dejo los valores supuestos de la operación Cualquier ayuda, gracias de antemano. ------------------------------FORMATO ELEVACIONES--------------------------.xls
-
0
Reacciones de usuarios
- 0 respuestas
- 919 visitas
-
-
Estimados, aquí mismo me ayudaron con el inconveniente que voy a pasar a explicar, pero no ha sido posible solucionarlo. (No pude responder y cerraron el tema). Necesito que en la planilla adjunta se busque la mejor coincidencia posible entre los nombres cortos de la hoja 1 y los nombres reales de la hoja 2. Obsérvese que la solución anterior no funciona puesto que al mirar el primer dato (puco-1) encuentra puco-14a. Esta no es la mejor coincidencia, sino que debería traer el valor Puco-1a. Muchísimas gracias de antemano! Buscar_v1.rar
-
0
Reacciones de usuarios
- 2 respuestas
- 809 visitas
-
-
Buenas días Espero que me puedan ayudar. Mi problema es el siguiente: Tengo un excel el cual posee 3 hojas (CAAA0547, Hoja2, Hoja5). En la hoja CAAA0547 tengo la base de datos. En la hoja 2 tengo dos macros una de busqueda segun algunos criterios y una que borra la busqueda, luego de realizar esta busqueda se calculan los promedios de días, mi problema es que yo quiero llevar este promedio de dias a la hoja 5 en donde copie esos dias dado los criterios definido en la hoja 2 y luego de que sean copiado en la hoja 5 este resultado no se borre. Espero que se entendiera mi problematica. Atte Nicolás pD: Adjunto archivo CAAA0547.zip
-
0
Reacciones de usuarios
- 0 respuestas
- 1.2k visitas
-
-
en el archivo que adjunto lo explico mas detalladamente,se trata de dividir dinero entre las diferentes columnas correspondientes prueba.xls
-
0
Reacciones de usuarios
- 0 respuestas
- 1.1k visitas
-
-
Buenas tardes a Tod@s como explico mas en detalle en el archiuvo que adjunto me giustaria que quedara como en el ejemplo Gracias por vuestra colaboracion prueba.xls
-
Tengo un fichero donde la primera columna es la fecha (dd/mm/yy h:mm) Los datos son tomados cada minuto. Necesito que solo aparezca los datos correspondientes a cada 10 minutos, eliminando las filas que hay entre ellos. ¿como hacerlo? incluye fichero datos. Eficiencia_aviavi.xls
-
0
Reacciones de usuarios
- 4 respuestas
- 973 visitas
-
-
Hola Buen Día Estoy trabajando con una macro que me muestra un mensaje si se cumplen las siguientes condiciones: Si el dato de la columna H es mayor a 1 muestra un mensaje y si es menor a -1 muestra otro mensaje, estos valores salen de sumar otras celdas La macro ya me funciona (utilice un ejemplo de internet) pero no quiero poner un botón para correr esta macro, sino que cuando este ubicada en la hoja en la que utilizo la función se verifique la información por si sola, en este momento estoy colocando el codigo en ThisWorkbook y funciona bien, pero al cambiar de hoja en el mismo libro se sigue corriendo la macro hasta que se me bloquea el libro. Como puedo correr la…
Información básica de protección de datos
- Responsable: Sergio Andrés Celemín
- Finalidad: Moderar y responder comentarios de usuarios. Recuerda que la información que facilites es pública, y los datos que incluyas los leerá cualquier visitante de esta web, así como el avatar que poseas.
- Legitimación: Consentimiento del interesado.
- Destinatarios : Hetzner Online GmbH.
- Duración: Mientras se conserve este post o hilo en la comunidad, o decidas eliminar el comentario.
- Derechos: Puedes ejercitar en cualquier momento tus derechos de acceso, rectificación, supresión, oposición y demás derechos legalmente establecidos a través del email sergio@ayudaexcel.com
Información adicional: Encontrarás más información en la política de privacidad.