R EDUCED LABOR INCREASED VISIBILITY
Changed color of cell lines
Cell lines/Cell background
and background
Changing lines and background
color for improved visibility
Copy/Auto fill
Just like spreadsheet programs, VT
STUDIO allows the user to copy to
multiple cells by selecting a cell and
dragging over a range.
The device assignments increment
automatically.
Device numbers increment
for each copied part
Application
EQUIPMENT OPERATION GUIDANCE SCREENS
The spreadsheet-like operation makes
creating intuitive tables easier than ever.
13
R EDUCED LABOR INCREASED VISIBILITY
Changed color of cell lines
Cell lines/Cell background
and background
Changing lines and background
color for improved visibility
Copy/Auto fill
Just like spreadsheet programs, VT
STUDIO allows the user to copy to
multiple cells by selecting a cell and
dragging over a range.
The device assignments increment
automatically.
Device numbers increment
for each copied part
Application
EQUIPMENT OPERATION GUIDANCE SCREENS
The spreadsheet-like operation makes
creating intuitive tables easier than ever.
13
06
I want to align numeric displays
Tables and numeric displays are difficult to layout…
I want to make my tables easy to read, but it’s time-consuming…
Useful VT3 Function
TABLE CREATION FUNCTION
Registering makes adjustments easy
Using the Table Creation function, the user can control and adjust the table and registered parts such as numeric
displays as a single unit. This makes it possible to create good-looking tables without spending time adjusting the table
and numeric parts separately.
Parts Table
Register numeric displays and
other parts with the mouse
These functions allow the user to quickly make good-looking tables
Adjusts the cell width
Width/height auto adjust
Automatically adjusts the width and
height balance for numeric displays in
a table.
Aligns numeric displays in each
cell in a single operation
In-cell alignment
Adjust positioning in one step
12
06
I want to align numeric displays
Tables and numeric displays are difficult to layout…
I want to make my tables easy to read, but it’s time-consuming…
Useful VT3 Function
TABLE CREATION FUNCTION
Registering makes adjustments easy
Using the Table Creation function, the user can control and adjust the table and registered parts such as numeric
displays as a single unit. This makes it possible to create good-looking tables without spending time adjusting the table
and numeric parts separately.
Parts Table
Register numeric displays and
other parts with the mouse
These functions allow the user to quickly make good-looking tables
Adjusts the cell width
Width/height auto adjust
Automatically adjusts the width and
height balance for numeric displays in
a table.
Aligns numeric displays in each
cell in a single operation
In-cell alignment
Adjust positioning in one step
12
マクロの作成手順
Vol.1 で作成したシートを Excel で
1 開きます。
きます。
誰でもできる ！Excelマクロ Vol.1
！
Vol.1でVBAマクロを使った間引きの
テクニックを紹介しています。
Visual Basic Editor を起動します。
2 メニューから 【ツール （T）→ 】【マクロ （M）→】
【V isual B asic E dit o （ V） を 選 び V isu al
r 】
Basic Editorを起動します。
WorksheetFunction プロパティを用いて、マクロ上で Excel 関数を利用することが可能です。
Excel 豆知識 例えば、最大 (MAX 関数 ) を用いて A1 セルに A2:A11 の最大値を取り込む時は、
マクロで Excel の関数を Cells(1,1).Activate 'A1 セルをアクティブにします。
ActiveCell = Application.WorksheetFunction.Max(Range("A2:A11"))
利用する
と記述します。
簡単に Excel の関数を用いることができるのが VBA のメリットです。
Excel 関数を用いて最大・最小・平均を間引く単位毎に演算し
3 書き込むルーチンを書き足します。
Do ' 必要回数繰り返し
' 終了判定
If Cells(Now_Row, 1) = "" Then ' データがあれば OK
Cells(1, 1).Activate 'A1 セルをアクティブに
Exit Do
追加部分
End If
' 最大最小演算
Cells(Now_Row, 2).Activate ' 最大値書き込みセル指定
ActiveCell = Application.WorksheetFunction.Max(Range(Cells(Now_Row,1), Cells(Now_Row + MABIKI_P - 1, 1)))
'Excel 関数を用いて最大値演算しセルに書き込み
Cells(Now_Row, 3).Activate ' 最小値書き込みセル指定
ActiveCell = Application.WorksheetFunction.Min(Range(Cells(Now_Row,1), Cells(Now_Row + MABIKI_P - 1, 1)))
'Excel 関数を用いて最小値演算しセルに書き込み
Cells(Now_Row, 4).Activate ' 平均値書き込みセル指定
ActiveCell =Application.WorksheetFunction.Average(Range(Cells(Now_Row, 1), Cells(Now_Row+ MABIKI_P - 1, 1)))
'Excel 関数を用いて平均値演算しセルに書き込み
' 間引き処理
DEL_Top = Now_Row + 1 '1/10 にする場合 現在行 +1 ∼現在行 +(10-1)
現在行から現在行 + 間引き数 -
DEL_End = Now_Row + (MABIKI_P - 1) ' まで削除します。その範囲の設定です。
1 行までの平均 ( 最大最小 ) 値を
求めます。
Rows(DEL_Top + ":" + DEL_End).Select ' 間引き範囲選択
Selection.Delete Shift:=xlUp ' 間引き
Now_Row = Now_Row + 1 ' 現在位置更新
Loo
実行します。
4 Visual Basic Editorを終了しBookを保存します。
ワークシートにデータを貼付け
Ctrlキーを押しながらsを押してマクロの動作確認をします。
2
9
日本語 英 語 中国語
カムシャフト Camshaft
カム制御 Cam control
か︱ カメラ Camera
か 画面 Screen
下面図 Bottom view
カラー処理 Color processing
カラー濃淡処理 Color shade-scale processing
ガラス強化樹脂 Glass-fiber reinforced resin
仮仕様 Tentative specifications
過冷 Supercooling
カレンダー加工 Calender process
換気 Ventilatioｎ
環境 Environment
環境汚染 Environmental pollution
環境基準 Environmental standard
環境白書 Quality of the environment in Japan
環境保全 Enviromental conservation
監視時間 Monitor time
干渉防止機能 Interference-prevention
干渉領域 Interference area
含浸 Impregnation
慣性 Inertia
完成品 Final product
慣性モーメント Moment of inertia
間接費 Indirect expense
乾燥 Drying
乾燥炉 Drying oven/Kiln
乾電池 Dry battery/Dry cell
感度 Sensitivity
感度調整 Sensitivity adjustment
44
日本語 英 語 中国語
熱源 Heat source
熱硬化性樹脂 Thermosetting resin
ね
︱
熱交換器 Heat exchanger
の
熱効率 Thermal efficiency
熱収縮チューブ Heat shrink tube
熱衝撃 Thermal shock
熱処理 Heat treatment
熱損失 Heat loss
熱抵抗 Thermal resistance
熱電対 Thermocouple
熱伝達率 Heat transfer coefficient
熱伝導 Thermal conduction
ネットワーク管理者 Network administrator
熱疲労 Heat-fatigue
熱膨張 Thermal expansion
熱量 Quantity of heat
熱量計 Calorimeter
燃焼 Combustion
粘性 Viscosity
粘着性 Tenacity
粘度 Viscosity
粘度計 Viscometer
燃料 Fuel
燃料電池 Fuel cell
ノイズ干渉 Noise interference
ノイズフィルタ Noise filter
納期 Delivery date
納期遅れ Delivery delay
濃度 Concentration
納入 Delivery
32
日本語 英 語 中国語
設計マニュアル Design manual
切削 Cutting
せ
︱
切削加工 Cutting
せ
切削工具 Cutting tool
切削条件 Cutting condition
切削油 Cutting-oil/Cutting fluid
接続 Connection
接続図 Wiring diagram
絶対圧力 Absolute pressure
絶対位置 Absolute position
絶対温度 Absolute temperature
切断機 Shear
設置 Installation
接着剤 Bond
設定 Setting
設定切換 Program selection
接点出力 Contact output
セットアップメニュー Setup menu
設備稼働率 Equipment operation rate
設備投資 Equipment investment
セミグラフィック Semi-graphic (Control)
セルサイズ Cell size
ゼロ調整 Zero adjustment
先行手配 Anteceding order
センサ Sensor
センサヘッド Sensor head
センサ用電源 Power supply for sensors
線種 Line type
線数 Number of lines
全数検査 Whole inspection
オー メーシ ンサーバでの起動 計測 データ取り込みの手順
ト ョ
・・
ExcelのVBAを用いて、
WAVE LOGGER
（オー メ ョ
ト ーシ ンサーバ対応アプ ケーシ ン フ を
リ ョ ソ ト）
起動 計測 データ取り込む手順
・・
Excelのシート上にボタ を配置します。
ン
1 WAVE LOGGERをイ ト し、
ンス ール 一回以上起動して
からExcelを起動し作成して ださ
く い。
【ツール(T)】 【マク (M)】
Excelのメ ニューから → ロ →
2 【Visual Basic Editor(V)】 リ ク
をク ッ します。
Visual Basic Editorが開いたら以下コマ ド
ン を用いて、
プロ ラ
グ ムの作成を行います。
このVBAマク ロの入ったExcelワーク ト シー は
http://www.keyence.co.jp/keisokuki/req/download
/よ ダウ ロー
り ン ドでき ます。
① 起動･初期化
CreateObject
（"WaveLogger.Application"）
体験版の場合は WaveLoggerDemo.Application と します。
② ID設定
NR-500のID番号を設定します。 （NR-500のDIPスイ チも合わせて だ
ッ く さい）
WaveLogger.SetIdentifier 0）
（
③ 計測条件読み込み
AutomationServer機能では計測条件を新たに設定できないので、作成しておいた計測条件ファイルを読み込みます。
WaveLogger.OpenFile
（）
ここで読み込むファ イルは計測データ イルも可能です。
ファ
④ 計測開始
WaveLogger.Start
⑤ 状態確認
計測状態は自動的に返信さ れないので、VBA側から状態を確認します。
WaveLogger.GetState
⑥ 計測データ読み出し
計測が終了後、 計測データを取得します。
GetArrayData
（）
⑦ Excelに書き込み
ActiveSheet.Range(ActiveSheet.Cells(X1, Y1), ActiveSheet.Cells(X2, Y2)).Value = WaveDataArray
配列で渡すと早く書き込めます。
12
35
日本語 英 語 中国語
耐熱温度 Resistance temperature
耐熱材料 Heat resisting material
た︱ 対物レンズ Objective lens
た タイマ機能 Timer function
耐磨耗試験 Abrasion resistance test
タイミング Timing
タイム・アウト Time out
ダイヤモンド Diamond
耐溶剤性 Flux-resistance
太陽電池 Solar cell
耐用年数 Service life
対流 Convection
滞留在庫 Long-term inventory
耐力 Proof stress
ダイレクト出力 Direct output
ダウンサイジング Down sizing
楕円 Oval
高さ Height
立上り時間 Rising time
卓上旋盤 Bench lathe
ダクト Duct
濁度計 Turbidity analyser
タクトタイム
（短縮） Tact time(reduction)
多数決システム Majority decision system
多相パルス Multi-phase pulse
立会い検査 Joint inspection
立下り時間 Falling time
脱調 Maladjustment
縦置き Vertical mounting
立てフライス盤 Vertical milling machine
翻訳キーワード集
