Imprimir página | Cerrar ventana

Insertar fórmula desde VBA

Impreso de: Foro de Access y VBA
Categoría: Otros de Microsoft: Windows y Office
Nombre del foro: Excel
Descripción del foro: Foro de Excel y VBA de Excel
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=84088
Fecha de impresión: 17/Julio/2019 a las 20:35


Tema: Insertar fórmula desde VBA
Publicado por: jmpm
Asunto: Insertar fórmula desde VBA
Fecha de publicación: 19/Noviembre/2018 a las 11:28

Sheets("Hoja1").Range("A1").Formula = "=K.ESIMO.MENOR(Temp1,CONTAR.SI(Temp1," < "& E11))"

La fórmula me funciona perfectamente si la escribo yo en Excel. Sin embargo, al ejecutar el código, en A1 me aparece "FALSO". He probado también poniendo .FormulaLocal y cambiando las "," por ";" pero sigue apareciendo "FALSO". ¿Alguien sabría decirme dónde está el fallo?

NOTA: Temp1 es el nombre que tienen asignadas 30 celdas de la columna C

Gracias!



Respuestas:
Publicado por: AnSanVal
Fecha de publicación: 19/Noviembre/2018 a las 13:10

VBA solamente «entiende en inglés», y el separador  de argumentos es la  «coma». Prueba así:


Sheets("Hoja1").Range("A1").FormulaR1C1 = "=SMALL(R1C3:R30C3,COUNTIF(R1C3:R30C3,""<""& RC[1]))"


(Para otra ocasión) con la fórmula escrita en A1 (y A1 seleccionada), pon en marcha la grabadora > Haz clic en la barra de fórmulas > Pulsa INTRO > detén la grabadora > …  


… mira el código que se ha generado > Depura/modifica el código a tu gusto.





-------------
Aprendemos viendo respuestas de otros, también intentando resolver dudas (intenta ayudar cuando puedas/sepas).

Mi http://achinet.mvp-access.es/" rel="nofollow - sitio_web con ejemplos Excel.


Publicado por: jmpm
Fecha de publicación: 21/Noviembre/2018 a las 09:11
Muchas gracias Antonio! Funciona perfectamente



Imprimir página | Cerrar ventana