Hola a todos.... he insertado un control calendar en mi hoja ,pero.... la fecha que aparece en el no se corresponde a la del dia en curso... ¿ Como lo puedo solucionar esto....? Muchas gracias a todos por vuestro tiempo... Un saludo

Tengo esta macro para que al pisar una celda SOLO del rango B14 a B23, me abra un formulario Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'If Intersect(Target, Range("B14:B23")) Is Nothing Then If Intersect(ActiveCell, Range("B14:B23")) Is Nothing Then 'Target.Range ("B14") BUSQ_FACT.optProEntr.Visible = False BUSQ_FACT.optProEntr.value = True BUSQ_FACT.Show End If 'If Target.Column = 2 Then BUSQ_FACT.Show End Sub[/CODE] Soy muy malo en estas cosas de macros y otros He usado otras lineas de codigo pero algunas me funcionan mal, otras no me funciona y otra funciona pero cierro el form y se vuelve a abrir solo, y lo repite una y otra …

Hola amigos! Necesito vuestra ayuda, he estado creando un pequeño programita para rellenar un formulario y que aparezca en un listbox y en la hoja de excel. El código lo he estado haciendo por mis pequeños conociemientos y buscando por internet. A ver si alguno con mas experiencia me puede ayudar. Tengo muchos problemas, pero os contaré poquito a poco: El primero, cuando relleno el formulario y doy a ingresar y pongo el nombre de una hoja que no existe, me crea la hoja con la cabecera pero sin los datos. Me podéis ayudar? Ando muy perdido. Muchisimas Gracias, para cualquier aclaración ya sabéis. Un saludo viiic Vic1804.xls

