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?
8680 temas en este foro
-
Hola Hice una macro que me filtra lo que contiene "ATO" en la columna H; si hay, se borran las filas el problema es que cuando bajo mi reporte y no hay "ATO" la macro me borra el titulo, es el mismo caso para la parte donde borra lo que contenga "DUMMY". Si alguien me puede ayudar a solucionar este error estare muy agradecido. Adjunto una porcion del archivo para mejor referencia. Sub MacroPrueba() strArchivo = Application.GetOpenFilename( _ FileFilter:="Excel Files (*.xlsx), *.xlsx", _ FilterIndex:=1, _ Title:="Select: rptProductionCTO") If strArchivo = False Then Exit Sub Workbooks.OpenText Filename:=strArchivo …
-
0
Reacciones de usuarios
- 2 respuestas
- 1.6k visitas
-
-
Buenos días quisiera que me ayuden a actualizar una tabla dinámica mediante una macro, o sea que cuando inserte una nueva fila al final del origen de datos, que es una tabla, me actualice la tabla dinámica, obvio que agregando esa fila. Espero que puedan ayudarme Agradezco su ayuda de antemano. Saludos Ejemplo.xls
-
0
Reacciones de usuarios
- 3 respuestas
- 1.6k visitas
-
-
como lo hago para que al abrir el combobox y presione la rueda del mouse me baje a travez del combobox? saludos y gracisa
-
0
Reacciones de usuarios
- 0 respuestas
- 1.6k visitas
-
-
Hola Amigos , como estan? Les queria pedir su ayuda si alguien sabe como puedo solucionar mi problema. Tengo 2 Hojas con codigo producto y otra especifica la cantidad. Hoja "Orginal" , esta hoja es la que necesita ser modificada. valores de cantidad siempre en 0 Hoja "Nuevo" son los valores que se necesitan cargar en la Hoja "Original". La ultima hoja que pongo en el excel es la hoja "conmacro" que es como quedaria la hoja "Original" una vez ejecutado el macro. Desde ya agradezco a quien pueda ayudarme con este problema que me tiene loco y no encuentro solucion. Gracias de corazon Jon ayuda.rar
-
0
Reacciones de usuarios
- 19 respuestas
- 1.6k visitas
-
-
Hola Buen día Tengo el siguiente formulario donde al seleccionar un alimento, posteriormente dar click en aceptar estos se copian a unos textbox. Necesito que de los textbox primero se seleccione el proveedor mediante un combobox, posteriormente filtre si se tienen 1 o más presentaciones y finalmente añadir el costo de dicho alimento. Tengo 1 hoja para cada proveedor, se me había ocurrido ponerlas juntas, pero no lo veo factible si posteriormente el proveedor ofrece un nuevo producto. Estoy abierta a sugerencias de cómo organizar los datos. Espero ser clara y de antemano muchas gracias 2 Combobox dependientes.rar
-
0
Reacciones de usuarios
- 1 respuesta
- 1.6k visitas
-
-
Buenos días. Tengo una base de datos con personas vigentes y aquellas que ya no están. dentro de los datos que manejo, está el campo correo electronico que, en algunos casos está vacío. Así las cosas, tengo una hoja donde filtro (usando la función FILTRAR) todas las personas vigentes. Lo que quiero hacer es, por medio de botones, los usuarios puedan seleccionar si desean sólo los vigentes, o los vigentes con correo electrónico. Para el primer caso, lo que tengo es: Para el segundo caso, lo que tengo es: Al ejecutar la macro, en la casilla B3 me coloca un "@" (arroba) después del igual, de manera que queda de la siguiente manera: P…
-
0
Reacciones de usuarios
- 3 respuestas
- 1.6k visitas
- 1 seguidor
-
-
Hola buen día. Gracias a todos por su ayuda, dsisculpen es que tengo una base de datos de la cuál quiero tomar algunos datos y pasarlos a otra hoja, eh intentado resolver con fórmulas pero las verdad no eh podido, se ve muy mal con fórmulas, lo que quiero hacer es que la hoja llamada "Basa de datos", me pase los datos a la hoja llamada "Pagos realizados", pero solo me pase las celdas que están en color verde en la hoja "Base de datos", que me pasara solo el Nombre, Fecha, Seudonimo, Producto, Método o Forma de pago, Costo de Producto y Costo de envió. La verdad ya no se como hacerlo con macro, ojala me puedan orientar un poco, gracias por su ayuda. Esta es la macro que…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.6k visitas
-
-
Hola a todos, Tengo una pequeña dificultad y no encuentro la manera de solucionarla. Me explico. Tengo una hoja simple con datos numéricos en tres columnas, la B, C y D y quiero ordenarlos cada vez que introduzco números nuevos. El caso es que si uso el ordenar de Excel y le indico que me ordene de menor a mayor, la coluna B, C y D, sólo me hace la B las otras no y yo lo que necesito es que me ordene la columna B empezando por el nº más bajo de las tres columnas, cuando terminen los datos de esa columna siga en la C con el siguiente que corresponda tras el último de la B y en la D igual pero con respecto a la D. Ejemplo: Columna B: 3, 5, 1, 4, 9 Columna C: 6, 11, 2…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.6k visitas
-
-
Buen día Si en las cinco primeras filas de la columna A tengo los siguientes valores (en A1, A2, A3, A4 y A5 respectivamente) A 1 Negro 2 Amarillo 3 Azul 4 Rojo 5 Verde Y coloco en vba el siguiente código: Sub Prueba 'Estando en A5 subirá fila por fila y se detendrá cuando encuentre la palabra Noche Range("A5").Select While ActiveCell <> "Noche" ActiveCell.Offset(-1, 0).Select Wend End Sub ¿Quisiera saber por qué genera error? La respuesta más simple sería porque nunca encontró la palabra Noche al ir subiendo desde A5 hasta A1, celda por celda, pero ¿por qué genera error exactamente? ¿El while genera error porque nunca se detuvo? ¿Genera error …
-
0
Reacciones de usuarios
- 4 respuestas
- 1.6k visitas
-
-
Cordial saludo, gracias a todos por sus aportes... Deseo impedir que los usuarios de mi aplicación tengan acceso a las opciones de excel, en el ID de VBA, en This WorkBook, tengo varias opciones para no permitir el acceso, adjunto código; pero si tecleo el comando abreviado Ctrl + P (Imprimir), se abre el menú que permite hacer modificaciones en opciones avanzadas, Compartir, Publicar, Información del archivo, que pueden ser modificados desde esa ventana. Lo que deseo es Cancelar todas esas opciones y dejar "Libre", solamente la opción de "Imprimir", que no encuentro por ningún lado... Por favor requiero su ayuda... Private Sub Workbook_Activate() ' Evita copia…
-
0
Reacciones de usuarios
- 1 respuesta
- 1.6k visitas
- 1 seguidor
-
-
hola a todos desde Colombiaresumiendo tengo un formulario que llena una base de datos en un archivo-aplicación la información se cambia y edita todo el tiempo; esto por que es para almacenes de tecnología, lo que hace necesario que tres personas estén ingresando información al mismo tiempo ahora mismo esta guardado en dropbox por lo que se puede llenar desde varios sitios, pero el trabajo de uno tapa el trabajo del otro ya pensé en manejar tres bases de datos, una para cada usuario ya pensé en poner la hoja base de datos como otro libro que se alimenta de los fomularios como un archivo aparte ya pensé en poner la base de datos como una base de datos sql en intern…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.6k visitas
-
-
Buenas noches, gusto de comunicarme con ustedes. Molesto vuestra atención para merecer vuestra ayuda al requerir hacer un seguimiento de ventas diarias. En el archivo adjunto en la hoja "Observaciones" se encuentra detallado lo que se requiere Se trata de calcular el acumulado según los criterios indicados y hacer los reportes independientes en hojas apartes algo así como: que es un post de éste foro de más o menos marzo del 2011 PD.: si no es la forma de indicar el post, les gradeceré disculparme, no encontraba otra manera de hacerlo Gracias, y saludos Cuadro control de vntas.zip
-
0
Reacciones de usuarios
- 2 respuestas
- 1.6k visitas
-
-
Necesito ejecutar un macro X numero de veces y que se agregue en una tabla los datos dentro del macro pero no encuentro forma de hacer que funcione Aqui una foto de lo que deseo agregar donde esta X que sea un numero cualquiera deseado Sub Macro1() ' ' Macro1 Macro ' ' Range("H3:K3").Select Selection.Copy Range("A50000").Select Selection.End(xlUp).Select ActiveCell.Offset(1, 0).Select ActiveSheet.Paste Application.CutCopyMode = False Range("J3").Select End Sub Ese es el codigo de la macro. Produccion.xlsm
-
0
Reacciones de usuarios
- 2 respuestas
- 1.6k visitas
- 2 seguidores
-
-
Buenos dias. les saludo desde monterrey nuevo leon mexico. tengo un detallito con una macro que hice, no soy avanzado en este tema. manejo ciertos reportes de la empresa donde trabajo, mismos que me dan informacion sobre las sucursales que tengan pendientes, dicha macro hace todo ese asunto, una vez teniendo el reporte, lo exporto a excel, identifica que sucursal tiene el pendiente, busca en una tabla y en base a esos valores se les envia un correo en automatico adjuntando el archivo generado con sus pendientes, todo hasta ahi funciona sin mayor problema. El problema comienza aqui....necesito que en el cuerpo del correo en lineas intermedias muesttre una imagen como "…
-
0
Reacciones de usuarios
- 1 respuesta
- 1.6k visitas
-
-
Hola compañeros. Os escribo la parte del código donde lleno un listbox de mi aplicación. Este código lo saqué de un ejemplo de internet. La cuestión es que quiero que en dicho listbox no me liste los registros como lo hace ahora. En la primera columna me aparece 1,2,3 etc y yo solo quiero que me aparezcan las columnas de datos. He intentado modificando el número de columnas, quitando el addittem nº etc, pero no logro dar con el error que me da con la propiedad column.
-
0
Reacciones de usuarios
- 4 respuestas
- 1.6k visitas
-
-
Estimados, Tengo un excel y una base de datos access, quiero sin utilizar formulario, solo con las referencias en las celdas, poder modificar un registro en mi base de datos acces. La idea es que busque el ID del registro y modifique el estado de "pendiente" a "terminado" pero no lo he podido hacer. Agradezco puedan ayudarme. Saludos!
-
0
Reacciones de usuarios
- 0 respuestas
- 1.6k visitas
-
-
Hola a todos Poco a poco estoy progresando con mi hoja de cálculo y le intento ir añaciendo más y más funciones. El caso es que no sabiendo como ni porqué, cometí un error en la programación de Visual, y al presionar el botón "Salir" en el primer formulario, me sale un error. ¿ Alguien me lo puede solucionar ? Tengo otra consulta. Tengo una fórmula para calcular los años y los meses entre dos fechas. En la primera fórmula me calcula los trienios. =SI(F6>0;ENTERO((AÑO(F7-F6)-1900)/3 &","&MES(F7-F6)&"");"") [/CODE] Como podréis ver, extraigo el entero de la cantidad calculada, que es la que me interesa. Pero para realizar éste cálculo, pongo como…
-
0
Reacciones de usuarios
- 7 respuestas
- 1.6k visitas
-
-
Hola amigos expertos, quisiera que me apoyen en la realización de una macro que me permita mover mis datos de una hoja a otra y generar un reporte...para que me entiendan mejor y yo también ir entendiendo el código quisiera ir paso a paso, desde ya les agradesco su ayuda profesional, quiero señalar que trabajo con excel 2003 y bueno tengo pocos conocimientos de programacion. 1. Quisiera saber como hago para que mediante un Nº de serie me busque hoja por hoja y al encontrar la serie me muestre los datos de esa serie en el resto de celdas, y en local actual me muestre en que hoja está. esto seria lo primero, reiterando mi agredecimiento por su apoyo, les adjunto mi archiv…
-
0
Reacciones de usuarios
- 15 respuestas
- 1.6k visitas
-
-
hola a todos, hoy quisiera su ayuda con este problema que se me presentado, cuando crei que todo estaba terminado. les explico, en el archivo adjunto es una pequeña aplicacion para registar reparaciones de maquinaria y la vez casa reportes de entre un rango de fechas o por maquina. Problema 1: - en el frm orden, al guardar (hoja historico) todo bien alparecer pues si entro a la hoja historico me voy con la sorpresa que algunos registro los a gudardo sobre un registro existente porque ni idea por eso pido su ayuda (ver en la hoja historico filas 227, 273,767 y 841 como ejemplo del problema) problema 2: - en el frm_reporte, la idea es que se escoge un codigo y despues …
-
0
Reacciones de usuarios
- 1 respuesta
- 1.6k visitas
-
-
Que tal gente muy buenas de nuevo y feliz año a todo el que pase por aqui jeje... vengo a molestar otra vez, la primera vez me ayudaron en estos temas que apenas me familiarizo con ellos y como dicen al grano con la informacion. Actualmente me surgen muchas dudas espero puedan ayudarme de favor trabajo sobre la version 2010 1.- como hacer que se guarde consecutivamente una factura de igual manera consultarla más delante o asimismo modificar alguna realizada por si es necesario 2.-tambien estoy buscando como hacer una alta, baja y cambio de servicios y clientes para poderlos utilizar ya sea por el id de cliente, nombre o rfc y el id de servicio... 3.-elaborar un menu c…
-
0
Reacciones de usuarios
- 1 respuesta
- 1.6k visitas
-
-
Buenas tardes tengo una macro, la cual quisiera guardar de tal forma que todos los días pueda ejecutarla, pero en libros diferentes, me explico.. esta macro fue diseñada para ordenar ciertos datos, sin embargo todos los días se descargan planillas diferentes y esa macro debe poder ejecutarse en cualquier libro, pero no se como guardarla para que cumpla esa función, y por supuesto no voy a andar copiando y pegando el código todos los días en la vba nueva, existe alguna forma? la que sea todas son bienvenidas gracias
-
0
Reacciones de usuarios
- 4 respuestas
- 1.6k visitas
-
-
Hola a todos nuevamente con un problemita...tengo un Userform en la cual tengo un listbox..que me despliega datos...cuando le doy click me pasa algunos datos en 3(tres) textbox..hasta todo bien.. Cuando hago búsqueda en un textbox para filtrar y cuando le doy click para que me arroje los datos a los 3(tres) textbox me arroja el siguiente error.... se ha producido el error '1004' en tiempo de ejecución: Error en el método 'Range' de objeto'_Worksheet' En esta parte de la macro Private Sub ListBox1_Click() Dim fila As Single fila = ListBox1.ListIndex + 2 With Hoja27.Range(ListBox1.RowSource).....(Esto me Pinta en AMARILLO) TextBox7.Te…
-
0
Reacciones de usuarios
- 3 respuestas
- 1.6k visitas
-
-
Necesito, que me ayuden con un problema que poseo, tengo un dato en una CELDA, dicha información necesito que se seleccione automáticamente en la Segmentación de Datos, he buscado como hacerlo pero no hay mucha información, al respecto. Por favor si tienen alguna idea les agradecería.
-
0
Reacciones de usuarios
- 2 respuestas
- 1.6k visitas
-
-
If Mid(ComboBox1.Value, 1, 1) = "B" Or Mid(ComboBox1.Value, 9, 1) = "B" ThenTipo = 2ElseTipo = 1End IfAncho = Mid(ListBox1.Value, 1, 3)If Mid(ListBox1, 18, 1) = "u" ThenEspesor = Mid(ListBox1.Value, 16, 2)ElseEspesor = Mid(ListBox1.Value, 16, 3)End IfDim importacion As Variant, Proveedorproducto As Variantimportacion = Application.VLookup(TextBox7.Value, Worksheets("Estructura COD. Lotes Film").Range("A3:J102"), 3, False)Proveedorproducto = Application.VLookup(TextBox7.Value, Worksheets("Estructura COD. Lotes Film").Range("A3:F102"), 6, False)If IsError(importacion) = False ThenCells(n, 7).SelectActiveCell.FormulaR1C1 = TextBox7.Value & importacion & Proveedorprod…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.6k visitas
-
-
Buenas tardes. Lo primero indicar que he visto varios hilos que hablan de este aspecto, pero he revisado las macros que incluye cada archivo y no entiendo muy bien a que corresponde cada cual. Os agradecería que si creeis que mi asunto es importante, al redactar la macro indiquéis a que corresponde cada parámetro. Lo que necesito es lo siguiente: - Tengo un BBDD con los diferentes entrenamientos que voy a utilizar a los que le asignado un código en la columna "Código" De esa BBDD los datos que están en una casilla amarilla son los datos que tienen que ser editables en la hoja PLANIFICACIÓN. Y los datos que aparecen en casilla morada, estarán en función de los datos d…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.6k visitas
-
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 [email protected]
Información adicional: Encontrarás más información en la política de privacidad.