Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


74153 / 76738 ←次へ | 前へ→

【7055】マクロに自分の作ったフォームをいれたい。
質問  みさっぴ  - 03/8/21(木) 11:40 -

引用なし
パスワード
   こんにちは。
また困ってます。よ炉しくお願いします。

マクロを使って、入力した値を計算をして、表示させる、
ということをさせたいのですが、うまくいきません。

フォームは、

 座標を入力してください。
(____、___)(___、___)

 電流密度___
 
       OK

 計算結果____


という具合です。
マクロに組み込もうとして、
次のようにつくってみたのですが、
3段目のPrivate Sub 〜の前にEnd Subをいれろ!
というエラーが出てしまいます。
なにがいけないのでしょうか。
教えてください。


Sub Macro3()

  Load UserForm1
  UserForm1.Show
  

  Private Sub CommandButton1_Click()

   Dim MC As Single
   Dim A As Single
   Dim B As Single
   Dim C As Single
   Dim D As Single
   Dim E As Single
   Dim F As Single
   Dim G As Single
  
  
  A = TextBox1.Text
  B = TextBox2.Text
  C = TextBox3.Text
  D = TextBox4.Text
  G = TextBox7.Txet   '電流密度
  
  
  E = C - A  '時間
  F = D - B  '電位
  TextBox5.Text = E
  TextBox6.Text = F
  
  MC = G * E / F
  TextBox8.Text = MC
   

 End Sub
  
End Sub

0 hits

【7055】マクロに自分の作ったフォームをいれたい。 みさっぴ 03/8/21(木) 11:40 質問
【7060】Re:マクロに自分の作ったフォームをいれたい... INA 03/8/21(木) 13:52 回答
【7086】Re:マクロに自分の作ったフォームをいれたい... みさっぴ 03/8/22(金) 10:37 お礼
【7087】Re:マクロに自分の作ったフォームをいれたい... INA 03/8/22(金) 11:08 回答
【7088】Re:マクロに自分の作ったフォームをいれたい... みさっぴ 03/8/22(金) 11:24 質問
【7089】Re:マクロに自分の作ったフォームをいれたい... INA 03/8/22(金) 11:46 回答
【7549】Re:マクロに自分の作ったフォームをいれたい... みさっぴ 03/9/8(月) 16:00 質問
【7553】Re:マクロに自分の作ったフォームをいれた... INA 03/9/8(月) 16:16 回答
【7563】Re:マクロに自分の作ったフォームをいれた... みさっぴ 03/9/8(月) 16:51 質問
【7564】Re:マクロに自分の作ったフォームをいれた... INA 03/9/8(月) 17:04 回答
【7567】Re:マクロに自分の作ったフォームをいれた... みさっぴ 03/9/8(月) 17:41 お礼
【7566】Re:マクロに自分の作ったフォームをいれた... Jカーター 03/9/8(月) 17:30 回答
【7569】Re:マクロに自分の作ったフォームをいれた... みさっぴ 03/9/8(月) 17:46 お礼

74153 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free