Buenos días. Soy un poco nuevo en este tema de los macros y programación y en el foro también, espero puedan ayudarme con este archivo. Lo que pretendo es que en la hoja "calendario" me muestre en las casillas correspondientes al día, el texto que agregue en la hoja "1" como un comentario, actualmente el código solo hace que muestre lo que se encuentra en la celda "C5" de la hoja 1 y en la celda activa de la hoja "calendario" como prueba, entonces para que me agregue el comentario tengo que seleccionar primeramente la celda a la cual corresponde el día y la idea es que tenga que evitar esto y pueda modificarlo desde la hoja "1" y así sucesivamente en los demás meses (se…

Hola a todos, Tengo una macro que lo que hace es separar cuentas pendientes por cada uno de mis clientes y las envia directamente a su correo. El problema es que cada uno de los correos que manda pesa 4mb y esto me vuelve muy lento tanto mi excel como mi outllok y en realidad no es un archivo grande el que manda. Habra alguna opcion para que estos correos se hagan un poco menos pesados? De antemano, gracias por sus comentarios. Les adjunto un ejemplo de lo que envia la Macro: EjemploMacro.xls

buenas trades, tengo una inquietud, que comando se utiliza para que cuando corro la macro aparesca en la grafica que estoy modificando o utilziando. con el codigo Range("celda").Select queda en la celda pero necesito que quede en la gráfica. gracias de antemano.

Hola de nuevo. Hace tiempo que no molestaba pero he retomado algun proyecto que tenía aparcado y ya tengo problemas. Creo que es fácil, pero no logro salvar el error. Es con la combinación de Range y Cells. .Sheets("RES_Origen").Range(Cells(61, Val(mMes) + 2), Cells(84, Val(mMes) + 2)).Copy wdatos.Cells(5, col + 2).PasteSpecial xlPasteValues Con este código me salta un error. Sin embargo si lo hiciera con Range no da error. .Sheets("RES_Origen").Range("G61:G84").Copy wdatos.Cells(5, col + 2).PasteSpecial xlPasteValues He de usar la combinación con Cells porque está dentro de un bucle que va copiando diversas coumnas y no puedo fijar el Range. …

Buenas tardes!!! A ver si me podéis echar una manita. Estoy intentado comparar 2 columnas (columna C de la Hoja “Datos” y la columna A de la Hoja “Historico”) para una vez comparadas, me copie lo que tenga de más en la columna C de la Hoja “Datos” en la columna A de la Hoja “Historico”. Muchísimas gracias. Un saludo, Libro1.xlsm

Hola, antes que nada, les agradezco el interés en la publicación. Estoy trabajando en el siguiente código: --->>> Sub SoftToken_Test() Dim cObj As Object Dim Programa As Object Dim Proceso As Object Set cObj = GetObject("winmgmts://.") Set Proceso = cObj.ExecQuery("SELECT * FROM " & _ "Win32_Process WHERE Name = 'SoftToken.exe'") For Each Programa In Proceso On Error Resume Next Call Programa.Terminate On Error GoTo 0 Next Set Proceso = Nothing Set cObj = Nothing End Sub <<<--- El cual termina la ejecución del programa en cuestión, pero desearía su ayuda en…

Hola sala, ya se dio solucion a este caso, lo podem,s cerrar, garcias,,, David copia base de datos.rar

Hola Amigos Por favor quisera que me ayuden a crear una macro que permita insetar automaticamente la formula que aparece en la celdas de a Columna "E1" y "F1" a lo largo de cada una de las columnas respectivamente,algo así muy parecido a lo establecido en la Columna"D". Gracias por su ayuda, de antemano. InsertarFormulas.zip

Hola, soy nuevo en el foro, necesitaria ayuda para crear una alerta/alarma... Yo tengo una hoja con 4 columnas "Entrega", "Pago", "Cliente" e "Importe", lo que yo necesito es que al iniciar el programa(frmMenu) me de una alerta sobre que clientes tienen entre 15 y 10 dias para que llege a la fecha de pago, y lo mismo de 5 a 1... En el caso de que pagen, que pueda marcarlo de alguna manera para que el sistema lo pase por encima y no me avise... Estube buscando en todo el foro, pero todo lo que encontre no logre hacer nada... se me complico mucho, el Programa en si es mas grande, solo puse esa parte para no hacerlo pesado. Estube pensando, y podria poner de color amari…

Hola buenas tardes, primero que nada me presentaré mi nombre es Adán Garrido y llevo aproximadamente un año trabajando en excel, no me considero un experto ya que no he entrado al mundo de las macros y de la programación en VBA. El motivo de este tema como pueden leer en el titulo es para agilizar una tabla de excel, el funcionamiento se los explicare continuación junto con el archivo de excel. El formato es sobre la captura de tiempos y materiales de una empresa, mas específicamente del área de carpintería, la tabla principal consta de un apartado para la información del producto, después esta la tabla de tiempos y al final la tabla de captura de materiales, la mas "com…

Buenos dias, Les comento Tengo una matriz en la solapa uno (doble) en la cual marco con una X cirtos valores [ATTACH]39126.vB[/ATTACH] la idea es crear una macro con el la solapa dos me muestre en la una fila y columna o 2 los datos que estan marcados con X y que si marco algun nuevo campo corra la macro automaticamente y lo muestre si es posible la idea quedaria asi [ATTACH]39127.vB[/ATTACH] Agradecería que me den una mano con el macro.

Estimados, Hace un tiempo acudí por su ayuda para incrustar unas imagenes en excel y recibí su ayuda. https://www.ayudaexcel.com/foro/macros-programacion-vba-10/codigo-para-insertar-dos-imagenes-24023/ Acudo nuevamente a su ayuda ya que en el mismo archivo que me envió Marco Antonio, necesito ejecutar una macro al cambiar la imagen he estado intentando pero no me deja actualizar la imagen y llama a la macro demasiado pronto. También he probado con este código que encontré en la red ligándolo al botón VerCedula pero no funciona: Sub Abrir dim contador as integer dim ejecuta contador = "1" do while contador <= "5" if contador = 1 th…

Quisiera tener una macro para pegar los datos de la hoja "Datos" a varias hojas en el "Formato destino" (zona naranja), creandose las necesarias (p1, p2, p3, ...) si cada 23 filas debemos cambiar y crear una hoja nueva. Adjunto los datos y una hoja medio llena para ver donde van los datos. Gracias. prueba.zip

Buenas tardes bueno mi duda y ojala y alguien pueda ayudarme es que tengo un formulario con un textbox y un listbox, lo que deseo hacer es que cuando tu escribas un nombre en ese textbox le das click a un botón y te llene el listbox con datos relacionados con ese nombre mi problema es que solo me manda un dato el ultimo para ser preciso y tengo varios datos en relación a un solo nombre en varias columnas si alguien me pudiera ayudar a que me muestre toda la información se los agradecería mucho

Hola de nuevo, Tengo un libro con 15 hojas de datos y 1 inicial donde quiero hacer un resumen. Necesito copiar todas las filas de las 15 hojas que contengan datos a la primera hoja llamanda RESUMEN. He buscado en el foro y la red y he encontrado una macro que lo hace pero necesito que me copie desde el rango A2 hasta la K2 todas las filas que tengas datos, esdeir que cuando en la columna A encuentre una celda en blanco para de opiar. Os dejo la macro Sub ejemplo() 'por luismondelo 'Sheets.Add after:=ActiveWorkbook.Sheets(ActiveWorkbook.Sheets.Count) 'ActiveSheet.Name = "RESUMEN" For Each Hoja In ActiveWorkbook.Sheets If Hoja.Name <> "RESUMEN" Then Hoja.Range…

Hola amigos de Ayuda Excel El día de ayer dos excelentes colaboradores de AE, ante una consulta que hice, me propusieron que era mejor una macro que ejecutara otra macro de manera automática. Uno de los colaboradores me brindó el siguiente código que me funcionó perfectamente: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Row > 4 And _ Target.Column = 5 And _ Target(1, 1) <> "" Then Call MacroA End If End Sub Al respecto pensé, que tenía 3 hojas similares que podía aplicar la misma estrategia, pero con la diferencia de que en éstas hojas, la celda que va a determinar la ejecución de la macro …

Hola a todos, les comento que no soy un experto en macros, el archivo que les adjunto lo baje de este porta y me parecio muy bueno, solo quisiera saber como hago para una suma total de la columna Dias dejando una fila en blanco, con un rotulo "[ATTACH]36581.vB[/ATTACH]" y que quede similar a la imagen que les adjunto. Espero que me puedan ayudar, muchas gracias. Gracias ARAM9 Datos.xls

Lo he intentado y el codigo no es muy brillante que digamos, me funciona al menos, pero lo unico es que los datos se deben ir grabando al final de la tabla dependiendo del "Quartal" que haya introducido el usuario en el ListBox del principio. Pues al ir introduciendo los datos me los va grabando donde le da la gana, no detras de la fila correcta... Ademas como no se sabe el numero de filas que tendra un Quartal pues depende del numero de facturas, habra que introducir filas a mano y creo que desbaratara el codigo... Gracias help.zip

Hola a todos, aprobechando de vuestra generosidad , queria preguntar lo siguiente: tengo un libro que consta de 5 hojas y en una de ellas quiero realizar lo siguiente, tengo en la columna B, los kilometros de varios coches; en la columna C, cuando se realizo el cambio de aceite y en la columna D el proximo cambio de aceite y queria saber como hacer para que dependiendo de los Km, que tenga en la columna B , se resaltara en Rojo, por ejemplo, en el proximo cambio de aceite,en la columna D siempre que los Km. fueran mayores que el cambio de aceite, Resumiendo que me avise que se ha pasado de Km. para el proximo cambio de aceite. Lo he intentado con el formato incondic…

Tengo programada esta macro para insertar una imagen en una hoja de Excel, y funciona bien. Sub InsertarImagen() Set MiPc = CreateObject("Scripting.FileSystemObject") Set Carpeta = MiPc.GetFolder("C:\Documents and Settings\Usuario\Escritorio\foto\") Set Archivos = Carpeta.Files For Each Archivo In Archivos: Exit For: Next ActiveSheet.Pictures.Insert(Archivo).Select ActiveCell.Select End Sub La pregunta es: ¿como se programaría para un equipo con sistema operativo MAC?

Hola buenas! He estado merodeando por el foro per no he encontrado ninguna pregunta parecida del todo, y me sobta puesto que encuentro que es algo que si realmente se puede conseguir hacer dentro de Excel el resultado es muy atractivo. Resulta que estoy en una liguilla donde cada semana los participantes ganamos una cantidad yi de puntos que se añaden a los que hemos ido acumulando a lo largo de las 38 semanas. Es por eso que decidí crear un ranking para irlo pasando actualizado en forma de gráfico cada semana por el grupo de whatsapp. En ese grafico de ranking se encuentra un simple histograma donde cada elemento X (cada columna) equivale a la suma de punt…

Buenas tardes, Agradesco a todas las personas que colaboran en el foro para la mejora de muchas cosas, mi motivo es el siguiente, tengo unos datos filtrados, pero necesito de que el filtro zona dependa de lo que se escoja en la lista superior e igualmente con el alimentador, muchas gracias. ARCHIVO GABRIEL.xls