みなさん教えてください。 現在、エクセルVBAでRS232を用いて、測定器（DMM)から測定結果を取得するソフトを組んでいます。 測定器からデータは取得できるようになったのですが、測定器から出力されるデータが 「5.123,0.0111」とカンマ区切り状態ではないので、容易にグラフ化などデータ整理ができません。 ↑ ↑ 電圧値 電流値 そこでみなさんに教えて頂きたいことがあります。 データ取得時に、自動的にカンマ区切り状態になり、 セルA2：測定時間 セルB2：電圧値 セルC2：電流値 のようにデータが自動的に入ってくるようにしたいと思っています。 このようにデータを取得するためには、下記構文をどう変更すればよいか、教えて頂けませんか。 御願いします。 ＜構文＞フリーソフトのEasyCommを使用しています。 Sub 測定開始() Dim get_data As String '文字列型（2byte変数） Dim ComPort As Byte 'バイト型（1byte変数） Dim s As Long '長整数型（4byte変数） Dim ss As Long '長整数型（4byte変数） ComPort = Cells(1, 6).Value 'COMポート番号の取得 ec.COMn = ComPort 'COMポート番号の指定 ec.HandShaking = "N" 'ハンドシェークなし ec.Delimiter = "CRLF" 'デリミタ（CR:復帰,LF:改行） ec.Setting = "9600,n,8,1" '通信条件の設定 ec.AsciiLineTimeOut = 1500 'AsciiLineの読み出しアウト時間 '受信データの記録 Do While Range("G2") = 1 i = i + 1 get_data = ec.AsciiLine '文字列の読み出し Cells(1 + i, 1).Value = Format(Now, "h:mm:ss") '時間の記録 Cells(1 + i, 2).Value = get_data 'データの記録 ec.WAITmS = 2 '待機時間（20ms） '通信ポートのクローズ ec.COMnClose = ComPort End Sub
↧