VBAメモ書き

もうほとんどブログではなくオンラインメモ帳として機能しているオイラのブログ。

今日もまたメモ書きです。

行選択
     rows("4:4").select　　　４行を選択
　　rows("1:4").select      1~4行を選択
列選択
     columns("C:C").select       C列を選択
　　columns("A:C).select         A~C列を選択

変数使ってセルの選択
　　Dim retu1 As Integer
     Dim gyou1 As Integer

    Cells(retu1,gyou1).Selet

選択したセルから数値分離れたセルを選択
    ActiveCell.offset(3,5).Range("a1").Select
　 アクティブのセルからカーソルキーを下に３回右に６回押した位置
　

sumifを変数を入れて使ってみる
    
   Dim hensu1 As Integer
   Dim hensu2 As Integer
   Dim hensu3 As Integer
   Dim hensu4 As Integer

     ActiveCell.FormulaR1C1=
            "=SUMIF(R[" & hensu1 & "]C[-2]:R[" & hensu2 & "]C[-2],""名前"",R[ " & hensu3 & "]C[-3])"

ダブルクォーテーションで囲まれた範囲は文字列として認識される。＆を使い文字列結合して式を完成させる。
上記のSUMIFの場合

ActiveCell.FormulaR1C1=         (アクティブセルに式を入れる(.Formula))

"=SUMIF(R["　【文字列】
&
hensu1
&
"]C[-2]:R["        【文字列】
&
hensu2
&
"]C[-2],"            【文字列】
"名前"               【文字列】
",R[ "                 【文字列】
&
hensu3
&
"]C[-3])"            【文字列】

となる。

あれ、文字列文字列文字列があるが。

とりあえずは変数は文字列として代入すると計算されないので
””の外に書けば動く。