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, tengo una hoja de excel en la que voy registrando mis actividades en bici. Suelo ir añadiendo filas a la misma y muchas veces algunas están duplicadas. Estoy intentando hacer una macro que las elimine automáticamente pero no soy capaz de conseguirlo. Adjunto una hoja de ejemplo en la que me gustaría eliminar las filas 5 a 9 (las he señalado en amarillo) porque ya están incluidas en las filas 10 a 14. He conseguido hacer una macro pero me elimina las más antiguas, la adjunto también. La columna que utilizo para detectar los duplicados es la columna de fecha que incluye la hora y que por tanto nunca podría repetirse... ¿Puede alguien ayudarme? …
-
0
Reacciones de usuarios
- 6 respuestas
- 2.2k visitas
- 1 seguidor
-
-
Buenas: He creado un excel con macros (ocultas) que tiene que utilizar otra persona y le da "Error de compilación en el módulo oculto: Ahorros". He investigado y parece que el problema es que mi sistema es de 64 bits y el suyo de 32, como puedo solucionarlo? Gracias
-
0
Reacciones de usuarios
- 4 respuestas
- 2.2k visitas
- 1 seguidor
-
-
como estamos mis estimado ,pues veran venga austedes solicitando me ayuden con una pequeña cosita. de por si no me gusta usar el mouse cuando estoy digitando es por eso que tengo mi formulario ordenado para saltar de campo en campo con la tecla tab. pero tengo problemas al asignar los valores a los check box y option boton necesariamente tengo que agarrar el mouse para asignarle un valor a esos controles mi pregunta seria. existe alguna manera de poder asignarle valores con la tecla enter?. asi por ejemplo me voy moviendo con la tecla tab cuando llegue a un checkbox oprimo enter y se seleccione como tildado y asi pueda saltar al siguiente campo con tab. todo eso sin …
-
0
Reacciones de usuarios
- 4 respuestas
- 2.2k visitas
-
-
Hola buenas, estoy intentando exportar una hoja de mi libro de excel a pdf con el siguiente código: ActiveSheet.ExportAsFixedFormat Type:=0, fileName:= _ "C:\Users\admin\Documents\Mis hojas de cálculo\14LCM00000.pdf" El problema es que me dice que el método no se reconoce, por lo que me imagino que no existe la opción de exportar por que algo le falta al excel. He revisado el Mismo excel y no veo por ninguna parte ninguna opción de exportar. Tengo instalados el Acrobat reader y el PDFCreator. Incluso si doy a "Guardar Como" no me aparece como opción en los tipos de fichero el .pdf. Que está pasando? PD: He puesto Type:=0 por que no me reconocía el xlTyp…
-
0
Reacciones de usuarios
- 2 respuestas
- 2.2k visitas
-
-
Estimados: Estos datos salen de una tabla dinamica (por cuestiones de peso del archivo, he pegado los datos como valores). Los mismos son extraidos de una tabla de mas o menos 15000 registros, donde cada valor de la columna A puede tener varios registros en la columna B, sin duplicar los de la columna B, pero si los de la A. Lo que necesito hacer es lo siguiente: Extraer de todos estos datos, los que cumplan con ciertos criterios, verificando otros criterios. Es decir: necesitaria que el sistema verifique todos los registros que sean NN. Siendo NN = Verdadero, que seleccione aquellos registros de la columna A, la columna E, la mas alta, y el valor de la column…
-
0
Reacciones de usuarios
- 5 respuestas
- 2.2k visitas
-
-
Buenas tardes, Estoy tratando de armar un archivo donde al escribir los códigos de ciertos productos este los busque en páginas web y me traiga los precios asociados, la macro funciona ahora como esta pero el problema ocurre cuando un código no lo encuentra en la página me escribe el precio del código anterior. Alguien me puede ayudar a que si no encuentra ese código en la página el valor quede en blanco? Este es el código que estoy usando. Sub test() Dim IE As New InternetExplorer Dim precio1, precio2 As Variant Dim doc As HTMLDocument Range("B2:C1000").Clear Cantfila = Sheets("Hoja1").Range("A" & Rows.Count).End(xlUp).Row For …
-
0
Reacciones de usuarios
- 9 respuestas
- 2.2k visitas
- 1 seguidor
-
-
Espero se encuentren bien, estoy empezando en el mundo de Excel, en mi nuevo trabajo utilizamos AS400 para eliminar unos materiales, me gustaría crear una macro para realizar esta tarea, pero no se como se conecta Excel con AS400, alguien tiene algún vídeo o los pasos para realizarlo. Muchas gracias.
-
0
Reacciones de usuarios
- 0 respuestas
- 2.2k visitas
-
-
Buen día compañeros, espero que estén bien. Quiero molestarlos, ya que no logro encontrar solución a lo que necesito. Lo que no logro encontrar es cómo crear una lista validada en Excel, pero que tenga datos consecutivos, es decir, colocar en la lista los números del 1 al 1000 (por ejemplo), pero sin necesidad de estar escribiendo los números dentro de la lista. Sé que muchos dirán que con hacer una lista en una hoja vacía del 1 al 1000 se logra el cometido, pero no es lo que necesito, ya que no quiero llenar el archivo de hojas inútiles y que en algún futuro pueda ser manipulado. Entendería que no es necesario un archivo, puesto que no solicito macro o sim…
-
0
Reacciones de usuarios
- 4 respuestas
- 2.2k visitas
-
-
Hola espero que se las hayan pasado muy bien en compañia de su seres queridos en las pasadas fetividades queridos master la siguiente es para ver si alguien me podria hechar la mano con este problemita el cual adjunto archivo con la explicacion espero que si me entiendan que es lo que deceo lograr Sample.rar
-
0
Reacciones de usuarios
- 7 respuestas
- 2.2k visitas
-
-
Tengo un cuadro cuyas dimensiones cambiarán tanto en columnas como en filas. No sé cuál será finalmente su tamaño y necesito hacer mención a ese cuadro desde fórmulas. Quiero una fórmula que me devuelva la dirección de todo el cuadro. Así tal como lo estoy planteando, se podría con tablas pero el caso real es más complejo y las tablas no funcionan ya que las clonaré y las fórmulas cruzadas de cada tabla deberían apuntar al nuevo clon y no se está funcionando así. En el adjunto muestro que el código funciona correctamente dentro de un SUB pero no dentro de un FUNCTION. ¿Alguien me puede ayudar para lograrlo desde una función? FuncionDireccionCuadro.xls
-
0
Reacciones de usuarios
- 6 respuestas
- 2.2k visitas
-
-
Hola buenas tardes! La siguiente macro la quiero utilizar para que me sume valores que voy capturando en determinadas celdas y los acumule en una especifica celda. Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Range("A2:K10"), Target) Is Nothing Then Hoja4.[A1] = Hoja4.[A1] + Target End If End Sub El problema donde me atore es que necesito que solo sume los valores que estoy capturando y no adicione los que ya estaban con anterioridad. por ejemplo: suponiendo que inicio todo de cero y la primer captura es de 100 en la celda "A2" y en la celda "K10" capturo 50 lo que da un total de 150 que es lo que aparecerá en la celda "A…
-
0
Reacciones de usuarios
- 2 respuestas
- 2.2k visitas
-
-
Buenas noches estimados Si son tan amables y me colaboran. Necesito crear una plantilla que me permita cargar una Base de datos de 1.000 o más registros con sus diversas características. De modo que pueda posteriormente comunicarme vía Whatsapp web haciéndoles llegar información a todos estos Clientes, cada vez que tengamos promociones en el Concesionario.
-
0
Reacciones de usuarios
- 1 respuesta
- 2.2k visitas
-
-
Hola!! Necesito unir tablas de distintas hojas de calculo y crear una nueva hoja, para esto he estado utilizando la siguiente macro (Adjunta) pero me entrega los valores que estan en la celda con formula y los necesito solo como valores. ¿Que puedo hacer en este caso? ¿Qué me recomiendan? Sub Extraer_Datos() Dim shDestino As Worksheet Dim ufo As Integer, ufd As Integer Set shDestino = Worksheets.Add(After:=Sheets(Sheets.Count)) shDestino.Name = "d" For I = 1 To Sheets.Count - 1 If Sheets(I).Name = "ESCUELAS" Then Else ufo = Sheets(I).Range("A" & Cells.Rows.CountLarge).End(xlUp).Row ufd = shDestino.Range("A" & Cells…
-
0
Reacciones de usuarios
- 2 respuestas
- 2.2k visitas
-
-
Hola, estoy haciendo un programa en el cual realizo 3 mediciones Serie1, Serie2 y Serie3. Dependiendo si hago dos o 3 mediciones realizo el desvío estándar de dichas series(en este caso estoy mostrando la medición del Peso Corporal) y luego la media o mediana (dependiendo si es 2 media y si es 3 mediana), una vez que realizo eso calculo el Error Técnico de Medición: If lbPesoCorporal.Caption <> "" And txtPesoCorporalS3.Text <> "" Then PesoCorporalDS = WorksheetFunction.StDev_S(txtPesoCorporalS1.Text, txtPesoCorporalS2.Text, txtPesoCorporalS3.Text) PesoCorporalETM = PesoCorporalDS / CDbl(lbPesoCorporal.Caption) lbPesoCorporalET…
-
0
Reacciones de usuarios
- 0 respuestas
- 2.2k visitas
-
-
Hola que tal compañeros, bien lo que necesito hacer es una macro que cada vez que se ejecute filtre segun el dato principal de una columna, por ejemplo tengo una columna que se llama clase, esa columna divide todos los datos en clases, ya sea en 10, 20 o cualquier cantidad de clases, hacer aqui una macro que filtre de uno por uno no se me hizo tan complicado ya que las clases avanzan de uno en uno, pero por ejemplo si tengo otra columna con datos diferentes y no corridos, como le hago para caturar los datos que contiene esa columna y asi cada vez que ejecute la macro se vaya filtrando el siguiente valor. se que se escucha muy confuso asi que pondre el codigo de lo qu…
-
0
Reacciones de usuarios
- 1 respuesta
- 2.2k visitas
-
-
Hola estoy intentando conectar Excel a SQLITE pero no hay manera. Mi sistema: Excel 365 y Windows 10- 64 bits Lo que tengo es lo siguiente: With cnn .Provider = "msoledbsql" .ConnectionString = "DRIVER=" & Driver & ";DataBase=" & Ruta & Fichero '& ";": c_error = True .Open End With Está instalado el driver "SQLite3 ODBC Driver" y la referencia Microsoft ActiveX Data Objects 6.0 Library. Pero me da el error "invalid connection string attribute" ¿Alguien me puede echar una mano con esto? Muchas gracias por anticipado.
-
0
Reacciones de usuarios
- 3 respuestas
- 2.2k visitas
- 1 seguidor
-
-
Modificar Código Macro Numeros a Texto. Amigos, hace ya un tiempo consulte por una macro que muestra el texto de un número determinado. ( en ingles, Dolar ), me enviaron un ejemplo, el cual a la fecha no lo he podido modificar para mejorarlo de acuerdo a los requerimientos de mi trabajo. Por esta razón es que nuevamente le solicito a ustedes puedan ayudarme con esta macro. Adjunto planilla de ejemplo, donde se muestra como lo escriben (texto) manualmente y como muestra con la macro. de ante mano muchas gracias por vuestra ayuda. Winnerclip macro_num_a_texto_en_Ingles.xls macro_num_a_texto_en_Ingles.xls
-
0
Reacciones de usuarios
- 3 respuestas
- 2.2k visitas
-
-
He creado 10 botones en una hoja de excel que quiero que hagan lo siguiente: Cuando pulse el 1, me gustaría que abriera un documento de word y me colocara en la página 1 de ese documento, cuando pulse el 5 que me coloque en la página 5 ¿es eso posible? A ver si podeis ayudarme.
-
0
Reacciones de usuarios
- 2 respuestas
- 2.2k visitas
-
-
Buenas a todos, soy nuevo acá así que no estoy seguro si es por acá donde debo poner mis dudas, tengo un problema y es que tengo un archivo pdf con varias hojas con datos diferentes, de este archivo quiero extraer una sola hoja que sea traída a partir de la búsqueda de un dato único en todo el documento pdf y pegada en excel. Seré mas explicito tengo un documento con información por cédula en cada hoja del pdf, quiero hacer un macro que busque una cédula en el archivo pdf y traiga la hoja completa y la pegue en una hoja de excel. Les agradezco inmensamente su colaboración.
-
0
Reacciones de usuarios
- 0 respuestas
- 2.2k visitas
-
-
Buenos días, Lo primero que esteis bien junto con vuestras familias. La siguiente macro funcionaba en excel 2016 y ha dejado de funcionar en excel 365. Lo curioso es que si lo ejecuto paso a paso (PF8) funciona pero si se jecuta la macro de corrido no exporta las imagenes y necesito exportar mas 500. Heprobado a poner un delay hasta de 10 sg ¿Podríais ayudadme por favor? Muchísimas gracias y un cordial saludo. ---------------------------------------- Sub CopiaCeldasGrabaImagen(ruta) Dim RangoC As Range Dim Archivo As String Dim Imagen As Chart Dim Result As Boolean Archivo = ruta & ".gif" Set Rango…
-
0
Reacciones de usuarios
- 1 respuesta
- 2.2k visitas
-
-
Hola, quisiera saber si hay forma de conectarme a sql server pero con otro usuario de red de windows. Esta primera cadena, realiza la conexión pero con usuario local de sql server: cn.ConnectionString = "provider=sqloledb.1;data source=DESKTOP-GRP18I3;user id=prueba;password=prueba;initial catalog=prueba" Esta segunda cadena, realiza la conexión pero con el usuario que en ese momento esta logueado en la PC: cn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=True;Data Source=lims\ts;initial catalog=Prueba" Ambas funcionan correctamente sin embargo quisiera saber si es posible poder utilizar la segunda conexión, pero…
-
0
Reacciones de usuarios
- 0 respuestas
- 2.2k visitas
-
-
Buenos días, de nuevo molestando, tengo un formulario VBA y esta trabajado en resolución de 1440*990, mi pregunta es saber si hay alguna manera de que el formulario se adapte de acuerdo a la resolución de pantalla de la computadora en donde se ejecute el formulario. Gracias de antemano por la ayuda
-
0
Reacciones de usuarios
- 1 respuesta
- 2.2k visitas
-
-
Que tal buenos dias soy nuevo en el manejo de excel pero lo tengo que aprender a usar por mi trabajo tengo conocimiento basico pero me gustaria que me ayudaran con algo en especial que necesito en un reporte que trabajo diario en si lo que me seria de mucha ayuda es que si pudieran decirme algun codigo VB para que cuente los correos de MS Outlook pero solo de ciertas carpetas las cuales son originarias de reglas que aplique en MS Outlook pra que me separe los correos entrantes de cada usuario y bueno de este conteo lo plasme en una celda en el archivo adjunto en la hoja 1 hay una columna que dice TOTAL DE NOTIFICACIONES en esta celda por columna es donde necesito que me …
-
0
Reacciones de usuarios
- 0 respuestas
- 2.2k visitas
-
-
Buenas, tengo una base de datos que lleno mediante un formulario, cada vez que le doy "Agregar" me modifica esa fila con datos nuevos en la hoja1 (base de datos), modifico varias filas desde el mismo formulario sin salirme del mismo. ahora bien, cual seria la macro que al pinchar el botón "Agregar" me copie esta fila que modifico al historial (hoja2)? Ojo, las filas modificadas no son consecutivas hacia abajo, pueden estar salteadas. Pero en la hoja2 si puede ir pegadas a la ultima fila vacía. En resumen, necesito que cada vez que modifique esa fila mediante el formulario, me copie esa fila modificada inmediatamente a la otra hoja de historial sin salirme del formula…
-
0
Reacciones de usuarios
- 2 respuestas
- 2.2k visitas
-
-
Buenas tardes Resulta que ya aprendi a manejar combos, labels y textbox; sin embargo no se manejar listbox, asi que recurro a ustedes a ver si alguien me puede ayudar. En el adjunto hay un archivo que carga existencias, posiciones nombres etc. El problema es que en el userform3 necesito que en un listbox se carguen las posiciones (hoja2 columna f) y cantidades (hoja2 columna i) del codigo buscado por el combo. Y luego que en un label me diga cuanto hay en total. Les agradezco la atencion. Edwin Alexander Galeano I CONTROL 1.3.rar
-
0
Reacciones de usuarios
- 0 respuestas
- 2.2k 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.