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?
8685 temas en este foro
-
Hola Como podría guardar un archivo utilizando el contenido de una celda concreta. El tema es que tengo una plantilla que se irá actualizando en función de la introducción del DNI de la persona y quisiera que se grabara automáticamente según ese campo en concreto. gracias
-
0
Reacciones de usuarios
- 8 respuestas
- 1.9k visitas
-
-
Hola a todos. Acudo a ustedes con el animo de que me colaboren en la programación del formulario adjunto a este tema. La idea es programar tres combobox dependientes. El Combobox 1, debe filtrar y cargar los valores únicos de la comuna "Tipo" en la Tabla1, la cual está en la hoja "Equipos". El combobox 2, debe cargar y mostrar los elementos de la columna "Descripción", los cuales ya deben hacer sido filtrados de acuerdo al tipo de elemento, ya sea "Equipo" o "Periférico". Y finalmente el combobox 3, debe mostrar los seriales de esos elementos que están en el combobox 2. Una vez el operador de la aplicación seleccione un serial del elemento en el combobox 3, ese seri…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.9k visitas
-
-
Hola de nuevo, estoy haciendo una agenda (que he copiado de Internet) el caso es que me funciona todo menos lo de búsqueda por palabra o nombre, el código me he asegurado, es idéntico que el original (de Internet) pero me da error, podéis ayudarme ? me gustaría que la búsqueda la hiciese por "nombre" Mando un ejemplo del programa Muchas gracias Teléfonos.xlsm
-
Estimados Necesito su ayuda para solucionar un problema: Tengo una macro que encontré de una pagina de Internet y que me pareció que funcionado bien, pero que al ejecutarla no cumple del todo de lo que necesito. 1.- Trabaja con un array: "Sourcewb.Sheets(Array("OVALLE", "RANCAGUA", "IQUIQUE")).Copy" pero si elimino una de las hojas arroja un error en la ejecución. 2.- La idea es que si elimino una de las hojas, la macro debe enviar el restantes de las hojas a un correo determinado. 3.- Adjunto archivo excel con la macro. Espero su pronta respuesta saludos cordiales. Fernando. pruebacorreo.rar
-
0
Reacciones de usuarios
- 1 respuesta
- 1.9k visitas
-
-
Gracias por atender mi pregunta. Voy a intentar explicar todo lo que hago. Yo recibo de un fabricante una tarifa en PDF. Esta tarifa en PDF me la transformo a Word con el programa "Solid Convert PDF" Una vez la tengo en word me lo paso copiando a excel con el formato que te adjunto. Tiene que ser de esta forma. Primero el código del artículo, que tipo de artículo es, si es ud ó ml, Descripción breve, casillas en blanco, unidad, precio/ud y finalmente lo que será el precio final. Llegados a este punto, tengo que insertar entre artículos una fila hasta el final de los artículos. Y una vez insertadas todas las filas, la celda "D1" la tengo que copiar de en la celd…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.9k visitas
-
-
Buenas tardes, Estoy a punto de finalizar el proyecto y tengo 2 pequeñas problemas que nos soy capaz de resolverlos. Os comento: 1ª - No consigo de evitar el parpadeo en la hoja "LISTADO" aun que para evitar el parpadeo debo de poner: Application.ScreenUpdating = False y al final Application.ScreenUpdating = True. 2º - Al ejecutar la macro introduciendo la fecha en la celda "K3" me tien que devolver los totale en la ultima fila como en la imagen adjunta. Adjunto el documento Muchas gracias por vuestra ayuda y perdonarme por ser pesado.. Saludios, Jose BREAKFAST LIST - evitar parpadeo y alinear suma total en fila unica - cop…
-
0
Reacciones de usuarios
- 13 respuestas
- 1.9k visitas
- 1 seguidor
-
-
Buenas tardes amigos, un saludo, uds saben si es posible ejecutar unas macros que fueron desarrolladas en Windows de excel y tratar de ejecutarlas en excel de Mac? , tengo un archivo que usa macros y me han pedido que se pueda utilizar el archivo en una máquina de MAC, pero al abrirlo este me despliega un mensaje que el archivo que intento abrir tiene errores y que excel de mac podría repararlo en su máxima capacidad, realizo el proceso y me descompone el formato así como no me traslada los códigos de macros, no se si debo tomar en cuenta algunas variaciones que necesite saber para modificar mis código y pueda llevarlo a ejecuta a excel de mac. muchas gracias!
-
0
Reacciones de usuarios
- 2 respuestas
- 1.9k visitas
- 1 seguidor
-
-
Tengo un archivo de txt que necesito poder levantarlo y que me conserve el formato, pero necesitaria que me permita poder delimitar la longitud ya que por ejemplo al principio tengo una serie de NUMEROS unidos con un TEXTO, y eso por ejemplo lo quiero poner en dos columnas. aca les deje un ejemplo y el txt para que me ayuden. 20052614048PEREZ CARLOS F 001029758 0.00008000000 0 4774.12 4773.16 0.00 0.00 0.00 0.00 0.00 4773.16 4773.16 4773.16000 0.001 0.0011 1 0 0 4773.16 0.00 0.00 0.00 0.00 30 4773.161 0.00 0.00 0.00 4773.16 0.…
-
Estimados. Por favor agradecere su ayuda en lo siguiente, tengo una tabla con ventas de articulos, necesito saber cuales son los articulos que tienen movimiento y si no tienen movimiento durante los ultimos 5 meses deberia agregarse el signo "X" al final de la tabla, por favor su apoyo al respecto. Subo el archivo Ayuda.zip
-
Hola amigos, Espero alguien pueda tener una solución a mi problema, a lo mejor suene un poco repetitivo que otras consultas planteadas aquí, sin embargo ya he buscado en diferentes lados y no encuentro solución a mi problema, incluso yo supongo que debe de ser algo muy simple pero no logro encontrar la solución. El problema es el siguiente, tengo una macro para enviar un correo a mis clientes adjuntando su factura y archivo XML, sin embargo deseo firmar el correo con una imagen el cuerpo del mismo, el método de envío a través de webmail y no por Outlook como en varios temas se ha dado solución, la cuestión es que en el cuerpo de mi correo aparece un pequeño cuadrito gri…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.9k visitas
-
-
Buenos Días, soy nuevo en esta pagina y no entiendo mucho sobre macros, estoy mas que nada tratando de aprender ademas de volver mas dinámico mi trabajo. La ayuda que necesito es para crear una macro que básicamente me calcule los intereses, consiste en que tengo dos libros de excel, con dos hojas distintas, en un libro tengo la base de datos, el cual coloco valores negativos o positivos dependiendo de la situación del contribuyente (en el cual los negativos son las deudas), en la otra lista tengo formulas inventadas por mi no mas, para llevar a cabo el calculo de los intereses; Cada planilla esta dividida en conjuntos (0-1, 2-3, 4-5, 6-7, 8-9) según el CUIT de cada uno.…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.9k visitas
-
-
Estimados Buenas Noches Acudo a uds una ves mas para solicitar de vuestra valiosa ayuda. Arme un codigo de la siguiente manera, me ayude de google para llegar a este: Sub AbrirWeb() Dim IE As Object Set IE = CreateObject("InternetExplorer.application") IE.Navigate "http://www.mercadopublico.cl/Portal/Modules/Site/Busquedas/BuscadorAvanzado.aspx?qs=1" Do DoEvents Loop Until IE.readystate = 4 IE.Document.getelementbyid("txtSearch").Value = "2239-14-LP14" IE.Document.getelementbyid("btnBusqueda").Click IE.Visible = True 'Posibilidad de obtener codigo fuente 'IE.Visible = False End Sub[/CODE] Este código me abre la pagina web, lo hago así porque deb…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.9k visitas
-
-
Hola amigos del foro, Estoy ejecutando esta macro, y continuamente me muestra 'Error definido por la aplicación o el objeto': Sub ProtegerHoja() Dim fila As Long fila = Sheets("Hoja1").Range("A1048576").End(xlUp).Row Dim contraseña As String contraseña = "abcd" With ActiveSheet .Protection.AllowEditRanges.Add Title:="Rango1", _ Range:=Range("A3:H" & fila), _ Password:=contraseña .Protect Password:=contraseña, _ DrawingObjects:=True, _ Contents:=True .EnableSelection = xlNoRestrictions End With End Sub No sé dónde …
-
0
Reacciones de usuarios
- 6 respuestas
- 1.9k visitas
-
-
Buenos días, Amigos de foro quisiera solicitar la colaboración de ustedes para resolver lo siguiente, estoy intentando aplicar un filtro a listbox en un form(Userform5), en el cual los criterios del filtro se definen en: mes(combobox1) y día(combobox2), esto sin recurrir al uso de un botón, respetando el encabezado de cada columna y que los valores de ambos combobox sean valores únicos. Hace pocos días JSDJSD me dío un ejemplo de este tipo de filtro por medio de un combobox pero he sido incapaz de agregar el segundo, adjunto el archivo por si pueden colaborar. Saludos J Consulta filtro combobox.xlsb
-
0
Reacciones de usuarios
- 7 respuestas
- 1.9k visitas
- 2 seguidores
-
-
Hola a todos y gracias por vuestra ayuda de antemano. Me he encontrado con un problema que no sé muy bien como resolver, espero que alguien me pueda hechar una mano, porque ya le he dado mil vueltas y estoy atascado, la verdad. Gracias. Sub buscar() 'Caso 1, compara fila por fila en el rango C1:C100 'Si en una fila encuentra el valor 1 y además el CheckBox1 está marcado escribe ok en F1 'Pero esta condición solo se ejecuta si el CheckBox1 está activado 'Si quiero recorrer todo el rango y escribir ok en cada acierto: 'Worksheets("Hoja1").Range("f" & i).Value = "ok" Dim i As Integer For i = 1 To 100 If Worksheets("Hoja1").Range("c…
-
0
Reacciones de usuarios
- 10 respuestas
- 1.9k visitas
-
-
Buenas, necesitaria ayuda con el siguiente codigo: If ComboBox1 = "Ingreso" Or ComboBox3 = "Efectivo" Then Cells(39, mes).Value = TextBox1.Value + ActiveCell.Offset(35, 0) End If If ComboBox1 = "Egreso" Or ComboBox2 = "Efectivo" Then Cells(39, mes).Value = Cells(39, mes).Value - TextBox1.Value End If Esta en un formulario con tres combobox y un textbox. La operatoria que busco es simple, si en determinado combobox hay una palabra, el dato del textbox se suma o se resta al valor de una celda. El problema me surge cuando en el combobox1 pongo Egreso, ya que no me hace la resta. Agradezco a quien tenga tiempo e intenciones de ayudarmeee.....
-
Hola gente de esta maravillosa comunidad, estoy llevando un curso de Office Avanzado y me tope con un problema en Macros Excel VBA, me han dejado un ejercicio que me ha dado dolor de cabeza (por lo novato que soy). En 1ra columna tengo el nombre de 5 empleados, en la 2da columna en un "cuadro de texto" escribo los días trabajados por los empleados, en la 3ra columna introduzco los pagos por día de cada empleado, en la 4ta columna necesito calcular los sueldos de cada empleado multiplicando la 2da y 3ra columna (mi idea brillante y poco sencilla fue el colocarle un "botón de comando" en cada una de las filas y multiplicarlas), pero lo que quiero es que no se vea ta…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.9k visitas
-
-
Buenas, soy nuevo en el foro. Quería saber si podrían ayudarme con un problema que tengo y no encuentro la forma para resolverlo. No tengo muchos conocimientos en VBA, asi que espero que me puedan ayudar. Voy a tratar de explicar lo mejor posible lo que busco. Lo que quiero concretamente es que cuando el usuario ingrese un valor en la columna "Cantidad de vagones no descargados", automáticamente se agregue una fila abajo del último registro de la planilla, en la que se copien todos los datos ingresados hasta el momento (de la fila en la cual se había ingresado el numero de vagones no descargados). Adjunto archivo con ejemplo. Agradezco de antemano su ayuda Planilla.xl…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.9k visitas
-
-
Buen dia ..estimados Maestros del excel tengo un error que deseo corregir cuando busco una herramienta con Combobox y me muestra el listado de esta en listbox ( que esta bien) y despues de finalizado quiero dejar el combobox en vacio y que en el Listbox aparescan todas las herramientas nuevamente .. como lo puedo realizar..? por favor su gran ayuda , gracias atte Milton Villarroel Copia de existencias nvo 23 marzo 2020.xlsm
-
0
Reacciones de usuarios
- 3 respuestas
- 1.9k visitas
- 1 seguidor
-
-
Hola buenas noches, He estado investigando y no consigo realizar una búsqueda con los campos de mas de 10 columnas. El método que utilizo es el Additem y este solo me permite hasta un máximo de 10. Adjunto método y archivo: Private Sub txt_btfiltro_Click() numerodatos = Hoja9.Range("A" & Rows.Count).End(xlUp).Row ListPedidos = Clear Y = 0 For fila = 3 To numerodatos numeropedido = Hoja9.Cells(fila, 3).Value If UCase(numeropedido) Like "*" & Me.txt_pfiltro.Value & "*" Then Me.ListPedidos.AddItem Me.ListPedidos.List(Y, 0) = Hoja9.Cells(fila, 1).Value Me.ListPedidos.List(Y, 1) = Hoja9.Ce…
-
0
Reacciones de usuarios
- 10 respuestas
- 1.9k visitas
- 1 seguidor
-
-
Buenas noches Estimados, Vengo por ayuda. Ustedes van a decir vaya a un foro de access, pero no es que ya monte todo lo que necesitaba en excel y solo me hace falta una pequeñez en access. la siguiente macro que tengo para que me envie una informacion a access de un libro de excel solo me trae la primera hoja del libro no se como corregirla. adjunto el archivo pero esta es la descripcion. Archivo de Excel "Datos" Contiene las siguientes hojas: Hoja1 Manuel Hoja2 Alberto Hoja3 Datos Hoja4 Coy lo que deseo hacer es una macro en access que me traiga el contenido de cada hoja. Aunque esto deberia traerme un listado de nombres me supongo de una tabla de usuarios y …
-
0
Reacciones de usuarios
- 1 respuesta
- 1.9k visitas
-
-
Veamos tengo la siguiente duda se puede capturar un hwnd de cualquier objeto que este en el userform?, por el momento logro esta acción sobre el userform con el uso de api pero no lo logro para por ejemplo un combobox Para la captura del hwnd uso lo siguiente Option Explicit ' declaración api '''''''''''''''''''''''''''''''''''''''''' Private Declare Function FindWindowEx Lib "user32" _ Alias "FindWindowExA" _ (ByVal hWnd1 As Long, _ ByVal hWnd2 As Long, _ ByVal lpsz1 As String, _ ByVal lpsz2 As String) As Long ' función para la captura '''''''''''…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.9k visitas
-
-
Buenas a todos: Estoy empezando en la programación en VBA para Excel y gracias a vuestro foro, estoy aprendiendo bastantes cosillas pero me he quedado atascado con algo y no soy capaz de encontrar la solución. Estoy haciendo, a modo de ejercicio, un sencillo programa que permita al usuario introducir una matriz de dimensión variable para calcular su función inversa. La matriz se escribe desde la celda A4 en adelante y mi idea es que el programa lea el número de columnas con contenido para establecer el orden de la matriz, redimensionar los vectores y calcular la inversa. El programa es el siguiente: Option Base 1 Dim M() As Variant Dim MInv() As Variant Sub Inv…
-
0
Reacciones de usuarios
- 0 respuestas
- 1.9k visitas
-
-
Buenas, desde Gijón-Asturias-Spain, Disculpad si el tema ya ha sido resuelto, hay tanta información que me resulta imposible localizarlo. Es posible proteger un libro para que en una fecha determinada excel pida introducir contraseña? Saludos Lobato
-
0
Reacciones de usuarios
- 2 respuestas
- 1.9k visitas
- 1 seguidor
-
-
Hola Masters, Soy nuevo en este foro y primero que nada los quiero felicitar por que ayudan muchísimo a las personas que vamos comenzando en este mundo de excel avanzado. Estoy construyendo una interfaz tomando como base algunos ejemplos que han subido al foro pero me he atorado en querer editar datos de mi listbox y que se actualice en la base de datos al dar clic en el botón "Guardar", espero que me puedan ayudar, les dejo mi excel. Saludos a todos y de nuevo GRACIAS!! Matriz KPI´s OK.xlsm
-
0
Reacciones de usuarios
- 10 respuestas
- 1.9k 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.