Preguntas esperando respuesta
Actividad pública reciente
Ha empezado a seguir a 
Dante Amor
Dante Amor
Ha preguntado en el tema en
Microsoft Excel
Fórmula para calcular el % de cumplimiento de un dato, cuando sobre pasa un rango
Si el valo esta entre un rango de +0.5 y -0.5, el cumplimiento es 100%, pero si se encuentra por arriba de los rangos este valor debe disminuir a un 90, 80 70 % de cumplimiento. Hasta el punto que sea 0% el cumplimiento. Tengo una fórmula pero al...
Ha valorado "Excelente" la respuesta
Copiar dos celdas de una fila y pegarlas en otra fila saltando de fila
Copia este código en un botón Private Sub CommandButton1_Click() uf = Range("F1000000").End(xlUp).Row If Range("F" & uf) = "" Then Range("F" & uf) = Range("A1") Range("G" & uf) = Range("B1") Else Range("F" & uf + 1) = Range("A1") Range("G" & uf + 1)...
Ha valorado "Excelente" la respuesta
Hacer una macro que copie una pestaña, y cada pestaña la renombre de acuerdo a una lista
¿Y la lista en cuál hoja está?
Ha empezado a seguir el tema VBA
Ha empezado a seguir el tema Visual Basic
Ha empezado a seguir el tema Microsoft Excel
Ha valorado "Buena" la respuesta
Buscar información de una renglón de acuerdo a una fecha
No entiendo bien tu pregunta ni tampoco se como tienes hecha la función BUSCARV que utilizas. Para Usar la función BUSCARV primero tienes que tener definida una tabla (una selección de celdas, donde están los datos) y asignarle un nombre. No puedes...
Ha preguntado en el tema en
Visual Basic
y en 1 temas más
Copiar una pestaña Base y crear copias de acuerdo a una lista
Busco su apoyo para una macro que copie una pestaña BASE, haga una copia de esa pestaña en base a una lista de valores y que ademas el nombre de la pestaña lleve el valor de la lista y se coloque el mismo valor en una celda especifica de la hoja.
Sin respuestas
Ha cambiado su perfil.
- Nombre completo: Ernesto Ramirez.
Ha valorado "Excelente" la respuesta
Realizar suma en dos columna y detenerse cuando encuentre un texto, por ejemplo "sin dato"
Prueba este otro enfoque: Sub misuma() Dim t As Double Dim r As Range '4c7569735f50 On Local Error GoTo err: t = 0 For Each r In Range("L:L") If UCase(r) = "SIN DATO" Then Exit For t = t + (r + r.Offset(0, -9)) DoEvents Next [c80] = t Set r = Nothing...
