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?
8686 temas en este foro
-
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
-
Que tal, rápidamente les agradezco el apoyo a todos los que lo necesitamos, en verdad es una super ayuda. Lo que necesito es para pasar todos los datos contenidos en una fila que contengan una palabra determinada. por ejemplo: tengo varios productos que se pagaron de forma diferente, en una columna tengo especificado su forma de pago. lo que quiero es especificar en algún lado la palabra "efectivo" o "cheque" (forma de pago) y que me pase toda la información de las filas que contengan pago en "efectivo". Lo hice mediante una formula de condición "si" pero me deja filas en blanco. me dijeron que seria mejor con una macro. El detalle es que no tengo especificado el …
-
0
Reacciones de usuarios
- 4 respuestas
- 2k visitas
-
-
Hola, Estoy intentando de adaptar una macro que tengo de otro proyecto y me da error "run-time 424 se requiere un objeto". He buscado información sobre el error en causa pero no me aclaro. Lo que pretendo, en la hoja "LISTADO" atraves de un TEXTBOX en cuanto voy escribiendo un nombre completo o parte de un nombre se me muestra solo la/las fila/s que se aproximan o contienen el nombre completo de la lista de base de datos que tengo en los rangos "B7:H10000". Tal como lo tengo ahora escribo en la celda "C4" el nombre completo y me marca en amarillo la parte de la fila que contiene dicho nombre. Si la lista es demasiado larga costara mucho en localizar la…
-
0
Reacciones de usuarios
- 8 respuestas
- 2k visitas
- 1 seguidor
-
-
Buenos días, Quiero copiar datos de ciertas columnas de una tabla del LibroOrigen a un nuevo libro ( LibroDestino) He conseguido crear una macro que funciona cuando están todas las celdas completadas (hoja 2 del archivo adjunto) pero si hay vacío da error (hoja1) Para seleccionar el rango de celdas origen he seleccionado esto: 'Seleccionar rango de celdas origen rngOrigen.Select Set a = Range("K1", Range("K1").End(xlDown)) Set b = Range("L1", Range("L1").End(xlDown)) Set c = Range("O1", Range("O1").End(xlDown)) Set d = Range("P1", Range("P1").End(xlDown)) Set e = Range("Q1", Range("Q1").End(xlDown)) Set f = Range("R1", Range("R1").End…
-
0
Reacciones de usuarios
- 3 respuestas
- 2k visitas
-
-
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
- 2k visitas
-
-
Buenas tardes, estoy teniendo un pequeño problema con una macro; resulta que tengo una hoja que a traves de un botón actualiza una tabla proveniente de internet, y una vez que actualiza, realiza operaciones (remplaza "." por "," para que me lo pueda leer como número) Pero resulta que al ejecutarla me he dado cuenta que primero realiza las operaciones y por ultimo actualiza, cuando en realidad el orden es al revés, porque puede ser? Alguno que me oriente porque me desconcertó el problema. El código que uso es : ActiveWorkbook.RefreshAll Dim i, f, final As Integer 'todo Sheets("Todo").Activate For i = 2 To 10000 If Cells(i, 1) = "" Then final = i - 1 Exit For…
-
0
Reacciones de usuarios
- 0 respuestas
- 2k visitas
-
-
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
-
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
- 2k visitas
-
-
Tengo escrita una función en el libro PERSONAL.XLSB (excel 2010) además de otras macros. Las macros las tengo disponibles en cualquier momento,puedo seleccionarlas desde la ventana MACRO y ejecutarlas sin problemas; sin embargo la función mencionada cuando quiero utilizarla desde una celda me da error (nombre de función desconocido). He probado a copiar esta misma función en un módulo del libro que tengo abierto y así si que puedo utilizarla sin problemas, pero me gustaría tenerla disponible sin tener que copiarla en todos los libros donde quiero disponer de ella y para ello la solución sería tenerla en PERSONAL.XLSB. Cual puede ser el problema ? Un saludo.
-
0
Reacciones de usuarios
- 1 respuesta
- 2k visitas
-
-
buenas tardes a todos los compañerossss... les agradezco de antemano su colaboración e intención con mi duda... tengo un documento de excel y vba (programa) que al ejecutarlo me abre inmediatamente el primer formulario, donde se debe escribir un nombre de usuario y contraseña.... mi pregunta es la siguiente... hay alguna forma de poder incluir en este formulario o en el documente en gral, una macro o aplicacion de tiempo que se ejecute cada 30 días a modo de licencia en programasss...de modo que cada 30 días el programa se bloquee y cambie de contraseña automáticamente....(contraseña que deberé saber yo únicamente) dicho formulario contiene dos textbox (textbox1 =usuar…
-
0
Reacciones de usuarios
- 1 respuesta
- 2k visitas
-
-
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
-
-
Buenas a todos, este es mi primer post, y lo primero decir que me parece un gran foro, con gente que controla mucho y tienes ganas de ayudar. Por eso, enhorabuena a toda la comunidad. Al grano con un problema que me tiene un poco loco: Primero decir que soy totalmente novato en vba y estoy haciendo una aplicacion simple para gestionar una tabla con datos, a modo de base de datos, para consulta con filtros predefinidos y posiblidad de impresion de reportes. Mi problema es con las fechas...tengo un listbox para las busquedas y desde esos datos filtrados saco el reporte (son 11 columnas), todo funciona correcto y me lo muestra dentro del control listbox perfectamente, p…
-
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
-
-
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
-
-
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
-
-
Hola amigos, un favor, alguien puede decirme como puedo registar más de 250 carácteres, tengo una macro el cual me registra en una hoja2 los datos escritos en B4, al mismo tiempo me copia la hoja1 a otro libro, pero aquí está el problema, cuando me hace la copia no me copia todo lo escrito sino solo una parte. les adjunto mi archivo para ver si me pueden ayudar, gracias registrar mas de 250 caracteres.xls
-
0
Reacciones de usuarios
- 8 respuestas
- 1.9k visitas
-
-
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
-
-
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
-
-
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.…
-
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
-
-
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
-
-
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
-
-
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
-
-
en un formulario he colocado un webbrowser el cual es controlado por unos botones los cuales abren ciertas paginas de internet, el problema consiste en que las paginas web que se abren tienen un botón para cerrarlas, al hacer clic en este cierra el webbrowser del formulario, y al dar clic en otro botón manda un mensaje de error en el método 'Navigate' de objeto 'IwebBrowser2', como se le puede hacer para que el formulario se actualice y asi vuelva aparecer el webbrowser en el mismo. Gracias por la ayuda.
-
0
Reacciones de usuarios
- 0 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.