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?
8690 temas en este foro
-
Buenas, Antes de nada gracias por vuestro tiempo. Necesito que al escribir en los textbox se vayan autocompletando en base a una lista que tengo creada en excel. Se que es mucho mas facil hacerlo con un combobox pero el problema que tengo es que tengo creados mas de 500 textbox dentro de un formulario y los tengo vinculados a macros a traves de controls.item por lo que si cambio los textbox por combobox tendria que reprogramar demasiadas cosas. Gracias. Saludos
-
0
Reacciones de usuarios
- 1 respuesta
- 2.1k visitas
-
-
hola que tal?, aqui de nuevo con mis dudas y esperando se me pueda auxiliar en esto y es que esta vez quiero hacer lo siguiente: Lo que Necesito hacer es que al estar escribiendo sobre un textbox (el cual obviamente esta dentro de un formulario) solo acepte: 1ro.- solo numeros o solo letras o los caracteres que yo desee 2do.- que al llegar al sexto caracter me ponga una " / " y posteriormente siga escribiendo solo y unicamente hasta el onceavo caracter. se que para poner la cantidad de caracteres permitidos es en la propiedad maxlenght, pero si quisiera saber manipularla mediante codigo No se si me di a explicar ponerdiagonalal5tocaracter.xls
-
0
Reacciones de usuarios
- 5 respuestas
- 2.1k visitas
-
-
Buenas noches de nuevo!! Tengo un formulario donde quiero filtrar unos datos y que los traiga a un listbox pero cuando ejecuto la búsqueda me da el error siguiente: "Se ha producido el error 381 en tiempo de ejecución: Could not set the list property. Invalid property array index" Describo el código que tengo por si me podéis ayudar a dar con el problema (lo tengo hecho en otra base de datos y me funciona perfectamente..... no entiendo porque en esta no...) Private Sub cmbEncabezado_Change() Me.lblFiltro = "Filtro por " & Me.cmbEncabezado.Value End Sub 'Mostrar resultado en ListBox Private Sub CommandButton5_Click() Set h1 = Sheets("ENT…
-
0
Reacciones de usuarios
- 9 respuestas
- 2.1k visitas
- 1 seguidor
-
-
Hola amigos quisiera saber si alguien me puede ayudar con lo siguiente: Tengo un userform con dos combobox un commandbutton, un listbox y un textbox. de los cuales los combobox buscan fechas inicial y final de una hoja de calculo y al ejecutar el boton muestra en el listbox todos los resultados entre esas fechas incluidas las mismas, estos resultados debieran ser 4 columnas en la primera la cantidad en la segunda el articulo o producto en la tercera el precio y en la ultima el total, además en el textbox debe aparecer la suma de todos los totales el codigo que estoy utilizando es: Private Sub CommandButton1_Click() ListBox2.Clear Dim fecha1 As Date Dim fecha2 As Da…
-
0
Reacciones de usuarios
- 1 respuesta
- 2.1k visitas
-
-
Muy buenas Tengo una macro en excel que añade cuadros de texto (4) en la presentación que está abierta en Powerpoint. El problema es que al pegarlas, automáticamente me cambia el tamaño del cuadro de texto. Ahí va el código ConsumerAcceptanceText = Range("a14").Value ' Valoración clientes y % Model Price ConsumerAcceptance = Format(Range("b14").Value, "#0.0") ModelPriceText = Range("a18").Value ModelPrice = Format(Range("b18").Value, "0%") Vacio = Range("b19").Value PPSlide.Shapes.AddTextbox(msoTextOrientationHorizontal, 250, 100, 170, 170).TextFrame.TextRange = ConsumerAc…
-
0
Reacciones de usuarios
- 0 respuestas
- 2.1k visitas
-
-
Quiero plantearles la siguiente cuestión Parto de un Excel con dos hojas visible en pantalla Hoja1 y Hoja2. Con datos variables. Lo que necesito es una macro que automáticamente haga la suma de los rangos De forma que en la Hoja1 Celda C1 ponga la suma del rango variable según valor de Hoja1 celda A1 Igualmente en C2 Hoja1 pondría el resultado de la suma de todas las filas con valor Hoja1 celda A2 E igual con el resto Marco en color para aclarar un poco mas la duda Muchas gracias
-
0
Reacciones de usuarios
- 1 respuesta
- 2.1k visitas
-
-
Hola, que tal! Estoy creando una especie de nota de remicion que utilizaran 6 compañeros a cada uno se le asignara una secuencia de folios unicos de 1000 en 1000 la cosa es que soy nuevo en esto de exel y quisiera ver si me pueden hechar la mano a crear un macro para generar secuencialmente los folios que tome el ultimo usado y le sume 1 para asignar uno nuevo y que cuando se llene la nota se guarde en una carpeta para llevar un control y registro de los mismos espero de verdad me puedan ayudar ejemplo.rar
-
0
Reacciones de usuarios
- 2 respuestas
- 2.1k visitas
-
-
Hola, pretendo agrupar y sumar los artículos dentro del mismo listbox, pero sin tener hoja secundaria donde realizar las operacines. En el archivo adjunto pongo un pequeño ejemplo. Prueba.xlsb
-
0
Reacciones de usuarios
- 6 respuestas
- 2.1k visitas
- 1 seguidor
-
-
Buenas tardes gusto saludarles. ¿Alguién conoce alguna opción o Macro, que le de una ubicación determinada a un ComboBox? El asunto es que tengo problemas con una macro que oculta un rango que va de fila 10:40, pero que en las filas 41 y 42 tiene un ComboBox en cada una (mas otros que han quedado ocultos en las primeras filas), y cuando la macro corre me indica que "no puede desplazar objetos fuera de la hoja", aun y cuando esos objetos tienen como propiedades "Mover y cambiar tamaños con celdas". Lo que pasa es que ya no quedan filas en la parte superior para alojar esos comboBox, por eso es que se me ocurre que tal vez exista una forma de ubicar dichos objetos en un …
-
0
Reacciones de usuarios
- 6 respuestas
- 2.1k visitas
-
-
Buenas, tengo un papel de trabajo donde clasifico los movimientos Bancarios en tres columnas: 1- Tipo de Movimiento Ej: Interno / Externo 2-Clasificación del Movimiento Ejemplo Intercompañía / Cliente A / Proveedor A 3- Nombre de Cliente/ Proveedor Ej: Carlos La lista de selección 1 está libre La lista de selección 2 depende del valor de la lista 1 La lista de selección 3 depende del valor de la lista 2 Las selecciones están todas perfectas sin embargo me encuentro que después de cargar los datos si cambia el valor de la lista 1 los valores de la lista 2 y 3 están incorrecto o si cambio el valor de la lista 2 el campo de la lista 3 queda…
-
0
Reacciones de usuarios
- 3 respuestas
- 2.1k visitas
-
-
Hola a todos. Saludos, agradezco el tiempo de cada uno y aporte al tema. Morbilidad 2021.xlsm Ciertamente desconozco totalmente sobre VBA, por ello acudo a ustedes. Necesito en una hoja de calculo, poseer una lista despegable (Validación de Datos) con selección múltiple. He encontrado un código VBA en la WEB y funciona según lo que necesito, no obstante, el código aplica a todas las celdas de la hojas, quisiera me ayuden a establecer su funcionamiento en una hoja especifica ("Morbi-Covid Trebol") y a un rango especifico ("R2:R2000") que corresponde a la Columna "SINTOMAS". Acá les dejo el código: Private Sub Worksheet_Change(ByVal Target As Range) '…
-
0
Reacciones de usuarios
- 2 respuestas
- 2.1k visitas
-
-
Hola Amigos, nuevamente molestando, saben necesito una macro que me permita copiar números ingresados a otra nueva hoja, sin perder el formato, me explico: al ingresar el numero 107894563, debe aparecer 0010789456-3 y si es con menos números, estos deben aparecer con mas ceros a la izquierda, luego debo copiarlos a una nueva hoja con una macro que requiero y no tengo y que mantenga el formato con los ceros a al izquierda, el guion y el ultimo numero a la derecha (0010789456-3). Adjunto archivo y macro, para un mejor entendimiento. Desde ya agradezco su pronta ayuda a este problema. Gracias Sueldos.xls
-
Estimadísimos, vengo a ustedes con una inquietud, respecto a la programación de Excel para vincular a SQL, de forma que las consultas puedan ser más dinámicas y se puedan ingresar parámetros desde Excel. Adjunto archivo explicativo, pero tengo problemas con las conexiones. A saber el archivo a trabajar, además tiene otras tablas vinculadas web para actualizar online parámetros que se ingresan en la consulta. De manera que el archivo es un ejemplo, el cual debo acondicionar a la realidad. Esto es algo que realmente deseo aprender y encuentro un conocimiento necesario, de forma que estaré particularmente atento a comentarios, dudas y lo que se les venga en mente o que no …
-
0
Reacciones de usuarios
- 1 respuesta
- 2.1k visitas
-
-
Estimados foreros: Acudo a su maestría para ver si me pueden ayudar con un problema de importación de TXT a Excel que tengo. He reutilizado, adaptándola, una macro que creó el maestro @Haplox y que mostró en este foro para otro compañero con un problema parecido al que ahora planteo. Aprovecho para agradecerle su propuesta, porque me ha sido muy útil. A lo que vamos... Verán, tengo un archivo de texto delimitado por puntos y coma, el cual quiero importar a una hoja de Excel, pero los datos de cada fila del TXT deben situarse en celdas NO contiguas. He retocado la macro de @Haplox, pero no logro que la importación se realice como yo necesito (se importan los…
-
buenas a todos, espero que estén muy bien el día de hoy, en relacion al tema, luego de resolver y consolidar data mediante una macro en vba y desplegando la misma en un formulario( vba ), necesito que por favor me orienten, de que manera se puede copiar ese formulario activo en pantalla al portapapeles y poder posteriormente pegarlo en el cuerpo de una nota de correo en LotusNotes, actualmente lo que hago es seleccionar con el puntero del ratón al formulario, pulsar Atl+Ptrscr, pasar a la nota de correo en Lotus, luego aplicar en esa nota un pegado especial mapa de bits. indicarme por favor si mediante alguna instruccion en vba podemos copiar este formualrio sin necesidad…
-
hola a todos, necesitaria si me podrian ayudar en lo siguiente, tengo una macro que me abre una cantidad "x" de paginas web, a veces se cierran algunas de ellas, y lo que necesitaria es, si hay alguna forma de que, al presionar el commandbutton me identifique si la pagina que va a abrir se encuentra abierta o no, en el caso de que se encuentre abierta que no lo haga nuevamente de lo contrario que la abra. gracias saludos
-
0
Reacciones de usuarios
- 2 respuestas
- 2.1k visitas
-
-
Como podria hacer para que usando userform vaya completando determinas celdas, ej. que tenga un listado de de datos que tengo que ir llenando y esos datos que cargo se coloquen en la celda determinada. listado datos (ir completando) celda (ya determinas) empres nombre y apellido telefono celular provincia
-
0
Reacciones de usuarios
- 8 respuestas
- 2.1k visitas
-
-
Hola buenos días a todos , yo aquí sigo trabajando con mi proyecto, en el Modulo 7 he generado un código, que me permite copiar y pegar un rango de datos en un objeto chart exportarlo de forma constante al mismo archivo, insertar, copiar y borrar esa imagen para poder adjuntar a una msg de WhatsApp. Si bien realiza todo el procedimiento tengo dos problemas... uno que si bien yo defino el rango, "Hoja1.Range("A1:F46").Select" al hacerme todo el procedimiento me adjunta 6 hojas en formato imagen en whats app y debería ser solo la primera con datos. y otro detalle es que me gustaría si me pueden ayudar a encontrar una forma que ese rango sea variab…
-
0
Reacciones de usuarios
- 0 respuestas
- 2.1k visitas
-
-
hola a todos; el caso es que necesito rellenar un listbox con unas 80 columnas pero quiero irlo filtrando a medida que voy introduciendo datos en los textbox; el listbox lo relleno con rowsource,a pelo, pero no sé filtrarlo, ni si se puede; lo relleno asi: ListBox1.RowSource = "a2:cd2" & ActiveCell.Row pensé en poner varios listbox, pero se me complica el asunto bastante... Gracias de antemano.
-
0
Reacciones de usuarios
- 4 respuestas
- 2.1k visitas
-
-
Tengo un archivo con el registro de ventas y un userform (adaptado de otro que encontré en la red) que me permite consultar las ventas al detalle y expedir la factura correspondiente. Así, en el cuadro 'Buscar por' escribo al menos un dato de la venta que quiero revisar y el botón de búsqueda toma los datos de la planilla, mostrando en el TextBox (FILTER) las coincidencias para el criterio de búsqueda. Lo que no sé cómo hacer es que en el evento OnClick sobre el TextBox FILTER me muestre los detalles de la venta en el segundo TextBox (UNAFAC), o sea, los productos, cantidad, valor unitario, valor de la compra, de la venta, etc., según los encabezados de las columnas. ¿Pue…
-
0
Reacciones de usuarios
- 8 respuestas
- 2.1k visitas
-
-
Buenos Dias Compañero, Trato de terminar este formulario y no puedo, se trata de totalizar los montos filtrados usados en el formulario. Lo que deseo es sumar el total de la columnas "Cost", "Abono", "Total" que estan en la hoja " Invoice Summary" y que se visualicen en los textbox Deuda Total, Total Abono, Deuda Actual. He encontrado soluciones en este foro pero no doy con el resultado quizas lo este haciendo mal. Saludos Jesus ayuda_3_Columnas_1.xlsm
-
0
Reacciones de usuarios
- 4 respuestas
- 2.1k visitas
-
-
Hola, tengo un pequeño contratiempo y necesito hacer una macro que me haga lo siguiente, a ver si alguien me puede ayudar: Estando en un libro Excel ejecuto una macro que me copia una tabla en otro libro nuevo creado automáticamente. El nombre del libro que me crea automáticamente es libro1, libro2, depende las veces que ejecute la macro, el que genera por sí solo, pero si detecta que ya existe y quiero cancelar me sale un error(13). La cuestión es que quiero que ese libro nuevo se cree con la fecha y hora actual y así no tendré problemas con el nombre del libro. Tengo hecho la siguiente macro: Sub copiaTabla() ' 'Declaramos las variables. Dim NombreHoja As String …
-
0
Reacciones de usuarios
- 7 respuestas
- 2.1k visitas
-
-
Buenos días a todos; -Tengo creada una macro que hace una consulta Sql sobre una tabla Access con un Where donde le pongo los parámetros de fecha. Ahora estoy intentado cambiar los parámetros de fecha (DD/MM/AAAA) por solo año (AAAA). Lo que he añadido a mayores al formulario son dos SpinButton que insertan los años en cuestión. Private Sub btn_Buscar_Click(): On Error Resume Next Dim vConsulta, where As String Dim Fecha1, Fecha2 As Date '<<<Dim Año As Variant Dim i As Integer Conectar Application.ScreenUpdating = False Application.DisplayAlerts = False vConsulta = "sql_Resumen" Fecha1 = Format(Me.TextBox100, "DD/MM/YYYY") '<<<<&l…
-
0
Reacciones de usuarios
- 2 respuestas
- 2.1k visitas
-
-
Que tal compañeros probando unas macros e intentado realizar un proceso, poseeo 2 macros las cuales funcionan perfectamente y logran lo que necesito pero ejecutando una por una e tratado de unirlas pero el resultado es distinto alguien me podria ayudar Modulo 1 ( este codigo funciona bien, si lo realizo por partes. Cuando lo integro no funciona, porque?) Sub Macro3() Cells.Select ActiveWorkbook.ActiveSheet.Sort.SortFields.Clear ActiveWorkbook.ActiveSheet.Sort.SortFields.Add Key:=Range( _ "P:P"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _ xlSortNormal With ActiveWorkbook.ActiveSheet.Sort .SetRange Range("A1:Z4…
-
0
Reacciones de usuarios
- 1 respuesta
- 2.1k visitas
-
-
buenas tardes amigos , tengo un problema al realizar una macro que realice una tabla dinamica tengo los siguientes datos. Nombre Nombre_Concepto Año Mes Valor MONTES DEL CASTILLO JAIRO ASIGNACION BASICA-SUELDO 2002 1 1225174 MONTES DEL CASTILLO JAIRO AUXILIO DE TRANSPORTE 2002 1 34000 MONTES DEL CASTILLO JAIRO AUXILIO DE ALIMENTACION 2002 1 50848 MONTES DEL CASTILLO JAIRO PRIMA ANTIGUEDAD EMP.PUBL 2002 1 67385 MONTES DEL CASTILLO JAIRO PRIMA TECNICA 2002 1 263412 MONTES DEL CASTILLO JAIRO AJUSTE FONDO SOLIDARIDAD 2002 1 16809 cuando grabo la macro para que me cree la tabla dinamica me genera el siguiente error agradezco cualquier ayuda para solucionar e…
-
0
Reacciones de usuarios
- 1 respuesta
- 2.1k 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 sergio@ayudaexcel.com
Información adicional: Encontrarás más información en la política de privacidad.