Keysight Technologies ENA Series User manual

2. Launch VBA editor, and code VBA program

a. Press [Macro setup] hard key then press VBA Editor

soft key VBA editor

b. Create module and code procedure

Click Insert in the menu bar then click Module

Code as shown below in Module1

Keysight Technologies ENA Series Network Analyzer – VBA Programming (UserMenu)

Demo Guide

ENA series network analyzer (E5071C or E5061B)

N-Type Cable

Procedure overview

1. Connect DUT to ENA

2. Launch VBA editor, and code VBA program

3. Run VBA Macro

4. Add bandwidth search module

5. Apply VBA macro to UserMenu buttons

Required Instrument and xture

In this demo...

– Code simple VBA macro for bandpass lter measurement

– Apply VBA macro to UserMenu buttons

In this demo, we will use BPF (Center frequency =

1.09 GHz, BW = 15 MHz) but you can use another

filter. Prepare appropriate cable and adapter to

connect between ENA and DUT.

Band pass filter (BPF)

1. Connect DUT to E5061B

3. Run VBA macro

a. Press [Macro Run] Hard key.

The ENA calles main() procedure, and this VBA

program will set up the measurement parameters as

shown below.

c. Save VBA program and exit VBA editor

Click icon of the VBA editor. The Save As dialog

box appears. Specify the file name and location and

click Save.

Click icon of the VBA editor.

Sub main()

Call Setup

End Sub

Sub Setup()

SCPI.SYSTem.PRESet

SCPI.SENSe.FREQuency.CENTer = “1.09E9”

SCPI.SENSe.FREQuency.SPAN = “200E6”

SCPI.CALCulate.PARameter.Count = 2

SCPI.DISPlay.WINDow.Split = "D12"

SCPI.CALCulate.PARameter(2).DEFine = "S21"

SCPI.SENSe.BANDwidth.RESolution = 1000

MsgBox "Setup done"

SCPI.DISPlay.WINDow.TRACe(1).Y.SCALe.AUTO

SCPI.DISPlay.WINDow.TRACe(2).Y.SCALe.AUTO

End Sub

4. Add Bandwidth Search Module

a. Open VBA Editor

b. Modify Sub() procedure of Module1 as below code

5. Apply VBA procedure to UserMenu buttons

a. Open VBA Editor

b. Modify Sub() procedure of Module1 as below code

6. Use UserMenu Buttons

a. Press “Setup” button to run Setup procedure

b. Press “Bandwidth” button to run Bandwidth_Search

procedure

Tips: Command finder

Using command finder chapter of the help file, you

can easily find appropriate command for each button.

To open help, press [Help] hard key, then click

Programing > Command Reference > Command

Finder.

Sub Bandwidth()

SCPI.CALCulate.PARameter(2).SELect

With SCPI.CALCulate.SELected.MARKer

.State = True

.FUNCtion.TYPE = "MAX"

.FUNCtion.EXECute

.BWIDth.State = True

End With

End Sub

Sub Main()

UserMenu.Item(1).enabled = True

UserMenu.Item(2).enabled = True

UserMenu.Item(1).Caption = "Setup"

UserMenu.Item(2).Caption = "Bandwidth"

UserMenu.Show

End Sub

Sub Main()

Call Setup

Call Bandwidth

End Sub

Private Sub UserMenu_OnPress (byVal ID As Long)

If ID = 1 Then Module1.Setup

If ID = 2 Then Module1.Bandwidth

UserMenu.Show

End Sub

Keysight | ENA Series Network Analyzer – VBA Programming (User Menu) – Demo Guide

www.keysight.com/nd/ena_vba

c. Add below procedure on Module1

c. Create

UserMenu

module

Click E5061B_Objects then Double-Click UserMenu

In the object box in the code window, select UserMenu

as shown below.

d. Code below procedure on UserMenu module

d. Save VBA program and run

Click icon, then icon of the VBA editor

Press [Macro Run] hard key.

This code sets the measurement parameter, then

make bandwidth search function as below.

e. Save program and run

Click icon, then icon of the VBA Editorpress

[Macro Run]

hard key.

This information is subject to change without notice.

Published in USA, August 1, 2014

5990-8596EN

www.keysight.com

Other manuals for ENA Series

Other Keysight Technologies Measuring Instrument manuals

Keysight Technologies

Keysight Technologies EXA N9010A User manual

Keysight Technologies

Keysight Technologies InfiniiMax III Series User manual

Keysight Technologies

Keysight Technologies E5868A Assembly instructions

Keysight Technologies

Keysight Technologies N9041B Installation and operation manual

Keysight Technologies

Keysight Technologies N9020B Manual

Keysight Technologies

Keysight Technologies M9710A Quick guide

Keysight Technologies

Keysight Technologies CXA Installation and operation manual

Keysight Technologies

Keysight Technologies FieldFox A Series User manual

Keysight Technologies

Keysight Technologies N9320A RF User manual

Keysight Technologies

Keysight Technologies N9030B Quick start guide

Keysight Technologies

Keysight Technologies B2900A Series User manual

Keysight Technologies

Keysight Technologies B1500A User manual

Keysight Technologies

Keysight Technologies B1507A User manual

Keysight Technologies

Keysight Technologies N524 A Series Installation and operation manual

Keysight Technologies

Keysight Technologies E4981A Owner's manual

Keysight Technologies

Keysight Technologies N9030B User manual

Keysight Technologies

Keysight Technologies N9029AV01-V19 User manual

Keysight Technologies

Keysight Technologies N1060A User manual

Keysight Technologies

Keysight Technologies U1281A User manual

Keysight Technologies

Keysight Technologies N9020A Installation and operation manual

Keysight Technologies

Keysight Technologies M8131A User manual

Keysight Technologies

Keysight Technologies M8131A User manual

Keysight Technologies

Keysight Technologies E5061B User manual

Keysight Technologies

Keysight Technologies P50 B Series User manual

Popular Measuring Instrument manuals by other brands

Suaoki

Suaoki D40 user manual

Elster

Elster BK-G1.6 operating instructions

Endress+Hauser

Endress+Hauser Deltabar FMD71 technical information

Duratool

Duratool D03128 manual

Vega

Vega VEGAPULS 65 Quick setup guide

Tonghui

Tonghui TH2618B Operation manual

Tenmars

Tenmars TM-801 user manual

MSR

MSR 145 user manual

TPS

TPS WP-82 manual

ELMETRON

ELMETRON CP-511 user manual

PCB Piezotronics

PCB Piezotronics 003C30 Installation and operating manual

Tenma

Tenma 72-10465 manual

Endress+Hauser

Endress+Hauser Proline Promag 50 Brief operating instructions

Siemens

Siemens SITRANS F Coriolis FCT030 Function manual

KLINGER

KLINGER CMF V Series instruction manual

EXFO

EXFO FTB-2 Notice

Keysight

Keysight M8290A Getting started guide

ADTEK

ADTEK MW-5 operating manual