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

質問

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

環境　Windows XP, Office2003

回答No.2

imogasi · ベストアンサー

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

お礼

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

回答No.1

keithin

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

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

お礼

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