Buenos dias me gustaria que alguien me digera si se puede hacer una formula ya que tengo el curso de excel basico pero no doy con ella,es poner un si o un no en una celda y me cambie la fecha al mismo dia pero siguiente mes.Serie en M.Activa si pongo SI me cambiaria al mismo dia pero con el mes siguiente pero si pongo NO se quedaria igual.Gracias de antemano y saludos. Mando el archivo. Reconsumos Líderes bueno.xlsx

Existe alguna macro que desactive las opciones de una hoja o todo el libro de: Mover o copiar Eliminar Color de etiqueta. “Tal vez me escriban pero si con solo PROTEGER LIBRO todo eso se resuelve”; pues si lo hace pero hay un problema mis macros no funciona y no sé por qué no funciona, me salen errores y si lo guardo en solo PROTEGER HOJA todo funciona bien. Tal vez alguien tenga o sabe alguna macro. No permitir agregar nuevas hojas Deshabilitar eliminar hojas; estos 2 últimos si pille macros para que haga eso y funciona bien. Entonces faltaría deshabilitar estas opciones: Mover o copiar. Color de etiqueta. Recuerden que la opción de …

Estimados Por favor su ayuda.. Estoy interactuando con internet explorer pero me surgio un problema ya que se me presnto el siguiente codigo en la pagina de internet. <select name="YEAR" class="selectfecha" onchange=" checkDate()"> <script language="javascript" type="text/javascript">for(var num=0; num<=(thisYear - 1999); num++){ document.writeln("<option>" + (thisYear-num)+"<\/option>"); }</script> <option> Text - 2012 Text - Empty Text Node <option> Text - 2011 Text - Empty Text Node <option> Text - 2010 Text - Empty Text Node <option> Text - 2009 Text - Empty Text Node <option> …

Hola chic@s. Tengo unos datos de origen en una hoja a los que hay que hacerles unas operaciones y quiero colocar el resultado donde elija el usuario. Esto lo solicito mediante un inputbox: Set celdaDestino = Application.InputBox(prompt:="Selecciona donde quieres situar el resumen", Title:="Posición de destino de los datos", Type:=8) El problema lo tengo cuando se elilge como destino una hoja distinta. Necesitaría guardar en una variable esa hoja de destino. Por ahí he encontrado una solución que selecciona esa hoja y la celda elegida y....entiendo que como así la hoja se convierte en activa ya puedo guardar su nombre en la variable hojaDestino. …

Esta instrucción al mandar un mail desde Excel, no funciona, pero tampoco da error. Probablemente me falte una instrucción previa. Agradecería ayuda. El código completo del envío es: With .ITEM .Attachments.Remove 1 If impor = 1 Then .Importance = olImportanceHigh Else .Importance = olImportanceNormal .BCC = oculta .To = destinatario .CC = copia .Subject = asunto If FICHERO_ADJUNTO <> "" Then .Attachments.Add FICHERO_ADJUNTO .SendUsingAccount = OutApp.Session.Accounts.ITEM(1): ' <---------------------------------------------------- .Send End With

Hola, mi pregunta es si se puede hacer un buscador de datos. Por ejemplo tener una hoja con muchos datos y abrir un programa que al escribir la inicial de un dato en el texbox me muestre en otro texbox o listbox las coincidencias. Y lo otro es que si me encuentra X coincidencia se pueda editar de alguna manera dentro de el programa. Gracias.

Hola, Me estoy volviendo loco tratando de hacer una macro, que en realidad es muy sencilla. Simplemente se trata de una columna con fechas separadas por ptos. (ejemplo 01.01.2021) que la copie en otra columna separada por barras , con formato 01/01/2021. Sin embargo, en alguna fechas me cambia el orden de los meses y los días, y no sé como solucionarlo. Sucede entre otras fechas el 12.07.2021 que lo transforma en 07/12/2020 Pongo una hoja de ejemplo. Gracias de antemano !EJEMPLO.xlsx

