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
-
hola, saludos a todos solicito apoyo para pasar datos de celda C8 a un textbox3 y al borrar los datos de la celda c8 no se elimine la formula gracias Libro1.xlsx
-
0
Reacciones de usuarios
- 10 respuestas
- 5.3k visitas
- 1 seguidor
-
-
Hola Cracks! De nuevo necesitando de su apoyo, Tengo una tabla que me muestra el Fill Rate de ordenes de venta que obtengo por la siguiente formula: Cantidad facturada/Cantidad de Pedido Cuando en una misma fila esta toda la cantidad facturada por toda la cantidad del pedido la formula corre bien y nos da el 100% ,el problema está cuando una cantidad de pedido se divide entre varias cantidades facturadas se debe dividir todas por la misma cantidad de pedido, se vería de esta forma: Cantidad de Pedido | Cantidad Facturada | Fill Rate 858 396 46% 0 …
-
0
Reacciones de usuarios
- 1 respuesta
- 1.4k visitas
-
-
buenas a todos. Muchas gracias de antemano. En la web empresarial donde trabajo, te pide loguearte para acceder a los resultados..cuando ejeceuto el codigo para loguear la web, me cambia la url, por lo que no llego a interactuar con los elementos que necesito. Ahora, como puedo volver a cambiar la url una vez ya logueada? ya que si abro otro ie.navigate me abre otro navegador y me vuelve a pedir usuario y pass, entrando en un bucle,..si logro actualizar la url a la original puedo continuar con las operaciones. gracias
-
0
Reacciones de usuarios
- 0 respuestas
- 679 visitas
-
-
Hola a tod@s. Tengo el siguiente código: Sub ProductoFabr(ByVal FilaDSK As Long, ByVal FilaSHM As Long) Application.ScreenUpdating = False Dim ObjExc As Object Set ObjExc = CreateObject("Excel.Application") ObjExc.Visible = False ObjExc.Workbooks.Open Filename:="\\ServidorA\Producto\Pedidos.xlsx" .... En sub Sucede que tengo Office 2016 (32bits) con la licencia no original. La macro se ejecuta con normalidad hasta que necesito extraer información de otro libro "Pedidos" que se encuentra en la otra PC, es ahí donde la macro se detiene y muestra un mensaje, tipo mensaje emergente, que menciona lo siguiente : "Hay un problema con…
-
0
Reacciones de usuarios
- 2 respuestas
- 824 visitas
-
-
Hola cracks! Saben si es posible ajustar el tamaño de una tabla por macro, lo que pasa es que estoy haciendo un proyecto donde se agregan eventualmente nuevas filas o se cambia por completo las dimensiones y quisiera que la tabla tomara todos los nuevos datos al correr la macro y no solo los valores fijos con los que inicialmente se definió la tabla. Les dejó mi archivo en el que es un caso donde la tabla solo considera las filas de su tamaño inicial pero no las ultimas filas.Ajustar_DimensionesTABLA.xlsm
-
0
Reacciones de usuarios
- 3 respuestas
- 6.8k visitas
-
-
Hola cracks!! Estoy tratando de generar una macro que calcule el promedio de mis datos, pero en vez de que sea un rango fijo de X2:X8431 sea hasta el ultimo valor que tenga la columna X es decir que pueda variar ya que a veces son mas datos o a veces menos, les dejo el código que tengo actualmente con rango fijo. Range("X2").Select ActiveCell.FormulaR1C1 = "=AVERAGE(R[2]C:R[8431]C)" He tratado con este pero no funciona: Dim last_row As Integer last_row = Cells(Rows.Count, "C").End(xlUp).Row - 1 Range("X2").Select ActiveCell.FormulaR1C1 = "=AVERAGE(R[2]C:R[last_row]C)" Les agradezco mucho su ayuda si tienen alguna id…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.7k visitas
-
-
Buenas días a todos; -Estoy intentando pasar el valor de un listview a la celda que tengo activa y no he sido capaz. He intentado encontrar algo en San Google pero no he encontrado nada similar. Adjunto macro. Un saludo para todos. CeldaActiva.xlsm
-
0
Reacciones de usuarios
- 2 respuestas
- 1k visitas
-
-
Buenas tardes. Soy nuevo en su espacio, también en Excel-Vba con macros. No podré aportar conocimiento ni asistir a la plataforma, sólo serán peticiones de ayuda. Lo lamento y agradezco enormemente. Estoy haciendo unas macros que abren páginas web, que ejecutan la extensión Chrome Instant Data Scraper, que toman datos y los tratan sin problemas. Lo que necesito es : poder cerrar todo lo abierto, tanto las páginas web como las ventanas en la barra de tareas de Windows. Muchísimas gracias, y un saludo. Manel.
-
0
Reacciones de usuarios
- 2 respuestas
- 3.1k visitas
-
-
Buenas dias amigos. Vengo con un problemita que de seguro es simple, pero no doy con la solucion. Necesito que se busque en una columna la fecha del dia en curso, y al encontrar la fecha, copie los valores a la izquierda (es decir, los Seriales), en una hoja nueva bajo el nombre de "Seriales y la fecha del dia en curso", pero, al copiar los datos, debe dividirlo cada 44 filas (ya que cebe tener encabezado) y brincar a la fila inicial de la siguiente columna, y asi sucesivamente e imprimir esa hoja nueva. Dejo un archivo de ejemplo. Agradecido de antemano por vuestra ayuda. Busqueda creacion e impresion.rar
-
0
Reacciones de usuarios
- 1 respuesta
- 688 visitas
-
-
Buen día a todos! Soy nuevo en esta comunidad tan padre y me gustaría empezar mi participación con la siguiente duda: Estaba trabajando en una macro y de repente me apareció el mensaje "cant find project or library" y desaparecieron mis módulos. Intenté ver referencias pero ni siquiera me permitió abrirlas. Lo guardé con nombre distinto y aún así me sigue apareciendo mismo mensaje de error y nada en los módulos. Me gustaría por favor si me pudieran orientar en qué es lo que está pasando y cómo lo puedo solucionar? Ya que restauré versiones anteriores pero perdí todo el código que había cambiado antes del error. Muchas gracias…
-
0
Reacciones de usuarios
- 2 respuestas
- 892 visitas
-
-
Estimada(o) Antes que todo, espero se encuentren bien en este tiempo de pandemia y a cuidarse mucho Mi situacion es la siguiente. Tengo una tabla desde $A$4:$Z$5000 en vba....escribo Sheets("Sheet1").Range("D4").Sort key1:=Range("Z4"), order1:=xlAscending hace el orden por la columna Z pero la fila 4 la deja con datos y pierdo el nombre de las columnas debe comenzar obligadamente en la fila 1 ??? Gracias de antemano Juan Manuel
-
0
Reacciones de usuarios
- 2 respuestas
- 647 visitas
-
-
Hola amigos de Excel tengo una consulta de como se puede hacer un reporte de stock para cada codigo con cabecera . para que se entienda mejor puse con colores y agrupe los datos que pertenecen a una misma venta o compra que tienen varios items. no se si se puede llegar a al resultado final filtrando o con código ,pero puse una celdas para hacer las consultas de fecha para que me filtre el resultado que deseo . no se si esta mal la base de datos pero asi registran los datos, no se si se puede llegar al resultado que deje. bueno para que me entiendan mejor en el archivo esta como quedaria el resultado final . hay otros reportes que saca un program…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.3k visitas
-
-
Muy buen día. Hola a los amigos les pido ayuda a resolver una macro, tengo un archivo, la columna C valores iguales sume de la columna E y F el resultado se coloque en la celda N5, P5. Que al ejecutar botón se calcule la suma total y los días de extraer y adjunto el archivo.. Les agradezco su gentileza. Infomacion M1.xlsm
-
0
Reacciones de usuarios
- 2 respuestas
- 1.3k visitas
-
-
Hola compañeros, Me gustaría dejar desactivadas (o quitar, si es posible) las opciones que están marcadas dentro del cuadro rojo de la imagen adjunta, y dejarlas desactivadas tal y como aparecen en el cuadro azul. No he realizado nunca nada así, y toda la información que encuentro por Internet me aconseja realizarlo desde código XML. Pero estoy convencido de que debe de existir una sentencia algo parecido a la siguiente: ... Application.CommandBars.Controls("Eliminar").Enabled = False ... Un saludo, y muchas gracias por vuestro tiempo.
-
0
Reacciones de usuarios
- 9 respuestas
- 3.7k visitas
- 1 seguidor
-
-
Buenos días a todos; -Necesito una pequeña ayudita. A ver si sois tan amables de echarme un cabo. En una hoja Excel y en el evento "doble_click" hay un procedimiento que abre la ventana emergente de archivos de Windows y al seleccionar un elemento me inserta su nombre en un rango de celdas que he determinado. He hecho lo mismo desde un módulo. A este módulo hago la llamada a través de menú contextual de Excel. Supe configurarlo, pero me funciona con todas las celdas. No sé como hacer para que sólo funcione con un rango determinado, (igual que he puesto en el procedimiento de la hoja) Saludos y buen día a todos. Adjunto macro. MModulo.x…
-
0
Reacciones de usuarios
- 2 respuestas
- 2.1k visitas
-
-
Por favor ayudarme con esto, gracias. GESTOR().xlsm
-
0
Reacciones de usuarios
- 0 respuestas
- 1.1k visitas
-
-
Buenas tardes Amigos foristas. Les pido el favor si me pueden ayudar con lo siquiente, estoy trabajando en un formato de excel, el cual debe de tener una foto de la fachada de la casa ( 1 0 2) en un espacio demarcado en la primera hoja y en las otras hoja se anexan 6 fotos maximo por hoja. Estas fotos estan en una carpeta junto con el formato por persona. La idea es que se pueda automatizar con un botón y las orgamice uniformemente en estos espacios. Muchas gracias. Anexo formato https://www.mediafire.com/file/fh2i1l9cn6abugz/Acta_de_cierre.xlsx/file
-
0
Reacciones de usuarios
- 0 respuestas
- 576 visitas
-
-
Necesito que me ayudéis llevo toda la semana con esto de la captura de imagen y este es el codigoque menos problemas me da con las cámaras webs pero no se hacer que se graben las capturaqs como image1, image2, image3 .... en el directorio del archivo y que se carguen en el cuadro de imagen del userform1(13) formulariowebcamcaptura.xls
-
0
Reacciones de usuarios
- 0 respuestas
- 713 visitas
-
-
Hello everyone as always when it comes to evaluating by column; I lose myself in a glass of water. My problem is this: 1) In Column (A2: A200) I should enter dates 2) I would like you to write me only the day of the week of that date every time I enter the dates in the column (B2: B200). 3) While in column (C2: C200) he wrote me the same thing as in column (B) but taking only the first letter. As for example: If in Column (B) it is written (Monday) in Column (C) it should only show the letter (L) that's all! Thanks as always for all the help you want to give me about it. Greetings from Maurizio Modificare_Giorni_Set_e_Giorni_Set_Solo_Prima_Lettera.xlsm
-
0
Reacciones de usuarios
- 10 respuestas
- 2.3k visitas
-
-
Muy buenas a todos. Muy seguramente será un error estúpido pero no veo o no detecto el problema. Y es que la macro que tengo en el botón (guarda) me tira error si uso una tabla don introduce los datos, pero si la quito entonces la macro funciona a la perfeción. Os lo explicaré con capturas. Aquí se puede ver el lugar donde la macro debe introducir los datos, como se puede ver...No hay tabla alguna insertada.(captura de arriba) Ahora como podéis ver si se ha insertado una tabla, y nos dirigimos a la hoja "ENTRADAS", donde está la macro ( captura de arriba) Primero seleccionar la celda "E5"( recuadro rojo grande), después cl…
-
0
Reacciones de usuarios
- 0 respuestas
- 618 visitas
-
-
Hola Una consulta quizas alguien me puede ayudar Tengo hecho el código para enviar whatsapp desde excel. Quiero adjuntarle pdf. Para enviar lista de precio a clientes. Tengo hecho lo de buscar el pdf, traerlo, me falta lo de enviarlo Aquí les muestro el código Sub dale_Click() Este boton manda el whatsapp Dim mensaje As String Dim numero As String numerodatos = Hoja13.Range("c" & Rows.Count).End(xlUp).Row 'MsgBox (numerodatos) For fila = 8 To numerodatos 'me busca en los datos los numeros a los que mandar numero = Cells(fila, 3).Value mensaje = Ra…
-
0
Reacciones de usuarios
- 2 respuestas
- 14.4k visitas
-
-
Hola Foreros!! Tengo un macro que hace parpadear el fondo de un rango de celdas si en una determinada celda hay cualquier valor numérico. Pero sólo me funciona cuando introduzco directamente el valor en la celda; cuando el valor proviene de una fórmula no se ejecuta el macro. Además me gustaría que no solo reconociera el valor numérico sino cualquier texto en general. He probado con Private Sub Worksheet_Calculate() pero no me funciona El código que me funciona es el siguiente: Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Range("AR5:BB19"), Target) Is Nothing Then If WorksheetFunction.Count(Range("AR5:BB…
-
0
Reacciones de usuarios
- 4 respuestas
- 1.7k visitas
-
-
Necesito ayuda para capturar una imagen desde cámara web CommandCam.exe Formulario_Avanzado.xlsm
-
0
Reacciones de usuarios
- 0 respuestas
- 1.2k visitas
-
-
Hola a todos por aqui Ya tengo un macro que me realiza un Ping a una lista de IP que aqui muy amable me ayudaron a corregir unos errorsillos que me ayudo a perfeccionarlo, pero ahora estoy intentando hacer que la prueba me la realice el tiempo que uno le ingrese, pero me me marca el siguiente error tengo 3 botones, 1 corre la prueba de PING, 2 inicia el autoping, 3 detiene el autoping y el codigo que tengo es el siguiente Dim Tiempo As Variant Dim contador As Long Private Sub PingLista_Click() Call EnviarPing_CSR_Concent End Sub Private Sub Fin_AutoPing_Click() On Error Resume Next Application.OnTime Tiempo, Procedure:="Inicio_AutoPin…
-
0
Reacciones de usuarios
- 3 respuestas
- 3.3k visitas
-
-
Buenas noche, expertos necesito una yuda tengo un formulario que funciona bien, pero el detalle es cuando la hoja socios esta vacia solo con los encabezados y registro los datos con el formulario se debe agregar en la fila 2 pero este se registra en la tercera fila, solo eso de ahi adelante segistra una tras otra, lo que pido ayuda es que empiece registrar desde la fila 2. El otro tema es al momento de filtrar con la caja de texto buscar por apellidos me filtra bien pero cuando selecciono la casilla no funciona, pero si selecciono la casilla sin filtrar me selecciona la fila del ListView y los datos me muestran en los campos de texto. Por favor me podrian ayudar que…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.3k 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.