Buenos días Muchas gracias por todas las ayudas brindas en el mi proyecto. Acudo a ustedes para que me ayuden con un nuevo formulario para que el cada usuario pueda cambiar la contraseña sin necesidad de hacerlo desde la base de datos. https://mega.nz/file/cVpgDIaK#92-eFaVsW8t493NeL7GWT5YLy6dyn641Gl72fbe3FqU Saludos.

He realizado este codigo para que cuando escriba en la columna A se rellene con la hora en la casilla E. Ahora necesitaría que si borro el dato de la celda por ejemplo a1 se borrara la celda e1 y sucesivamente, es decir que si quito la información de alguna celda de la columna "a" se borrara la celda e correspondiente. Gracias Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("a:a")) Is Nothing Then Range("e" & Target.Row) = Format(Now, "hh:mm") End If End Sub

Buenas tardes; Por favor, ayuda...... Hasta este año no he tenido problemas con el número de semana en las macros que tengo hechas, digo hasta este año porque hoy al actualizar y meter los datos del año que viene .....? No sale el número de semana que tendría que salir. El número de semana le estoy sacando de la siguiente forma: día="01/01/2021" Numero_semana=format(format(día,"ww"),"0#") El número de semana resultante debería de ser 53 pero me está dando 01. Como puedo solucionarlo. Estoy con el móvil, si necesitais el Excel con el ejemplo enciendo el ordenador y lo subo. Muchísimas gracias.

Hi Everyone my new problem is this: On an excel sheet with Office 2007 I entered numbers ranging from cell (A1: E18) And Three Shape Buttons Now the purpose of this project and that I would like to be able to achieve is this: 1) Pressing the first key It should from Routine Create a Word Sheet and insert it in my sub Folder called (Attachments) with only the data taken from the cells (A1: E18) and save it with the name I insert in the cell (I1) 2) The Same Thing You Should Be Achieving with an Excel Sheet 3) Also for what concerns the file in pdf format which in some ways is the only one that I was able to make work Except for the fact that I would…

Buenas tardes compañeros, a ver si me podéis ayudar con esta macro la cual me funciona perfecta pero ahora a parte de remarcar en color las diferencias en la columna B de las dos hojas también me piden si se puede hacer que me sume el valor de las celdas de la columna M de ambas hojas y el resultado aparezca en la columna Q solo de los valores de las celdas sin color, que serian las que se repiten de una hoja en otra. Esta macro me funciona perfecta, he remarcado en rojo donde creo tiene que ir lo que pido y leo y leo y no termino de encontrar una solución. ¿Me pueden ayudar? El código que estoy utilizando es este: Sub CompararStock() Dim …

Buenas tardes Nuevamente recurro a ustedes ya que hay voy poco a poco caminando en el tema de las macros y estoy creando una plantilla para facilitar algunos cálculos ya tengo la primer parte de dicha plantilla formulada y con algunas macros les explico un poco en donde estoy atorado, dicha patilla en la hoja llamada cotización se captura información si en la parte de “No de Embarcaciones a Cotizar” el valor capturado es uno, no se necesita hacer mas ya que en esa misma hoja ya viene los cálculos correspondientes y datos correspondientes para ese caso; pero si en esa parte el valor es mayor a 1 aparece un botón llamado “Capturar” y es ahí hasta donde llegue ya que no…

Saludos, tengo un confusión con una macro que necesito que me imprima de acuerdo a un rango seleccionado y esta me imprime solo una hoja. El resultado que busco es que en la Hoja "Recibo de sueldo", tengo una formula de Buscarv, que esta asociada a la Columna AR3, lo que deseo es imprimir de una vez una serie de Recibos colocandolos en la Columna AR, que al imprimir AR3, baje de celda AR4 y así sucesivamente hasta el ultimo dato que le coloque. Cuando le doy para la impresión solo me imprime unicamente lo que esta en AR3 varias vecces. Tengo este código pero no encuentro mi error Sub imprimir() Dim C As Range If [ar3] = "" Then Exit Sub F…

Hola comunidad Tengo un problema en una aplicación que estoy desarrollando, a ver si alguien me lo puede solventar Al principio y al final de la macro (como hago siempre) para evitar pantallazos utilizo las instrucciones Application.ScreenUpdating=False y Application.ScreenUpdating=True, esto funciona perfectamente y cumple su cometido hasta que en un punto, necesito solicitar a el usuario que me introduzca una información y para ello he de mostrar un formulario que contiene un combobox para que elija la opción que desee, pues a partir de ese momento, es cuando deja de funcionar correctamente y empiezo a ver esos molestos pantallazos, he probado a volver a …

Hola Agradezco de antemano cualquier gestión.... Tengo un código que le digo que las facturas nuevas me las añado en otro Listado.. están identificadas con la palabra AÑADIR....el problema es que no sé como decirle que me las empiece a escribir en la última línea del listado existente en el ejemplo.: manualmente le digo que me las empiece a poner a partir de la fila 3067... Sub AÑADIRNUEVAS() Application.Calculation = xlManual Dim i, j As Integer j = 3067 'DONDE EMPIEZA A ESCRIBIR For i = 2 To 8000 ' DONDE EMPIEZA A BUSCAR If Range("FACTURAS!L" & i) = "A…

Estimados amigos, Estoy trabajando en un cuadro (adjunto) donde tengo el botón "pasar a la siguiente línea" y crea una copia exacta de la última línea en blanco justa arriba de ésta. Al ingresar el código en la columna A, si es un código que ya he ingresado con anterioridad, en la columna "K" (Ult_Venc) me aparece la fecha de vencimiento (de la columna "J") del último registro del mismo artículo. Por ejemplo, hice click en el botón y apareció su copia en la fila 15. Ingresé el código "720000001" y en la columna "K" aparece la fecha de vencimiento "20-10-12". Hasta ahí, todo funciona OK. Luego asocio una macro con MsgBox si FE.VENC < ULT_VENC para que me genere un …

Un cordial saludo Me encanta este foro por que he encontrado siempre solucion a mis inquietudes, lo cual me ha permitido aprender mucho,, en esta ocasion vengo con algo que creo que es demasiado sencillo pero no se como hacerlo,, tenggo en un formulario dos textbox, especificamente textbox11(nombre del responsable) y texbox12(cargo del responsable), lo que me gustaria es que esos textbox me trajeran los datos de la hoja3, de las celdas, E1(nombre del responsable) y E2(cargo del responsable) relativamente, dado el caso que se cambie de responsable, me permita cambiar dichos campos,,, Agradezco la colaboracion amigos Atentamente, David

Hola, estoy haciendo una macro en la que tengo que crear un gráfico donde como parte del titulo agrego la fecha de creación, sin embargo al agregar la fecha queda todo del mismo tamaño y quería hacer que la fecha incluida en el titulo apareciera mas pequeña (ej. tamaño 10) y el resto del titulo apareciera mas grande (ej. tamaño 14). A continuación dejo el código donde agrego el gráfico. With ActiveChart .ApplyChartTemplate (ActiveWorkbook.Path & "\series_barra.crtx") .HasTitle = True .ChartTitle.Characters.Text = titulo & Chr(13) & "(" & CStr(Date) & ")" .Axes(xlCategory, xlPrimary).HasTitle = True .…

Buenas amigos de AyudaExcel! Manejo en el trabajo mucha información con tablas grandes de las cuales alimento otras. Total en la que mantengo activa por causa de las fórmulas usadas debo protegerla pero agregar filas a una tabla protegida es un rollo. Me encantaría poder contar con una macro que me permita agregar filas a mi tabla protegida tal cual cuando uso el tabulador al llegar a la última celda no bloqueada e inmediatamente guardar la información del nuevo registro. Estoy a la expectativa y muchas gracias por su Ayuda!

Hola Chicos. Necesito ayuda con un programita. Lo que quiero es buscar un dato que esta escrito en una celda de excel y buscarlo en una carpeta que tiene varios archivos de excel, pero están en varias carpetas y sub carpetas. Lo que el programa tiene que hacer básicamente es copiar el valor de la celda buscarlo en todas las carpetas y libros (en cualquier pare del documento, no en una columna ni fila especifica) y escribir el nombre del libro donde lo encontro y continuar con la celda de abajo y hacer el mismo procedimiento; debe ser automático, Solo presionando un botón tiene que buscar los datos. Se que suena no tan complicado.. pero he estado días intentando. Que …

Hola, En un libro, en una hoja, tengo información muy extensa, de todo tipo, de muchas ciudades pero tengo que solicitar un nuevo dato a cada una de ellas y para ello necesito crear una hoja personalizada con su nombre donde incluiré la información relevante que necesitan para poderme dar ese dato que les reclamo. Estoy utilizando una tabla dinámica. El campo ciudad lo he puesto en el campo filtro y utilizo esta macro: Sub InsHoja() Dim MyName As String Sheets("BaseDatos").Select MyName = Range("I10").Value Sheets.Add After:=Sheets(Sheets.Count) Sheets(Sheets.Count).Select Sheets(Sheets.Count).Name = MyName End Sub[[/CODE] Funciona muy bien pero claro pri…

formato para ingresar hora de un evento pasado sin formula Que tal. alguno de ustedes podria decirme si existe alguna forma de ingresar la hora en excel, algo parecido al month view. Explico: Tengo un formulario de ingreso de datos que con una macro me genera mi base de datos de eventos que sucedieron en el pasado. es importante conocer la hora en que ocurrieron los eventos para poder tener rastreabilidad. pero lo que tengo hasta ahora son tres listas desplegables: una para hora (del 1 al 12) una para minuto (del 01 al 59) una para am o pm. lo cual es muy tardado. alguien podria ayudarme???

Buenos días, Me gustaría que me ayudasen con unas macros que tengo que realizar y soy bastante novato en programación. El objetivo es registrar datos de varios excels en uno Consolidado. Todos los archivos tienen el mismo formato y se modifican semanalmente. El consolidado tiene que ir "chupando" esa información y acumularla una debajo de otra. De esta forma, aparecerá en el consolidado toda la información de todos los otros excels. No puedo adjuntar archivos porqué ocupan demasiado. Agradecería cualquier tipo de ayuda. Muchísimas gracias!!:peaceful:

Hola a todos. La verdad es que no se por donde empezar, pero empezare diciendo que como muchos, utilizo el excel para hacer plantillas, en vez de utilizarlo para lo que relamente sirve. Mi nivel de conocimiento de Excel, es muy basico, se realizar alguna formula sencilla para totales, porcentajes etc, pero no paso de ahi. Pertenezco a un club de billar y como decia, tengo alguna plantilla hecha con Excel, pero simplemente para completar resultados haciendolo todo a mano. Me interesaria que el programa, al poner yo los nombres de los jugadores y el resultado, actuara por el mismo, llevando el nombre del jugador a la casilla que le correspondiera en la siguiente fase, y…

Hola, necesito hacer una Macro para sacar un reporte de una tabla plana que tiene muchas columnas y la ultima columna es el codigo, por lo que no puedo utilizar la función BUSCARV. agradezco mucho su ayuda. Saludos.

Buenas y gracias por adelantado Tengo que buscar un valor en dos columnas diferentes( A y B ) y y he creado el siguiente código pero me da error Me podéis indicar el código, por favor If Range("DATOS!A" & I) = Range("RESULTADOS!C3") Or ("DATOS!B" & I) = Range("RESULTADOS!C3") Then Range("RESULTADOS!b" & J) = Range("DATOS!B" & I)

Buen dia, he estado realizando un pequeño reporte en el cual recopilando algunas macros de la web, n este caso lo que quiero es que se realice un reporte de que usuarios hanutilizado el archivo excel en un comienzo me salia "error ambiguo por usar un comando dos veces pero despues al unir las acciones en un solo comando me volvio a salir otro error que es el tema que pongo a su concideracion para que me puedan ayudar que es el de error en tiempo de ejecucion en la formula siguiente que me resalta en amarillo: Sub Iniciar() Set AppObject.AppEvents = Application End Sub [/HTML] en dicha instruccion se detiene las macro y no se ejecuta; el comando que uni para que no me…

Estimados amigos, una consulta, estoy bloqueado y no se como hacer un archivo, necesito sus consejos para hacer este archivo que distribuya: Tengo valores totales al nivel NIVEL 1.1 y al NIVEL 1.1.1.1, Necesito hacer una distribución a los otros niveles de acuerdo a porcentajes variables del nivel NIVEL 1.1.1, tomando en cuenta que la cantidad de items no es constante desde el NIVEL 1.1. CONSULTA: 1. Debo tener una tabla de porcentajes de distribución para todos los niveles? 2. Debo tener una tabla que indique cuantos items existen por cada nivel para hace la distribución total? 3. Se puede hacer una macro que indique cuantos items existen por niveles y que sea varia…

Buen día les saludo, les quería comentar una gran duda que tengo la verdad he visto varias macros en la cuales crean hipervinculos a partir de un valor de celda. pero en realidad quisiera saber una cuestión. imaginemos que tengo el numero de una factura en varias celdas, y quiero jalar la imagen de la factura, y estan asi en las celdas: A2=3 A3=5 A4=6 pero en la carpeta están los números de factura pero de esta manera C:\Users\doctor\Desktop\Control de Base de datos esta Factura=3 Factura=5 Factura=6 entonces quisiera saber como indicarle a la macro que busque el A2,A3,A4 ETC. en la carpeta que especifiqué, aunque este numero de factura tenga "Factura=" en…

Hola: En el archivo se puede hacer una lista de archivos en una hoja en formato hipervínculo. Y en la otra se puede hacer una búsqueda escribiendo en una celda (A2) la palabra deseada y, en otra (A1), la columna en la que buscarla (en este caso A1 es fija). El tema es que cuando se filtran los resultados y se quiere abrir uno pinchando en él, no se abre. Es como si no tuviera el formato de hipervínculo. Lo he solucionado añadiendo un botón llamado "abrir", pero quisiera saber si se puede hacer pinchando en el mismo vínculo de los datos ya filtrados. En el archivo propongo resolver dos asuntos sencillos más, pero sobre todo me interesa el que acabo de comentar. Saludos…

HOLA GENTE DEL FORO,ACUDO A UDS PARA VER SI PUEDEN AYUDARME CON ESTE PLANTEO; "SELECCION DE DATOS FILTRADOS DE UNA MISMA COLUMNA PERO DE VARIAS HOJAS DE UN MISMO LIBRO" EN EL ARCHIVO HE PUESTO LAS ACLARACIONES QUE CONSIDERE NECESARIO;DE REQUERIR ALGUNA MAS HAGANMELO SABER;DESDE YA AGRADEZCO SU TIEMPO Y TODAS LAS MOLESTIAS QUE SE TOMAN PARA AYUDARNOS Y COLABORAR CON NOSOTROS "LOS MENOS ENTENDIDOS" POR PONER UN NOMBRE SALUDOS 110721 patrones tiempo ruben mas chica.rar