Insertar formula desde formulario

Hola amigo.

Necesito hacerte una consulta.

Tengo esta parte de código para Insertar nuevo producto

'7. Escribimos el nuevo material
Cells(nFilaXLS, 1) = Item
Cells(nFilaXLS, 2) = sNombreMaterial
Cells(nFilaXLS, 4) = Unidad
Cells(nFilaXLS, 5) = Cantidad
Cells(nFilaXLS, 6) = PrecioU
Cells(nFilaXLS, 7) = NumberFormat = "_ $ * #,##0.00_ ;_ $ * -#,##0.00_ ; ;_ @_ "
'Cells(nFilaXLS,7)=FormulaR1C1="=IF(RC="""","""",RC*RC)"

Lo que no logro es que inserte la formula

FormulaR1C1 = "=IF(RC[-2]="""","""",RC[-2]*RC[-1])"

La formula multiplica E con F y el resultado lo coloca en celda determinada de G segun donde inserte la linea nueva, es decir, el nuevo inserto
Quiero insertar esta formula tal como inserta el formato en la celda correspondiente en Columna G
Expo: Al insertar nuevo, la macro INSERTA NUEVA LINEA PARA EL NUEVO INSERTO, en esa nueva linea quiero que inserte la formula de arriba


La columna es fija G pero la celda es variable, puede ser en la G10 como puede ser en G1000 o G100,

1 respuesta

Respuesta
1

Prueba con esta instrucción

Cells(nFilaXLS, "G").FormulaR1C1 = "=IF(RC[-2]="""","""",RC[-2]*RC[-1])"

Revisa que no tengas algún autofiltro para qeu veas que sí te está poniendo la fórmula en cada fila.

Saludos. Dam

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas