Respuesta
en
Microsoft Excel
a
Cambio de color de Autoforma
Tendrás que crear un sub que se ejecute al hacer click en la autoforma, para lo que hay que: - Seleccionar la autoforma (con click izquierdo) - En el cuadro de nombres (arriba a la izquierda) ponerle un nombre, por ejemplo Autoforma1 - hacer click...
Respuesta
en
Microsoft Excel
a
Ayuda con la implementación en excel de función para encontrar un valor de una columna
La forma más sencilla de conseguirlo supongo que será jerarquizar los datos, para lo cual tendrías que usar una columna auxiliar, pongamos que la C, poner la siguiente fórmula en C2: =JERARQUIA(B2;B$2:B$8)+CONTAR.SI(B$2:B2;B2)-1 Y copiarla y pegarla...
Respuesta
en
Microsoft Excel
a
Ruta de acceso
La siguiente instrucción muestra un mensaje con el nombre de carpeta del nivel inmediatamente superior al del libro: MsgBox Left(ThisWorkbook.Path, InStrRev(ThisWorkbook.Path, "\"))
Respuesta
en
Microsoft Excel
a
Función para descomponer número en 3 factores
La función para encontrar el divisor mayor del número y que, además, sea menor que su raíz cúbica no parece demasiado complicada en VBA: Public Function prueba(ByVal lNúm As Long) As Long Dim n As Long Dim lRaíz3 As Long Dim lMejor As Long lRaíz3 =...
Respuesta
en
Microsoft Excel
a
Copiar cada 2 celdas de una columna
Suponiendo que la columna sea la A, prueba con la fórmula: =INDICE(A:A;(FILA()*3)-2) En la fila 1 de la columna en la que quieras sacar los "starts".
Respuesta
en
Microsoft Excel
a
Restar fechas indicando los días por periodo
Creo que usando otra fórmula matricial es posible hacer lo que necesitas. Por ejemplo, suponiendo que la fecha inicial del periodo estuviera fuera un rango con nombre llamado Fecha_Inicial, la fecha final otro llamado Fecha_final, y las iniciales y...
Respuesta
en
Microsoft Excel
a
Casilla con 2 fechas->de numero serie a dd/mm/yyy
Prueba con: =concatenar(texto((c2-7)-diasem(c2-7;2);"dd/mm/aaa");" - ";texto(c2-diasem(c2-7;2);"dd/mm/aaa"))
Respuesta
en
Microsoft Excel
a
Necesito que los comentarios de las celdas se conviertan en mensajes de entrada
El siguiente código crea validaciones en las celdas que tengan comentarios en Hoja1, pero sólo en el caso de que la celda no tenga ya una validación: Sub prueba() Dim rngCelda As Range With Worksheets("Hoja1") .UsedRange For Each rngCelda In...
Respuesta
en
Microsoft Excel
a
Convertir un nº entero en año, mes, día con excel
Puedes usar la fórmula =SIFECHA(A1;HOY();"y") & " años " & SIFECHA(A1;HOY();"ym") & " meses " & SIFECHA(A1;HOY();"md") & " días" Y si no quieres que puedan aparecer incoherencias como "0 meses" o "1 días" puedes usar esta otra, más complicada:...
Respuesta
en
Microsoft Excel
a
Como sumar valores en un rango de fechas
Por ejemplo, para sumar las cantidades del rango B1:B500 cuyas fechas en el rango A1:A500 estén entre el 15/08/2009 y el 14/09/2009 la fórmula sería: =SUMAR.SI(A1:A500;">="&FECHA(2008;9;15);B1:B500)-SUMAR.SI(A1:A500;">"&FECHA(2009;9;14);B1:B500) Para...