excel vbaでユーザーフォームに線を書く

excel vbaでユーザーフォームに線を書きたいのですが
（プログラムではなくツールボックスにコントロールを追加し）
ｖｂのｌｉｎｅのようなコントロールはあるでしょうか。

環境　Windows XP, Office2003

No.2 ベストアンサー 回答者： imogasi 回答日時： 2011/11/10 19:04

テキストボックスを貼り付け

Private Sub UserForm_Click()
TextBox1.Height = 1
End Sub
を実行すると、線のように見えるが。
Private Sub UserForm_Click()
TextBox1.Height = 1
TextBox1.BorderStyle = 1
TextBox1.BorderColor = vbGreen
End Sub
までは出来るようだ。
＞プログラムではなく
とは？ＶＢＡはプログラムと言われるのでは？

この回答へのお礼

ありがとうございました。
ラベルを細くしてフォームに貼り付けました。

お礼日時：2011/11/11 09:04

No.1 回答者： keithin 回答日時： 2011/11/10 18:21

いいえ。

ユーザーフォームにはLineなどShapeのコントロールはありません。
ラベルコントロールなどの外周を利用して縦横の線に見せかけるような手が簡単な方法のようです。

調べていくとWindows APIをゴリゴリ使ってやっつける方法等もヒットしますが，たとえば下記などもご参考に。
http://www.andypope.info/vba/userformdraw.htm

この回答へのお礼

今回はラベルを細くしてフォームに貼り付けました
ＡＰＩのページはとても参考になりました
次回活用したいと思います。

お礼日時：2011/11/11 09:05