Hola, Me estoy peleando con una macro que no termino de conseguir, a ver si alguien me puede echar una mano. Tengo en un mismo directorio varios libros excel, cada uno con varias hojas, pero en cada uno hay una hoja que se llama 'resumen'. Luego tengo un libro final que tiene tantas hojas como libros con resumen. En el ejemplo que he colgado tengo 3 libros, cada uno con su hoja 'resumen' y el libro final con las hojas 'resumen1', 'resumen2' y 'resumen3'. Necesito una macro que copie el contenido de cada hoja resumen de cada libro en la hoja correspondiente del libro final. Estas hojas resumen tienen todas la misma estructura (A partir de la fila 2, rango B-W). Esta …

Hola Quisiera me ayudaran en lo siguiente como hago una macro para buscar una grafica por su nombre y copiarla y pegarla en otra hoja si y solo si esta grafica existe. Necesito hacerlo para varias graficas, que las busque por su nombre(cada grafica tienen un nombre diferente) y si las graficas existen que las copie y pegue de forma ordenada en otra hoja del mismo libro. Alguna idea? Muchas gracias - - - - - Mensaje combinado - - - - - ayudaaaaa por fa

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

Hola a todos, tengo una duda que no consigo resolver. Quisiera poner un visor pdf en una hoja de mi formulario, por el foro y demás sitios he visto que lo hacen pero con la opción de que se pueda elegir cualquier archivo, yo necesito que sea un visor fijo, es decir, que se me cargue en initialize y pueda ver un pdf fijo. Este pdf es de consulta para rellenar una serie de datos dentro del formulario, por eso necesito que sea fijo...además, este pdf tiene que estar en la carpeta del excel.... Yo he probado con lo siguiente: Webb.Navigate2 (ThisWorkbook.Path & "\*.pdf") "Webb" es el webbrowser. Y con algunas variaciones más, pero me sale "Error en el método 'Navigat…

Estimados podrian revisar la macro que efectua busqueda con filtro. Registro anticipos y adelantos.xlsm

Desarrolle un sistema en PHP y MySQL para un negocio de audiocar. el caso es que ya habia deesarrollado sistemas para otro tipo de negocios como un lubricentro, y siempre los datos de los articulos(lista de precios), de los provedores vienen en archivos de excel. Aunque siempre en tablas comunes (con registros horizontales.). Pero este comercio tiene o le en via su provedor un excel como se ve en la imagen(El archivo pesa 40Mb): Y el caso es que necesito cargar esos datos en la base de datos. Como dije anteriormente teniendo una tabla comun yo lo paso directo con cualquier gestor. He probado transponer copiando y pegando el contenido pero me que…

busco una macro para que con un botón de actualizar pueda traer al libro "Consolidado" los datos que se encuentran en "libro1" y "libro2" ejemplo de Macro.rar

Hola, estoy haciendo un programa en VBA de excel y en uno de los formularios quiero realizar la media si uso dos textbox y la mediana si uso 3 textbox. El formulario es el siguiente (Es solo un pedazo del mismo): [ATTACH]30734.vB[/ATTACH] La columna S1 de textbox en orden descendente es la siguiente (txtPesoCorporalS1, txtTallaS1, txtTallaSentadoS1, txtEnvergaduraS1), las siguientes columnas mantienen la misma lógica, solo cambia el final dependiendo la columna que sea (si es columna S3, dice txtPesoCorporalS3). Private Sub Calcular_Cineantropometria()[/CODE] [/left] [CODE] On Error Resume Next Dim PesoCorporalS1 As Double Dim PesoCor…

Hola tengo 2 archivos pero al tratar de correr la macro como complemento me da error 424. este es el código, el error esta en esta linea STOCK.AutoFilterMode Then, me sale error 424 no encuentra el objeto por que según no encuentra el STOCK que es una hoja del archivo que abrió. por su ayuda gracias Dim FILE As String FILE = ThisWorkbook.Path & "\" & "STOCK.xlsb" Set fso = CreateObject("Scripting.FileSystemObject") If fso.FileExists(FILE) Then Workbooks.Open Filename:=FILE Else MsgBox "El archivo " & FILE & " no existe.", vbCritical, "ARCHIVO INEXISTENTE" Exit Sub End If If STOCK.AutoFilterMode Then …

muy buenas noches a todos necesito una ayuda en poder realizar un consolidado con codigo de vba es poder copiar de un libro a y pegar a otro libro excel . Del archivo 1, poder copiarlo en el archivo consolidado en la hoja1 , el archivo 2 copiarlo en el archivo consolidado enlCONSOLIDAR.rara hoja 2 asi sucesivamente estariia muy agradecido de quien me ayude grasias CONSOLIDAR.rar

