BugWorkShop - 甲蟲工作室: 4月 2014

2014年4月24日星期四

安捷倫（Agilent）E3632A 直流電源供應器 - 介紹：

安捷倫（Agilent）E3632A 直流電源供應器 - 介紹：

筆者的工作室有部安捷倫（Agilent）的直流電源供應器（DC Power Supply） E3632A，這是工作室比較貴重儀器之一，雖然購買時是二手，但價格也不是很平宜，原廠的價格更加高達 US$1281 (約港幣$9992），因為筆者是化不起購買全新的！但這儀器是非常穩定和容易操作，還很重 (9.5kg)。

安捷倫（Agilent）E3632A 直流電源供應器正面

安捷倫（Agilent）E3632A 直流電源供應器背面

這台安捷倫（Agilent）基本直流電源供應器型號是 E3632A 120W，單直流電壓雙範圍輸出 0 - 15 V，7 A 或 0 - 30 V，4A，具備低輸出漣波及雜訊，過壓（Overvoltage）和過流保護（Overcurrent），還有 GPIB，RS-232 接口，廉容 SCPI (Standard Commands for Programmable Instruments) 指令，前面板的按鍵和操作是很容易，不需要太多和煩複的操作過程。

安捷倫（Agilent）E3632A 前面板

Agilent E3632A 前面板：

編號	Description
①	15V/7A range selection key
②	30V/4A range selection key
③	Overvoltage protection key
④	Overcurrent protection key
⑤	Display limit key
⑥	Recall operating state key
⑦	Store operating state/Local key
⑧	Error/Calibrate key
⑨	I/O Configuration/Secure key
⑩	Output On/Off key
11	Control knob
12	Resolution selection keys
13	Voltage/current adjust selection key

安捷倫（Agilent）E3632A VFD 顯示屏

Agilent E3632A VFD 顯示屏：

顯示	Description
Adrs	Power supply is addressed to listen or talk over a remote interface
Rmt	Power supply is in remote interface mode
15V	Shows the 15V/7A range is selected
30V	Shows the 30V/4A range is selected
OVP	The overvoltage protection function is enabled when the annunciator turns on or the overvoltage protection circuit has caused the power supply to shutdown when the annunciator blinks
OCP	The overcurrent protection function is enabled when the annunciator turns on or the overcurrent protection circuit has caused the power supply to shutdown when the annunciator blinks
CAL	The power supply is in calibration mod
Limit	The display shows the limit values of voltage and current
ERROR	Hardware or remote interface command errors are detected and the error bit has not been cleared
OFF	The output of the power supply is disabled
Unreg	The output of the power supply is unregulated (output is neither CV nor CC)
CV	The power supply is in constant voltage mode
CC	The power supply is in constant current mode

Agilent 電源供應器：

規格	E3631A	E3632A	E3633A	E3634A
輸出	3	1	1	1
最大功率	80W	120W	200W	200w
直流輸出	0 – 6V / 5A 0 – +25V / 1A 0 – -25V / 1A	0 – 15V / 7A 0 – 30V / 4A	0 – 8 V / 20A 0 – 20V / 10A	0 – 25V / 7A 0 – 50V / 4A
參考售價	美元 $1,466	美元 $1,281	美元 $1,549	美元 $1,549

品牌型號：安捷倫（Agilent）E3632A 電源供應器（DC Power Supply）

輸出範圍 1：0 到 15.45 V，0 - 7.21 A

輸出範圍 2：0 到 30.9 V，0 - 4.12 A

最大輸出功率：120W

編程電壓準確度：0.05% + 10 mV (在 25°C ±5°C 時的程式準確度）

編程電流準確度：0.2% +10 mA (在 25°C ±5°C 時的程式準確度）

讀回電壓準確度：0.05% + 5 mV (25°C ±5°C 時的讀回值準確度）

讀回電流準確度：0.15% + 5mA (25°C ±5°C 時的讀回值準確度）

漣波與雜訊：(20 Hz 至20 MHz)

正常模式電壓：＜350µVrms / 2 mVpp

正常模式電流：＜2 mA rms

共模電流：＜1.5 µA rms

過壓保護：1 – 32V

過流保護：0 – 7.5V

輸入/輸出接口： GBIP，RS-232

電源：Vac ± 10%, 47-63 Hz / Vac ± 10%, 47-63 Hz / Vac ± 10%, 47-63 Hz

額定電力：最大 500W

操作溫度：0°C – 40°C

外觀尺寸：約 213 × 133 × 348 mm（寬 × 高 × 長）（不包括最大突出部分）

重量：約 9.5 kg

上市日期：2003年

參考售價：1,281 美元 / 港幣 9,992元

2014年4月21日星期一

Excel：簡化找尋資料的 VBA Filter 小程式

Excel：簡化找尋資料的 VBA Filter 小程式：

由於工作需要，要常在一個龐大的 Excel 資料庫內找尋資料，當然 Excel 內的 Filter 是一個非常不錯的功能，但每次都要化五個步驟（篩選按鍵 → 自訂 → 選擇條件 → 鍵入條件資料 → 確定）才可完成，所以考慮寫一個 VBA（Visual Basic for Applications）簡化找尋資料的小程式，方便工作。

選擇篩選按鍵

篩選按鍵 → 自訂

篩選按鍵 → 自訂 → 選擇條件

篩選按鍵 → 自訂 → 選擇條件 → 鍵入條件資料

篩選按鍵 → 自訂 → 選擇條件 → 鍵入條件資料 → 確定

Excel VBA 編程：
檔案 → 開新檔案，打開新檔案 (或按 Ctrl + N) 。
工具 → 巨集 → Visual Basic 編輯器，進入 VBA 編輯器 (或按 Alt + F11) 。
選擇功能表命令插入 → 點擊模組 (Insert → Module) 。
編寫 VBA 程式。
執行 VBA 模組 (或按 F5) 。
檔案 → 關閉並回到 Microsoft Excel (或按 Alt + Q) 。
儲存檔案。

Excel VBA 編程

F10 → 鍵入條件資料 → 確定

顯示 Filter 的結果

VBA 程式：

ThisWorkbook:

Private Sub Workbook_Open()

Application.OnKey "{F10}", "CallFilter"

End Sub

UserForm1:

Private Sub CommandButton1_Click()

Range("B:B").AutoFilter Field:=ComboBox1.ListIndex + 1, Criteria1:=TextBox1.Text

Range("B1").Select

Application.ScreenUpdating = True

Unload Me

End Sub

Private Sub UserForm_Initialize()

Dim c As Range

Dim rng As Range

Set rng = ThisWorkbook.Worksheets("Sheet1").Range("A1:AZ1")

For Each c In rng.Cells

If Not IsEmpty(c) Then

Me.ComboBox1.AddItem c.Value

End If

Next c

Me.ComboBox1.ListIndex = 1

End Sub

Module1 :

Private Sub CallFilter()

UserForm1.Show

End Sub

氣溫：24.2 度 @ 20:00

相對濕度：百分之90%

天氣：多雲

訂閱：文章 (Atom)

2014年4月24日 星期四

安捷倫（Agilent）E3632A 直流電源供應器 - 介紹：

2014年4月21日 星期一

Excel：簡化找尋資料的 VBA Filter 小程式

2014年4月24日星期四

2014年4月21日星期一