忍者ブログ
     2008年11月14日 開始
[25] [26] [27] [28] [29] [30] [31] [32] [33] [34] [35]
×

[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。

Excel(エクセル) VBA入門:ワークシート関数を利用する


http://www.eurus.dti.ne.jp/~yoneyama/Excel/vba/vba_ws_kansu.html
 

VBAでセルに数式を入力するにはFormulaプロパティを使います。

  • 【例1】C1:C5に数式=SUM(A1:B1)を入力します。
    • Sub rei13_1()
        Worksheets("Sheet1").Range("C1:C5").Formula = "=SUM(A1:B1)"
      End Sub

 

【例3-2】VLOOKUP関数がエラーとなる場合(対処法1)

  • エラー処理へ分岐します。
    Sub rei13_8()
    Dim myR
    On Error GoTo ErrorHandler
      With Worksheets("Sheet1")
        myR = Application.WorksheetFunction.VLookup(.Range("C1"), .Range("A1:B7"), 2, False)
        .Range("D1").Value = myR
      End With
    Exit Sub
    ErrorHandler:
      Worksheets("Sheet1").Range("D1").Value = "該当無し"
    End Sub
     
PR


忍者ブログ [PR]
お天気情報
カレンダー
03 2024/04 05
S M T W T F S
1 2 3 4 5 6
7 8 9 10 11 12 13
14 15 16 17 18 19 20
21 22 23 24 25 26 27
28 29 30
リンク
フリーエリア
最新CM
最新TB
プロフィール
HN:
No Name Ninja
性別:
非公開
バーコード
ブログ内検索
P R
カウンター
ブログの評価 ブログレーダー