- 締切済み
エクセルＶＢＡでＲＳ２３２Ｃへ
エクセルＶＢＡでＲＳ２３２Ｃへデータを送ることは出来ますか？ 出来るならその方法を教えてください。 はっきりいってＶＢＡまったくの初心者です。
- thegame
- お礼率87% (7/8)
- Visual Basic
- 回答数3
- ありがとう数10
- みんなの回答 （3）
- 専門家の回答
みんなの回答
- arata
- ベストアンサー率49% (139/279)
- osaosa42
- ベストアンサー率60% (20/33)
MicrosoftのCommコントロールを使えば簡単にできると思います。 [ツール]→[参照設定]の参照設定画面で参照ボタンを押し、「MSCOMM32.OCX」を参照します。 あとは、 ------------------------------------------------- Dim MSCom1 As MSComm Set MSCom1 = New MSComm ' COM1 を使用します。 MSComm1.CommPort = 1 ' 9600bps、パリティなし、データ長 8 ビット、およびストップ ビット長 1。 ' MSComm1.Settings = "9600,N,8,1" ' Input プロパティ使用時に、バッファ全体を読み取るように設定します。 MSComm1.InputLen = 0 ' ポートを開きます。 MSComm1.PortOpen = True ' コマンドを送信します。 MSComm1.Output = Text1.Text ' シリアル ポートで "OK" 応答データを読み取ります。 ' シリアル ポートを閉じます。 MSComm1.PortOpen = False ------------------------------------------------- な感じでできると思います・・・
お礼
osaosa42さんありがとうございます。 非常にありがたいです。 ずぶの素人なので、どう利用していいかもわかりませんが 上記を参考に一から勉強してみます。
- brogie
- ベストアンサー率33% (131/392)
おはよう御座います。回答者の方が居られないようですから、RS232ｃソフトをVBAで組んだことはありませんが、何かのヒントになればと思い書き込んでみました。 これから、勤めですから、この後、レスできません。 Win32APIを使用しないと出来ないでしょう。 そのための書籍を紹介します。 １ VBAユーザーのための Win32APIプログラミングガイド 大村あつし著 エーアイ出版 ２ Win32システムサービスプログラミング マーシャル・ブレイン＝著 郡司芳昭＝訳 ブレンディスホール（出版） この2冊あればあなたの構想は実現すると思います。 2冊とも例題が豊富で、分かり易い書籍です。これから、このような分野に興味がある方にはお勧めの入門書です。 ネットワークプログラミングの書籍などもあればあなたのスキルアップができるでしょう。 しかし、VBAの初心者ならば相当な努力が必要でしょう。
お礼
情報ありがとうございます。 皆さんの回答を元にいろいろ調べてみます。
お礼
情報ありがとうございます。 皆さんの回答を元にいろいろ調べてみます。