En las hojas de cálculo he usado bastante las funciones mín común múltiplo (M.C.M) y máx común divisor (M.C.D). Pero ahora estoy haciendo una macro y no encuentro esas funciones en V.B.A. Me cuesta creer que no venga implementada. Si es así, me gustaría conocer alguna macro sencilla para obtener esas funciones. Gracias.

Hola chicos, tengo un problema con una macro que tengo hecha y creo que está bien, pero no acaba de funcionar, os cuento lo que quiero: esa macro hace un filtro avanzado de una tabla, con unos criterios y pone el resultado en otra parte de la hoja. Entre los criterios, hay dos campos de fecha, para limitar los registros entre una fecha minima y otra maxima. Pues bien, a pesar de que en la tabla original, los datos del campo fecha los tengo bien puestos, por ejemplo, 03/05/2020, cuando en el criterio pongo >=03/05/2020 para incluir esa fecha de la tabla, en el resultado se me pone la fecha 05/03/2020, y me sale el resultado conforme a esa fecha, y ese no es el res…

Buenas noches, espeor me puedan ayudar en esta ocasion estoy trabajando con una tabal especifica en la hoja DATOS, la idea es que cuando INGRESE, ELIMINE registros no altere los registros de las demas celdas que no pertenecen a la tabla he logrado agregar pero para eliminar me sale error, me da error al momento de ubicar la fila en especifico a eliminar. muchas gracias por su apoyo Copia de Guardar datos en Tabla.xlsm

Hola grupo, No adjunto archivo, pues ya resolvi el problema que tenia con la propiedad value de un rango de celdas, sin embargo, me gustaria su opinion al respecto de algo que creo yo podria ser un error de VBA: Tengo entendido que la propiedad value devuelve un array con el contenido de cada una de las celdas del rango que invoca esa propiedad, pero al parecer dicho array no permite que se acceda a los elementos. Me explico mejor con un codigo simple de tres lineas: Dim vector As Variant vector = Selection.Value ' Aqui tengo seleccionado previamente un rango con digamos 10 celdas, cada una de ellas con un valor Debug.Print vector…

Hola a todos, Antes de nada os felicito por facilitarnos a todos nuestras jornadas con excel. Os comento mi problema: Quiero conseguir filtrar de una columna entre una fecha con su hora y otra fecha con su hora. Para esto he optado, tras consultar por muchas paginas, por transformar la fecha en formato long y la hora en formato double, esto mismo es lo que le paso a la funcion Autofilter en su campo "criteria" y se supone que tendria que funcionar. Tras ejecutar el código el resultado está vacio. Investigando en el propio excel, depurando, para ver que es lo que ha filtrado (me voy a filtrado entre fechas y veo que hay escrito) y aparece que le falta la "coma"…

Buenos días tengais Vereis, con esto de no poder tocar el documento mientras está activado el userform, me preguntaba si sabías de algún modo de poder recorrer un documento como la celda activa a través del userform. Aquí os dejo un ejemplo de como lo había pensado (Las ideas son bienvenidas) Había pensado poner un scrollbar dentro del userform y al clickar que la celda activa fuera bajando hasta el final del documento. Además de agregar dos botones para ir tanto al principio (Pone en el botón A1, asumiendo que el texco comienza en ese punto) y otro que apunte a la última fila ocupada. grácias por vuestra ayuda, saludos. Scroll.zip

Hola, tendo dos dudas, la primera es como puedo hacer para que cuando le doy al boton guardar me deje el textbox1 y textbox2 con los datos que tengan puestos y que me borre combobox1, combobox2 y textbox3 centrando el foco en combobox1, ahora mismo lo tengo como esta porque no consigo mi proposito. Y la segunda duda es como puedo pasar los datos del formulario a la Hoja2 en las posicones que pongo como ejemplo en dicha hoja y de forma ilimitada y quiero decir de forma ilimitada que no se limite a las ocho posiciones que tengo en el ejemplo. Libro1.rar

Hola amigos de Ayuda Excel. Nuevamente por aquí para pedirles un . He intentado hacerlo pero pero no logro el objetivo. Necesito copiar el rango A5:K5 (fila que estará siempre oculta) y deben ser insertadas 5 filas iguales en la primera celda vacía de la columna A. La macro se ejecutará a través de un botón. Agradecido de antemano por su valiosa colaboración. INSERTAR 5 FILAS AYUDA EXCEL 2.xlsm

