Leaderboard
Popular Content
Showing content with the highest reputation since 01/15/2021 in Posts
-
Hola JOCAMI90 la formula tenía una falla =SUMAR.SI.CONJUNTO(Datos!$D$3:$D$5000,Datos!$B$3:$B$5000,"*WH/"&B$3&"*",Datos!$C$3:$C$5000,$A4,Datos!$A$3:$A$5000,">="&$B$1,Datos!$A$3:$A$5000,"<="&FIN.MES($B$1,0)) considera que mi separador de argumentos es la coma (,), si el tuyo es otro, corriges. esto solo funciona para las columnas B y C que pertenecen a Setiembre, deberás cambiar manualmente B1, por D1 en Octubre, esa situación se dá , debido a que utilizaste celdas combinadas, lo que podrías hacer es descombinar las celdas y colocar las fechas en todas l4 points
-
Esto es lo máximo que se puede reducir el proceso. Abre el adjunto y pulsa sobre la flecha azul, se copiarán los turnos de mañana, tarde y noche del día de la fecha que hay en C3. Plantilla de Servicios5 (Full).xlsm2 points
-
Solo recordar que hay un evento change de hoja a nivel de libro en ThisWorkbook.2 points
-
Editar agregar o eliminar desde listbox
Antoni reacted to Benito Bartolomé for a topic
Disculpa, ya he pillado el segundo punto. De ahí a que el código ponga " Agregamos o modificamos items". Vale tanto para un roto como un descosido 😀🙋♂️1 point -
Editar agregar o eliminar desde listbox
Benito Bartolomé reacted to Antoni for a topic
Esto funciona, ¿A ver si eres capaz de encontrar la diferencia con el anterior? Private Sub btn_Editar_Click() 'Agreamos/Modificamos los Items With ListBox1 If .ListIndex = -1 Then Fila = Range("A" & Rows.Count).End(xlUp).Row + 1 Else Fila = .ListIndex + 2 End If Range("A" & Fila) = TextBox1 Range("B" & Fila) = TextBox2 .List = Range("A2:B" & Range("A" & Rows.Count).End(xlUp).Row).Value Borrar End With End Sub1 point -
Muchas gracias Silvia Me funciona a la perfeccion. Gracias por los consejos. No me había percatado de los espacios al final de los códigos. Con relación al WH/IN y WH/N/A asi lo prefiero que no se sumen, el WH/N/A originalmente se llamaba WH/INT, pero reemplace esas palabras para por N/A para que no se incluyeran en la suma. Tema resuelto! Muchas gracias!1 point
-
ACTUALIZACIÓN DE DATOS DE MANERA AUTOMÁTICA DESDE OTRA HOJA
Leonardo Briceño reacted to Haplox for a topic
Chico, esque ese archivo está lleno de trampas por lo que cuentas . O subes el original o así no va a haber forma de hacer nada1 point -
Arreglar gráfico dinámico a mas cantidad de datos se pierde información
jeaa reacted to Gerson Pineda for a topic
Hola Pero porque no subes ese archivo al foro, además que ese enlace es privado Saludos1 point -
Cálculo de cantidad de horas clasificadas por turnos
Jose BN reacted to Héctor Miguel for a topic
👍 obtuve más de lo que "di" 😉1 point -
Validación de textbox.
Benito Bartolomé reacted to Antoni for a topic
No confundas rojo con republicano, la mayoría de gobiernos de la II Republica fueron de derechas o centro derecha y hasta la guerra civil no hubo ni un solo gobierno rojo-rojo (comunista). Para culturilla: Segunda república1 point -
Cálculo de cantidad de horas clasificadas por turnos
Jeani reacted to Héctor Miguel for a topic
las columnas que mencionas fueron solo para tener una "visión" de las consideraciones necesarias para distinguir días y horas entre laborables o fin de semana y festivos y la separación de fecha-hora es solo trabajar en dos columnas: una la parte entera (días) y la otra la parte fraccionada (horas), funciones (obviamente) entero(... y residuo(... 1) y finalmente se convierte a valores y se elimina "la fuente" pero una vez que ha quedado visto (y comprendido), podemos regresar a tu modelo de base (menos columnas auxiliares para su comprensión) y resulta el nuevo adjunto horas x turno v21 point -
Validación de textbox.
Benito Bartolomé reacted to Antoni for a topic
Private Sub TextBox1_Change() If Len(TextBox1) = 4 Then TextBox2.SetFocus End Sub Private Sub TextBox2_Change() If Len(TextBox2) = 4 Then TextBox3.SetFocus End Sub Private Sub TextBox3_Change() If Len(TextBox3) = 4 Then TextBox4.SetFocus End Sub Private Sub TextBox4_Change() If Len(TextBox4) = 4 Then btn_Activar.Enabled = True End Sub1 point -
ActiveSheet.Range("A:C").NumberFormat = "General"1 point
-
Cálculo de cantidad de horas clasificadas por turnos
Silvia reacted to Héctor Miguel for a topic
1) prefiero multiplicar *24 al final (y no en cada paso) 2) ya sabía que ibas a necesitar distinguir los festivos analiza ambos puntos en esta versión mejorada (pregunta lo que no entiendas) horas x turno v2 (ambos).xlsx1 point -
Añade Application.ScreenUpdating = False al principio de cada macro.1 point
-
ACTUALIZACIÓN DE DATOS DE MANERA AUTOMÁTICA DESDE OTRA HOJA
Leonardo Briceño reacted to Haplox for a topic
No sé a qué te refieres conunirlasmacros(me imagino que para que discierna en qué celda se produce el cambio) Con el tiempo he aprendido que es útil utilizar pequeños trucos que te llevan al resultado deseado ¿Es un código elegante? No lo sé... 🙄 ¿Funciona? Sí... 😉 Te dejo una solución. Veras que ya no se usa el evento Calculate, y en la hoja amarillo hay una macro en el evento Change. Esta macro la tienes que copiar en todas las hojas de colores. Eto te lo dejo a ti 😇 Saludos Copia de BUSCAR DATO EN OTRA HOJA 2021.xlsm1 point -
Cálculo de cantidad de horas clasificadas por turnos
Jeani reacted to Héctor Miguel for a topic
revisa el adjunto notas: - moví tus variables a la misma hoja (por facilidad de cálculos directos) - estimo que la secuencia de los cálculos lleva una lógica comprensible (no puse comentarios) - agregué al inicio unos registros inventados (solo para comprobar resultados) - las ultimas dos filas comprueban la suma de horas para cada segmento de cálculos - te ahorrarías un montón de funciones ENTERO(... y RESIDUO(... si divides inicio y final => cada una en dos columnas para: la fecha y la hora hay un tema que NO está incluido (por si en algún momento necesitas): - consi1 point -
Fecha a partir de año, numero de semana y dia de semana
Silvia reacted to John Jairo V for a topic
¡Hola, a ambos! Siguiendo las mismas premisas de @tupy77, también puedes usar la siguiente fórmula: =FECHA(B1;1;1)-DIASEM(FECHA(B1;1;1);2)+7*B2+B3 ¡Bendiciones!1 point -
Aun asi esta formula te dara el resultado que tu quieres.... =(FECHA(B1;1;1)+(B2*7)+(1>=DIASEM(FECHA(B1;1;1))*7)+1-DIASEM(FECHA(B1;1;1)))+B3 donde B1 es la celda del año y B2 la celda de la semana y B3 donde estaria el numero del dia de la semana. Da el resultado pero deberias de ser mas esplicito para que sea mas concorde con lo que cualquiera pueda esperar.... Un saludo1 point
-
Formula para extraer letras de Apellidos y Nombres
SALAVERRINO reacted to GabrielRaigosa for a topic
👍1 point -
como mostrar botón al ejecutar una macro desde otro formulario.
Benito Bartolomé reacted to nachobm for a topic
Hola, Debes hacer visible el botón antes del Show y si lo quieres volver a ocultar, cuando cierres el UserForm2, debes poner el botón en visible=false. Los formularios se cargan, si no recuerdo mal, al abrir el libro. Si quieres cambiar alguna propiedad del mismo lo puedes hacer en cualquier momento pero teniendo en cuenta que se mostraran cuando se haga la llamada a Show.1 point -
A ver si lo he entendido. Abre el adjunto y pulsa sobre la flecha. PC1 2019-2 EX53-EN55 Data.xlsm1 point
-
Macro multiplicar celdas en función de valor de búsqueda
Jose BN reacted to Gerson Pineda for a topic
Hola Te adjunto una alternativa, como solucion Saludos Vlookup_GP.xlsm1 point -
Gerson Pienda, pesa 5 megas y no puedo directamente al foro y no hay otra forma para compartir0 points
-
Hola gracias por tu respuesta, ya lo solucioné, habia uno que no tenia ese error, asi que me armé de paciencia borré todos los que salian mal y del unico que salia bien hice tantas copias como necesitaba y despues les he cambiado los datos de cada uno, ahora todos tienen la misma configuración con sus datos correspondientes, gracias y disculpa las molestias.0 points
-
Newsletter