Macro en Microsoft Excel usando código VB
Buen dia, necesito realizar una macro en excel en el que los valores son los siguientes CPL, CAU,CPI,TCI,LEO, en todas estas variables van valores numéricos, la formula que Yo necesito es la siguiente: LEO=((2*CAU*CPL)/(CPI*TCI))ELEVADO A 1/2, esto necesito hacerlo en una macro en Excel, pero no se como?
Esta puede ser una opción, si los valores son fijos
Sub calcular() 'Por.DAM CAU = 5 CPL = 4 CPI = 3 TCI = 2 LEO = ((2 * CAU * CPL) / (CPI * TCI)) ^ 0.5 End Sub
Otra opción es tomar los valores de las celdas y poner el resultado en otra celda
Sub calcular() 'Por.DAM CAU = [B3] CPL = [B4] CPI = [B5] TCI = [B6] LEO = ((2 * CAU * CPL) / (CPI * TCI)) ^ 0.5 [B7] = LEO End Sub
Cambia B3, B4,B5,B6 Y B7 por las celdas que requieras.
Saludos. Dante Amor
No olvides valorar la respuesta.
Muchas gracias, pero como puedo hacer para que me funcione con controles Activex, es decir cuadros de texto y botones usando una macro en Excel?
Envíame tu archivo para ver cómo tienes los controles y adaptar la macro
Hola ya le mandé el archivo para que lo revise y me avisa cuando me lo mande de nuevo... gracias :)
Te envié el archivo con esta macro
Private Sub CommandButton4_Click() 'Por.Dante Amor CPL = TextBox1 CAU = TextBox2 CPI = TextBox3 TCI = TextBox4 LEO = ((2 * CAU * CPL) / (CPI * TCI)) ^ 0.5 TextBox5 = Format(LEO, "#,##0.000000") End Sub
Saludos.Dante Amor
Recuerda valorar la respuesta.