Buenos días; A ver si me podéis ayudar. Tengo una consulta SQL en Excel que me cuenta las fechas por número de semana, todo funcionaba bien hasta este año. Buscando por internet he encontrado la solución ( [vbMonday],[vbFirstFourDays] ) pero no me funciona, no sé qué pongo mal. Esta era la consulta que funcionaba hasta este año ( ahora en la semana 8 me cuenta lo de la 7 ). Query = "Select count (Columna1) from [Hoja1] where Columna1 In" & Datos & "And DatePart('ww',Columna2)=" & SemanaActual & "And DatePart('yyyy', Columna2)=" & AñoActual & "And (Not tipo_Columna3='No' or Columna3 is null)" Esta es con la solución qu…

Private Sub CommandButton29_Click() With UserForm1 TextBox2 = TextBox2 - 1 Unload Me End With End Sub no logro que reste una vez que lo doy al boton! que puedo haccer!

Buena Tardes les escribo por la siguiente duda. Estoy construyendo una macros, para enviar datos de UserForm en excel a word, todo funciona perfectamente. excepto la validación de un texbox en el formulario, los cuales estan agrupado en unos frame. al precionar la tecla enter, en un texto en blanco lanza un mensaje de error, pero al ir al ultimo texbox de cada frame, no realiza la validación y simplemente pasa al otro texbox les adjunto mi archivo para dejarlo todo mas claro prototipo_luminaria.rar

Buenas tardes tengo una macro, la cual quisiera guardar de tal forma que todos los días pueda ejecutarla, pero en libros diferentes, me explico.. esta macro fue diseñada para ordenar ciertos datos, sin embargo todos los días se descargan planillas diferentes y esa macro debe poder ejecutarse en cualquier libro, pero no se como guardarla para que cumpla esa función, y por supuesto no voy a andar copiando y pegando el código todos los días en la vba nueva, existe alguna forma? la que sea todas son bienvenidas gracias

Hola, buenas noches. El objetivo de esta macro seria: Que pida un número por pantalla, y que ese número se itere sumando 150 veces hasta completar la planilla que se muestra, especificaciones: *numero |celdablanco| numero + 1 |celdablanco| (numero +1) + 1 | celdablanco .... hasta que cada fila tenga 6 números con cinco celdas en blanco * que tras esta fila se salte una fila es decir en la zona sombreada gris no se escriba la serie. *que conserve lo que se pide por pantalla num inicial y num final en la hoja HISTóRICOa con la fecha. *adjunto imagen y archivo. No sé cómo plantear este código... me echáis una mano por favor. …

Hola a todos, A ver si me podéis ayudar ?. He creado el siguiente módulo en VBA para que se sumen las celdas por rango de color. En principio todo funciona genial y hasta ahí todo bien. El problema es que es un archivo creado con intencion donde debemos editar varios compañeros y ahora cuando lo comparto con otros usuarios en one drive ellos no ven el resultado de la formula. además cuando se cambia el color de las celdas no ocurre nada por lo que es como que no reconoce la formula. No se si me estoy explicando. Este es el módulo esto es lo que ellos ven online alguien me dice como puedo hacer para que en onedrive se vea y func…

Buenas tardes. recurro de nuevo a ustedes para ver si me pueden apoyar. Tengo esta macro que guarda toda la informacion de un userform, pero quiero que se detenga si el Textbox3 no es igual a cero, el textbox3 debe ser iagual a Cero para continuar el procedimiento. Private Sub CommandButton3_Click() 'Seleccionar hoja Sheets("Corte").Select 'selecionar rango de celdas a insertar Range("A10:S10").Select 'Inserta Celdas SEleccionadas Selection.Insert Shift:=xlDown 'Copia y pega los rangos seleccionados Range("A9:S9").Select Selection.Copy Range("A10").Select ActiveSheet.Paste 'Finaliza apliaccion Application.CutCopyMode = False Range("C10").Select 'grabamos los dato…

Ocupo Concatenar valores de las columnas B , C y en la columna D el valor repetido. Si en la columna A los valores son iguales. Osea en la columna E los valores concatenados de la columna B En la columna D los valores concatenados de la columna C En la columna F el valor repetido de la columna A Mando un ejemplo de lo que ocupo y los resultados que necesito Gracias Libro1 prueba.rar

