Menuへ

VBA講座 セルの操作

Step 6　別のシートに値や関数をセットする

プログラムを入力する

前回の、Private Sub CommandButton1_Click()　と　End Sub　の間を変更してください Private Sub CommandButton1_Click()     'セルC5に数値をセットします。     Sheet2.Range("C5").Value = 56     'セルC6に数値をセットします。     Sheet2.Range("C6").Value = 87          'セルC7にSUM関数をセットします。     Sheet2.Range("C7").Formula = "=SUM(C5:C6)"     'セルC8にIF関数をセットします。     Sheet2.Range("C8").Formula = "=IF(C5>C6,""大"",""小"")" End Sub

プログラム説明

Sheet2.Range というように先頭にシート名を指定しています。 数値や関数ののセルへの指定方法はこれまでと同じです。

実行結果

Excel画面に戻り、コマンドボタンをクリックしてください。 　・セルC5に数値　56　がセットされています。 　・セルC6に数値　87　がセットされています。 　・セルC7に合計　143　がセットされています。 　・セルC8にIF関数の結果　”小”　がセットされています。

Topへ

■このサイトの内容を利用して発生した、いかなる問題にも一切の責任は負いませんのでご了承下さい。■ 当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します。 Copyright (c) 2006-2007 Excel-Excel! All rights reserved.