VBA
最初からのコードを全て書き出します。 Private Sub CommandButton1_Click() '変数宣言 Dim atai1 As Integer Dim atai2 As Integer Dim atai3 As Integer '入力 atai1 = a.Value atai2 = b.Value atai3 = c.Value '条件処理 If a > 80 Then MsgBox "よく出…
前回に引き続き、今回はA子さんとB子さんの条件分岐入力です A子さんの場合 Private Sub CommandButton2_Click() If (a > 80 And b > 180 And c > 1000) Then MsgBox "OKです!" Else MsgBox "次に方へ" End If End Sub B子さんの場合 Private Sub CommandBu…
ユーザーフォームの作成は抜粋します。 (作り方は、BMI値の算出を参照して下さい)最初に、三高の基準となる設定をします '変数宣言 Dim atai1 As Integer Dim atai2 As Integer Dim atai3 As Integer '入力 atai1 = a.Value atai2 = b.Value atai3 = c.Val…
今回は、VBAで三高評価を作ります!(IF文を用いて作成)三高とは、少し前に流行った、女性が男性を選ぶ時に基準とした高学歴・高身長・高収入 を 2人(A子さん・B子さん)の条件を設定してメッセーが出るプログラムです 【三高の標準設定値】 身長 = 180c…
今回分の連載は最後です!試しに私の身長、体重を入力しますね。入力画面です。実行結果は、です。その他に 肥満傾向であれば、 "肥えとーばい、運動してやせんば!" とメッセージが。痩せ気味であれば、 ”ぎゃん、やせぎみたい。もっと食べんば!” とメッセ…
『今回の目標に沿ったユーザーフォーム作成』以下のように、ラベル、テキスト、イラストの配置をしました!次は、いよいよコードの打ち込みです
『ツールボックスの使い方』[ ツールボックス]は、以下のように表示されます[ツールボックス]でどのコントロールが何に該当するかは、コントロールの上にマウスをかざすと ツールチップヒントが出てコントロールの名前は確認して下さい。簡単な使い方です…
『excel vbaの開発環境を整える』excelの画面に、以下のようにメニュ-リストの中に【開発】が入っているか確認する 【開発】が表示されていない場合は ファイル > オプション > リボンのユーザー設定 >以下の画面、開発の項目にチェックをつける 開発 >…
『概要と目標』目標: 今回は、連載を通して、excel VBAを使いBMI値と、現体重の体重評価を表示させたい概要: 体重と身長を入力すると、BMI値が計算される 現BMI値を元に、評価コメントを表示させたい。 備考: BMI計算式 BMI=体重kg / {(身長m) × (身長…