bybalsendercase
Full メンバー
 オフライン
投稿: 27
I'm a llama!
|
 |
VBAの学習について
« 投稿日: 2014/06/24 - 23:03:20 » |
 |
ご多忙中申し訳ありません。
bybalsendercaseと申します。
私の環境はSheetWorks2014 Embedded版とAdd-in版です。
メーカー（アマダ）に問い合わせたところSolidWorks APIはVBAのみ対応とのことでした。
残念ながらVBAは触ったことがありませんので、学習しなければなりません。
VBAは「ＶＢ中学校」の「Visual Basic 6.0」で学習すればいいのでしょうか？
VBA「Visual Basic 6.0」は全く別もので他のサイトで学習するべきでしょうか？
私の実感としては少し記述が違いますが「Visual Basic 6.0」がよく似ているような感じがしています？
大変申し訳ありません、どんな情報でも結構ですのでご教示ください。
|
|
|
|
|
Makoron
カタマリの王様!?
オフライン
投稿: 1277
SW2011SP5.0
|
|
Re:VBAの学習について
« 返信 #1 投稿日: 2014/06/25 - 12:20:06 » |
|
『Visual Basic 6.0』と『VBA』はほとんど同じです。
勉強ということなら問題ないと思います。
|
|
|
|
|
bybalsendercase
Full メンバー
オフライン
投稿: 27
I'm a llama!
|
|
Re:VBAの学習について
« 返信 #2 投稿日: 2014/06/25 - 12:53:59 » |
|
Makoronさんへ
お返事有難う御座いました。
安心して学習できそうです。
すいません、SolidWorksのVBAの場合は普通のFormはないのでしょうか？
表示されるのはUserFormだけですが、どこかにFormを表示させる方法とか、コントロールの追加みたいなものはあるのでしょうか？
ご多忙中とは思いますがご教示をお願いいたします。
|
|
|
|
|
Makoron
カタマリの王様!?
オフライン
投稿: 1277
SW2011SP5.0
|
|
Re:VBAの学習について
« 返信 #3 投稿日: 2014/06/26 - 14:11:57 » |
|
VBのフォームとVBAのUserFormはほぼ同じものと考えてください。
ただ、VBの様に起動時にフォームが開くという動きではないので、
Sub main()
UserForm1.Show vbModeless
End Sub
といった感じでユーザーフォームを表示してあげればOKです。
表示されるのはUserFormだけですが、どこかにFormを表示させる方法
というのが、ちょっと意味がわからなかったのですが．．．
マクロ起動時にフォームを開く。であれば先の説明ですね。
フォームを表示する座標を変更するなら
UserForm1のコードに
Private Sub UserForm_Initialize()
Me.Top = 10
Me.Left = 10
End Sub
を追加すると、フォーム起動時に座標を決めれます。
コントロールの追加みたいなものはあるのでしょうか？
VBAでUserFormを表示したら、標準的なコントロールが乗っかった『ツールボックス』という
ウインドウが表示されませんかね？
表示されなければ、メニューの「表示」−「ツールボックス」をONにすれば表示されます。
このツールボックスからコントロールを選択してフォーム上で対角をドラッグで貼り付けることができます。
利用できるコントロールを増やすには、
メニューの「ツール」→「その他のコントロール」で必要なものにチェックを付けると、
先に説明したツールボックスにコントロールが追加されます。
（マクロを利用するPCのインストール環境が影響するのでMicrosoftと付いているものが無難です）
|
|
|
|
|
bybalsendercase
Full メンバー
オフライン
投稿: 27
I'm a llama!
|
|
Re:VBAの学習について
« 返信 #4 投稿日: 2014/06/26 - 19:42:30 » |
|
Makoronさんへ
いつも丁寧なお返事有難う御座います。
＞VBのフォームとVBAのUserFormはほぼ同じものと考えてください。
わかりました。
画像を表示するのは
Image1.Picture = LoadPicture("C: est est.JPG")
のようにするんですね。
いつもは
Bitmap bp = new Bitmap(this.Width, this.Height);
〜〜〜〜
とか
Dim bp As New Bitmap(Me.Width, Me.Height)
〜〜〜〜〜
のようにしてましたがUserFormで上記のようにすると
エラーになってしまいますのでなんかおかしいな〜と思っていました。
＞表示されなければ、メニューの「表示」−「ツールボックス」を＞ONにすれば表示されます。
＞このツールボックスからコントロールを選択してフォーム上で対＞角をドラッグで貼り付けることができます。
＞利用できるコントロールを増やすには、
＞メニューの「ツール」→「その他のコントロール」で必要なもの＞にチェックを付けると、
＞先に説明したツールボックスにコントロールが追加されます。
＞（マクロを利用するPCのインストール環境が影響するので ＞Microsoftと付いているものが無難です）
貴重な情報有難う御座います。
質問の情報が足りなくてすいませんでした。
まだまだお聞きしたいことが山ほどありますのでこれからもよろしくお願いします。
|
|
|
|
|
著者
記録済み