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?
8684 temas en este foro
-
Buen día. Mi consulta es la siguiente. Necesito elaborar un formulario VBA para el siguiente fin: - Tengo una tabla de Excel con información de servicios vendidos e instalados al cliente. Cada columna de la tabla trae la siguiente información: "Cuenta", "Orden de Trabajo", "Id Asesor", "Paquete", "Venta", "Fecha Venta", "Fecha Instalación", "Estado Actual". - Quiero que por medio de un formulario VBA se pueda digitar esta información y que se diligenicie automáticamente la tabla (con cada columna según corresponda). Cuando al final se de click sobre un botón llamado: "Agregar Venta". Es decir que en el formulario aparezcan estos campos en forma de cuadros de texto. -A…
-
MUY BUENAS MI CONSULTA ES LA SIGUIENTE: TENGO UN ARCHIVO QUE ES MUY GRANDE Y LO CUAL PARA PODER AVANZAR NECESITO QUE LA FILA A3 - L4 COPIE A LAS DEMAS FILAS VACIAS YA QUE SOLO ES UN SOLO ASIENTO ENVIO UN EJEMPLO MAS DETALLADO SOLO E PODIDO LLEGAR A CREAR UNA MACRO QUE SOLO COPIA PERO SOLO EN UNA CELDA LO QUE DESEO ES QUE COPIE A N CELDAS HASTA ENCONTRAR EL ULTIMO VACIO prueba1.xls
-
0
Reacciones de usuarios
- 4 respuestas
- 628 visitas
-
-
Hola adjunto una simulación de como aumentar un formulario arriba, abajo, derecha e izquierda por medio de unos botones. Es lo que se me ha ocurrido, no se si vosotros sabéis de alguna otra opción ¿? También preguntar si es posible hacer esto mismo con las teclas del propio teclado ¿?. Lo que si es importante es que siempre haya un procedimiento para recuperar tamaño y posición inicial. Saludos a todos y todas. MTamaño.xlsm
-
0
Reacciones de usuarios
- 4 respuestas
- 433 visitas
- 1 seguidor
-
-
buenas tardes...a todos..los master bueno les comento que en mi Formulario cuando ingreso fecha ejem.11 de marzo y despues al grabar lo lleva a la planilla de excel como 03 del 11 por favor me pueden ayudar a solucionar detalle ..(Gracia Totales) fecha de pago.xlsm
-
0
Reacciones de usuarios
- 4 respuestas
- 2.1k visitas
-
-
Buenas noches amigos del Foro Estoy teniendo una duda y necesito si pueden me aclaren. Es sobre el mismo Proyecto de Pre-Nóminas. Tengo en mi FrmHistorico una búsqueda, tanto por fechas como por otros campos y tengo también un procedimiento para que me imprima lo que el ListBox muestra. Para mi esposa es necesario, porque, por ejemplo, si necesita saber el Salario real de un Departamento ‘X’ en una determinada fecha lo puede tener, además puede sacar los datos de un Trimestre, Semestre o año, pero mi duda viene ahora: ¿Es posible que cuando yo envíe a imprimir el contenido del ListBox los valores me puedan salir sumados después del último registr…
-
0
Reacciones de usuarios
- 4 respuestas
- 790 visitas
- 2 seguidores
-
-
Feliz año a tod@s. Tengo un problema en mi trabajo. Debo de organizar cada dia mas de 1000 albaranes metidos en una hoja de excel. La organización es la siguiente: [TABLE=width: 621] [TR] [TD]Empresa[/TD] [TD]Albaran[/TD] [TD]Fecha[/TD] [TD]HORA[/TD] [TD]EMPRESA HORA Y FECHA[/TD] [/TR] [TR] [TD] BLASITO,SA[/TD] [TD] 895632155[/TD] [TD]01/01/03 [/TD] [TD] 09:48[/TD] [TD]BLASITOSA0101030948 [/TD] [/TR] [/TABLE] Cuando tengo todos los albaranes de esa fecha y esa empresa con esa hora metidos,tengo que imprimirlos con un encabezado. El encabezado es la columna es EMPRESA HORA Y FECHA. Cómo lo hago yo ? Hago primero filtros por el nombre de la empresa. E…
-
0
Reacciones de usuarios
- 4 respuestas
- 816 visitas
-
-
Hola!! Quisiera que me ayuden al seleccionar una opcion de la lista desplegable de validacion de datos me de toda la informacion relacionada a esa opcion, ejemplo es decir yo tengo los meses en la lista desplegable de una data y que al seleccionar ENERO ME ARROJE las ventas de ese mes , los clientes, etc. Me pueden decir si puedo hacerlo con macros manualmente ya que no manejo visual y diganme coo hacerlo porfa. Les adjunto un archivo de ejemplo Ejemplo vd.xls
-
0
Reacciones de usuarios
- 4 respuestas
- 2.2k visitas
-
-
Buenas: Necesito un botón para imprimir un formulario. Gracias
-
0
Reacciones de usuarios
- 4 respuestas
- 10.1k visitas
- 1 seguidor
-
-
Hola chic@s. Tengo unos datos de origen en una hoja a los que hay que hacerles unas operaciones y quiero colocar el resultado donde elija el usuario. Esto lo solicito mediante un inputbox: Set celdaDestino = Application.InputBox(prompt:="Selecciona donde quieres situar el resumen", Title:="Posición de destino de los datos", Type:=8) El problema lo tengo cuando se elilge como destino una hoja distinta. Necesitaría guardar en una variable esa hoja de destino. Por ahí he encontrado una solución que selecciona esa hoja y la celda elegida y....entiendo que como así la hoja se convierte en activa ya puedo guardar su nombre en la variable hojaDestino. …
-
0
Reacciones de usuarios
- 4 respuestas
- 1.8k visitas
-
-
HOLA Q TAL soy nueva por aqui, estoy perdida quisiera poder enviar datos de un formulario en html a excel que se vayan guardando los datos en su columna he estado investigando y encontre que un archivo php llamado apgform1.7.php que lo hace directo pero solo funciona con unix linux al darle todos los privilegios a la carpeta que contenga este archivo y yo lo estoy haciendo local en windows xp no se si haya que hacerlo desde excel o tengo q buscar de otra manera ayudenme se lo agradeceria mucho gracias
-
0
Reacciones de usuarios
- 4 respuestas
- 11.1k visitas
-
-
Buenas noche amigos de Excel Ayuda quisiera que me ayuden completando mi amplicación con la ayuda de ustedes e creado una aplicación que ingresa datos para analizar en varios perìodos, los datos estan en un hoja BBDD, mi objetivo es que al analizar los productos cada periodo y culminarlos quiero pintarlos de acuerdo a dos criteros "suspendido" o "culminado" utilizando el buscador yo digito el "Lote" y doy clik en la lupa y busca el producto pero quiero que al ubicar el "Producto1, Produco2 etc" al selecionar uno de los dos botones de opción "verde o rojo" se pinten automaticamente en la base de datos BBDD todas las filas que buscó. Les agradezco por darme un tiempo e…
-
0
Reacciones de usuarios
- 4 respuestas
- 989 visitas
-
-
Hola amigos que tal, ha pasado algún tiempo desde mi última consulta y espero al igual que en anteriores ocasiones puedan asesorarme. Ahora sí, la situación es la siguiente: Estoy comenzando un formulario para la empresa donde trabajo y necesito que después de haber seleccionado ciertos "criterios" al dar click en un botón se agreguen las variables en la hoja1, para ser más específicos que agrege los valores en la primer fila disponible (en éste caso sería la fila 9), y que una vez hecho esto inserte una nueva fila (en este caso sería debajo de la fila 9) copiando las fórmulas (de la fila 9) de las columnas D, E y F. Espero haberme explicado un poco, les dejo un ar…
-
0
Reacciones de usuarios
- 4 respuestas
- 912 visitas
-
-
Hola a todos, tengo un excel que en Windows XP funciona bien, pero en Windows...no sé si es 7 u 8 (pero seguro que es 64 bits) da el siguiente error: "No se puede encontrar el proyecto o la biblioteca" Cuando le doy a aceptar me resalta una ¿orden? (no sé como llamarla) que es "msofiledialogopen" que es el típico botón de examinar para buscar un archivo. ¿Alguien sabe por qué sucede esto? He mirado por internet y pone algo de las referencias, pero como siempre es por otra causa....pues ya no sé si funcionaría lo mismo o no. No puedo subir archivo, porque no lo tengo, el problema me lo han pasado a ver si yo sabía por qué era... Adjunto foto del error y de fondo se p…
-
0
Reacciones de usuarios
- 4 respuestas
- 2k visitas
-
-
Hola, Ya casi tengo el proyecto acabado, únicamente me falta un tema que soy incapaz de solventar, tengo un botón "guardar", lo que hace es crear un clon en una nueva hoja con el nombre de la celda G4 y a la vez rellena los datos en la hoja16, estando el valor de G4 en la fila 2, pongo el código: Sub Guardar() Dim celda As Range Dim Fila As Long Set celda = Hoja16.Range("B:B").Find(What:=Hoja1.Range("G4").Value, After:=Hoja16.Range("B1")) If celda Is Nothing Then Fila = Hoja16.Cells(1048576, 2).End(xlUp).Row + 1 Hoja16.Cells(Fila, 2).Value = Hoja1.Range("G4").Value Hoja16.Cells(Fila, 3).Value = Hoja1.Rang…
-
0
Reacciones de usuarios
- 4 respuestas
- 567 visitas
- 1 seguidor
-
-
Hola Comunidad de AyudaExcel, Tengo una duda con respecto a Macros VBA ya que soy bastante nuevo en esto, estoy creando una macro donde se haga registro de usuarios de X empresa y luego por medio de un ID y con ese ID me busque o me arroje como resultando N cantidades de usuarios y se muestre en un combobox, y en cada textbox me muestre los datos del usuario pero resulta que dentro de cada textbox digamos quiero reemplazar el texto "NombreAntiguo" por "NombreNuevo" por asi decirlo chancarlo en mis terminos, como tendria que realizarlo. He creado 2 botones "Modificar" y "Actualizar" mi duda esta en el boton de "Actualizar". Espero su apoyo para poder compren…
-
0
Reacciones de usuarios
- 4 respuestas
- 14.2k visitas
- 1 seguidor
-
-
tengo unos datos en la hoja2 y me gustaria extraerlos como se muestra el ejemplo en la hoja proyecto2.xlsm
-
0
Reacciones de usuarios
- 4 respuestas
- 1.1k visitas
-
-
Buenas tardes. bueno, lo que pasa es que tengo esta hoja de excel (archivo adjunto) y necesito una macro o un botón que me permita crear otra hoja igual pero con un nombre diferente para la hoja. No se si se pueda pero me gustaría saber de igual modo si al cambiar el nombre de la hoja se puede poner este mismo nombre en una celda de esa misma hoja, es decir si yo quiero que mi hoja nueva se llame torta sencilla de naranja y que al crearse este mismo nombre sea puesto en una celda especifica en la hoja creada. de ante mano les agradezco la ayuda que me puedan brindar. muestra de pregunta.zip
-
0
Reacciones de usuarios
- 4 respuestas
- 1k visitas
-
-
hola muy buenas, antes que todos muchas gracias a todos ustedes quiero que me ayuden a interpretar la siguiente macro: Public Function clave(ByVal Serie As String) As Double Dim resultado As Double resultado = 0 For I = 1 To Len(Serie) resultado = resultado + Mid(Serie, I, 1) * Mid(Serie, I, 1) Next I resultado = (resultado * resultado) - (resultado * 2) + Len(Serie) clave = resultado End Function atte. oscar
-
0
Reacciones de usuarios
- 4 respuestas
- 976 visitas
-
-
Hace unos días Antoni me resolvió un problema con un calendario flotante. He utilizado lo mismo en un programa TPV que estoy diseñando y me he estado volviendo loco; El problema que hay es que los botones están en un marco (frame). Aquí mando un archivo donde se ve el problema y no se como solucionarlo. En él van 6 botones; tres de ellos incrustados en un frame; y cuando trato de capturar los parámetros me da los del marco en lugar de los del botón. En los tres que están fuera del marco perfectamente. Help..... Acciones Cortas.xlsm
-
0
Reacciones de usuarios
- 4 respuestas
- 2.2k visitas
-
-
Hola Foro, una vez mas por aquí. Espero que todos gocen de excelente salud al igual que su familia. Tengo un proyecto, que aun esta en mi mente, nada escrito, pero en el trabajo de mesa que hago antes de iniciar algo lo tengo como una opción y me gustaría saber si es posible y de que manera. Le comento: Quiero en una Hoja de excel generar un comprobante económico (Cuenta, Subcuenta, Análisis, Detalle, Titulo, Fecha, Débito o Crédito, etc) todo esto en columnas y quiero saber si es posible cuando este cuadrado ese comprobante y yo desee, exportarlo en formato .dbf ej. (comprobante.dbf) para después poder integrarlo al Sistema Contable. Siempre es un placer i…
-
0
Reacciones de usuarios
- 4 respuestas
- 1.1k visitas
- 1 seguidor
-
-
Buenas tardes a todos, ojala puedan ayudarme. Estoy Haciendo un programita en Excel el cual va a servir para imprimir etiquetas para un inventario, las etiquetas contienen no_parte, ubicación, descripción e imagen, estos datos están almacenados en una BD en Excel, excepto la imagen que esta en una carpeta C:\imágenes(Cada imagen se llaman como el no_de parte) En el formulario por medio de formulas se mandan llamar los datos dependiendo de que rango de numero a que rango quiero imprimir sin embargo para que me aparezca la imagen no se como hacer. Anexo código que encontré: Private Sub Worksheet_SelectionChange(ByVal Target As Range) On Error Resume Next 'If Target.Ad…
-
0
Reacciones de usuarios
- 4 respuestas
- 4k visitas
-
-
El Código que adjunto no funciona Código suma no funciona.rar Código suma no funciona.rar
-
0
Reacciones de usuarios
- 4 respuestas
- 981 visitas
-
-
hola tengo una duda, quiero crear un macro que me permita borrar ciertos caracteres para depurar un texto. a grandes rasgos utilizo el siguiente codigo, lo que quiero haces es agregar una variable en "replace what:=" que me permita eliminar varios caracteres de una ves (&, %, #, etc). no se si esto se pueda hacer. Sub filtro para eliminar caracteres() Range("D:D").Replace What:="/", Replacement:="" End Sub
-
0
Reacciones de usuarios
- 4 respuestas
- 2.9k visitas
-
-
Hola Amigos de Ayuda Excel, estoy elaborando un macro q me permita recordar una tarea a realizar en una feha determinada, pero este recordatorio se realiza una vez cada mes, yo lo estuve configurando y no se porq no me funciona, anexo dicho codigo para q por favor me ayuden a corregirlo... de antemano muchas Gracias por su Ayuda. Option Explicit Private Sub Workbook_Open() On Error Resume Next With Application .ScreenUpdating = False .EnableEvents = False .DisplayAlerts = False Dim m, d, yy, dia As Long Dim fechafin As Date d = Day(Now()) m = Month(Now()) yy = Year(Now()) fechafin = dia / m / yy If Day(Now()) = 1 Then dia = "1" End If Dim Mes Mes = Mont…
-
0
Reacciones de usuarios
- 4 respuestas
- 711 visitas
-
-
En mi hoja menu tengo un listado, lo que necesito es que al ubicarme en la fila de cualquier dato de la columna C, mediante macro, copiar el dato de la columna B de la celda activa de la columna C (donde estoy ubicado) copie y pegue el valor de dicha celda a la celda F1. Desde ya muchas gracias por su tiempo Jesús
-
0
Reacciones de usuarios
- 4 respuestas
- 4k 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.