Buenos dias estimados... Tengo la siguiente duda. ¿Es posible tener dos eventos (independientes) OnTime trabajando simultaneamente en el mismo libro? Pongo un ejemplo: El primer evento OnTime comprueba la actividad en el libro, y al tener 10 minutos de inactividad cierra el libro. El segundo evento OnTime realiza un backup del libro cada 30 minutos. Ambos eventos estan en modulos separados. Agradecido de antemano por vuestros consejos y ayuda

Hola gente, los molesto con la siguiente traba que tengo: quiero que el renglon del listbox cambie de color o quede la fuente en negrita si el valor de la columna P (Validacion) es "T". Es posible realizar esto o solo se da formato al listbox completo? Adjunto archivo que en su momento me paso Macro Antonio. Muchas gracias por la ayuda que me puedan brindar. Plantilla.rar

que tal buen dia, bueno queria saber si me pueden ayudar con la siguiente macro, lo que quiero que haga es que a determinada fecha se cree un archivo con un nombre especifico a una ruta especifica y cuando se quiera acceder a ese archivo cheque primero si no existe el archivo creado y si existe se elimine el archivo que se esta utilizando y si llegaran a tener otro archivo como el borrado y cambien la fecha se elimine igual porque seguira el archivo guardado...AQUI LES DEJO LA MACRO QUE ESTOY MODIFICANDO TIENE UN ERROR ES QUE SI YA SE GUARDO UN ARCHIVO Y LE CAMBIO LA FECHA NO APARECE EL MENSAJE Y SE SUPONE QUE SE DEBE DE APARECER EL MENSAJE Private Sub Workbook_Open() …

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

Buenos días, Estoy intentando eliminar todas las filas que tengan en la columna A celdas vacías y duplicadas. Al ejectur ambas macros por separado, Excel no hace nada. Sub Eliminarduplicados() Dim Valor As Long Application.ScreenUpdating = Fale Sheets("Hoja1").Range("A1").Select Do While Not IsEmpty(ActiveCell) Valor = Application.WorksheetFunction.CountIf(Range("A:A"), ActiveCell.Value) If Valor > 1 Then ActiveCell.EntireRow.Delete Else ActiveCell.Offset(0, 1).Select End If Loop Range("A1").Select Application.ScreenUpdating = True End Sub Sub Elimi…

Estimados amigos del foro buenos dias. Aqui de nuevo para hacerles una consulta en la cual me encuentro un poco frustrado puesto que lo he intentado de distintos modos pero aun no logro realizarlo. lo que estoy intentando realizar es que cada vez que ingrése una fecha y su horometro en sus respectivas celdas. Busque la fecha en el cronograma de la derecha me copie concatenado el horometro con el Tipo de PM y cada vez que ingrese nuevas fechas y horometros, me lo guarde en la otra pestaña (historico) esto para no perder la informacion, es decir. Coloco Fecha : 12/05/2014 horometro 14,000 busca la fecha y en el cronograma lo rellena asi --> 14,000 / PM1 y en l…

Hola amigos tengo una aplicación VBA Excel que en local funciona una maravilla, pero ahora se me ha ocurrido ponerla en red y que la utilicen al mismo tiempo dos usuarios. He pensado en la opción de la interfaz "Compartir Libro" y sorpresa, que ahí han venido un montón de problemas al actualizar datos de un libro u otro, Pregunta por Excel si deseo un cambio o el de mi compañero con un mensaje ambigüo y rarísimo , error 1004 al guardar al mismo tiempo los dos y la verdad es que es un verdadero desastre. Me han aconsejado que pase a ADO pero no sé la sintaxis. Aquí en este proyecto hay bucles en formularios sobre hojas y modificación inmediata de registro en Hojas oculta…

Hola amigo,quisiera su ayuda, lo que quiero es comparar 2 listas, lista1 y lista2 y si el valor de la lista2 es igual al valor de la lista1 entonces que me copie el dato de la celda de al costado ejm si lo encontre en b5 entonces que me copie el valor de c5 y lo copie en la hoja2 del mismo libro.El formato y una mejor explicacion lo adjunto en un archivo. Desde ya gracias por su cooperacion. Comp.rar