Provide commands for creating an equation.
Learn more about Equation Editor
Dim app As AgilentPNA835x.Application
Set app = CreateObject("AgilentPNA835x.Application", <analyzerName>)
Dim eq As Equation
Set eq = app.ActiveMeasurement.Equation
Methods 
Interface 
Description 

IMeasurementEquation2 
Returns the functions in an imported (loaded) DLL. 

IMeasurementEquation2 
Imports an Equation Editor DLL. 

IMeasurementEquation2 
Returns whether a DLL has been imported into the PNA. 

IMeasurementEquation2 
Removes an imported an Equation Editor DLL from the PNA. 

Properties 
Interface 
Description 
IMeasurementEquation 
Sets the Equation 

IMeasurementEquation 
Sets the Equation enabled state 

IMeasurementEquation 
Returns whether the equation is presently valid. 
Dim na Dim meas Set na = CreateObject("AgilentPNA835x.Application") Set meas = na.ActiveMeasurement 'Define the measurement meas.Equation.Text = "mysillyequ=sqrt(AR1_1)" 'Check to see if the equation is valid valid_e = meas.Equation.Valid MsgBox valid_e 'Turn on the Equation Editor meas.Equation.State = True 
Interface 
Introduced with PNA Rev: 
IMeasurementEquation 
6.03 
IMeasurementEquation2 

Last Modified:
1Feb2019 
Changed IEquation to IMeasurementEquation 
4Dec2007 
Added example 