amigo tengo este combobox en la hoja1 con el listado de hojas ocultas, cuando selecciono la hoja3 por ejemplo.........este me envia sin prolemas hasta la hoja, pero cuando regreso a la hoja1 (por medio de un boton) , el combobox muestra la ultima seleccion ( en este caso la hoja3) pero si vuelvo a seleccionar esta misma hoja3 no hace nada, tengo que seleccionar otra hoja y despues de esto, si puedo vollver a seleccionarla (hoja3). no se si sea la solucion .....pero cuando regrese a la hoja1 encontrar el combobox en blanco.....no se si sea necesario.........este es el codigo y el archivo Private Sub UserForm_Initialize() ComboBox1.RowSource = "hoja1!" End Sub Private S…

Hola! amigos del foro quisiera solicitarles la colaboración con lo siguiente: Estoy intentado crear un formulario para capturar el registro de tiempos , este debe ser asociado a un evento inicio y un evento final, ósea como si apilara los datos hacia la derecha, en este formulario el usuario solamente pasa su id por un lector de código de barras o bien digita su numero de ID, selecciona la actividad y guarda el registro, mediante un botón. Los problemas que no logró solucionar: 1. El usuario en el primer evento realiza el registro en una hora determinada y selecciona la actividad a realizar, guarda el registro. hasta aqui creo tenerlo bien. Entiéndase sería …

Buenas tardes, Tengo la duda, de si existe una macro que filtre filas que cumplan un criterio, las copie en otra hoja, borre el contenido de las celdas, pero que no elimine las filas.

Buenas Noches Tengo el siguiente código, que almacena las referencias de las celdas en la Variable Rango, para posteriormente borrar el contenido de las celdas. El problema es que al llegar a la parte del borrado del Rango me Arroja error 1004 en tiempo de ejecución. Son aproximadamente 100 celdas las que debe borrar. Sub Factura_LimpiarPlantilla() Dim Rango Plantilla = "Factura_Registro" Setup = "Factura_Setup" Application.ScreenUpdating = False Application.Calculation = xlCalculationManual Sheets(Plantilla).Unprotect Clave I = 2 Rango = "" While Sheets(Setup).Cells(I, 3) <> "" If Sheets(Setup).Cells(I, 5) = "SI" Then Celda = Sheets(Setup).Cells…

ANTES QUE NADA UN SALUDO A TODOS. Y PUES ME GUSTARIA QUE ME AYUDEN NUEVAMENTE TENGO UN ARCHIVO DE EXCEL CON MAS DE 40 HOJAS Y ME GUSTARIA SABER SI HAY ALGUN MACRO O ALGUN USERFORM PARA GUARDAR LAS HOJAS DE EXCEL EN TXT UNICONDE MUCHAS GRACIAS.

Hola, Requiero de su valiosa orientación y ayuda, de antemano gracias! En la Hoja "DATA" tengo la información que necesito se pase a la hoja "RESULTADO" el id es el número de empleado que esta en la Hoja "RESULTADO" A2 solo se tiene que pasar toda la información que coincida con este dato. En la hoja "RESULTADO" he dejado como debe de quedar la información. Anexo archivo muestra. Muchas gracias! muestra.zip

Estimados, buenas, soy nuevo en VBA y al correr mi formulario me aparece el siguiente error en referencia por favor alguien me puede ayudar con la sintaxis de como solucionar el error 1004 adjunto info de como esta ingresado en la programacion Vb: Private Sub LISTA_Click() Dim modelo As String modelo = LISTA.List(LISTA.ListIndex, 7) Me.txt_modelo.Value = modelo End Sub Private Sub txt_modelo_Change() Dim modelo As String modelo = txt_modelo Me.txt_service = Application.WorksheetFunction.VLookup(modelo, Sheets("BD").Range("A:Y"), 20, 0)

Gute Nacht a todos los maestros tengo un calendario 2013 que me gustaria automatizar pero no encuentro como, me gustaria me pudieran ayudar, la manera en que quiero automatizarlo es: que al darle doble click me ponga una nueva hoja con el nombre de la fecha que se seleccionó (o se doble clickió) para asi poder escribir la tarea dentro de esa hoja nueva. Asi como su efecto inverso que al darle doble click a la hoja nueva me regrese a ese calendario. ¿alguien que me pueda ayudar? nota: en el archivo vienen tres calendarios distintos me es suficiente con que se automatize el que es completo de antemano muchas gracias calendario-2013-en-excel-lunes-domingo.rar

Buenas a Todos, Deseo saber de que forma es posible que pueda editar registros duplicados en este ListBox, no puedo modificar lo que filtro, me podrían brindar una ayuda por favor. Deseo editar uno por uno y actualizarlo en la base de datos, pero no me permite hacerlo , solo puedo hacerlo con un dato, el resto no me permite modificarlo. Gracias ayuda_2.xlsm