【VBAスタンダードに挑戦！】
本日の５分勉強の内容
********************************************************
変数の演算
代入演算子
・「＝」のこと
・LastColumn = 100 ・・・LastColumn という変数に 100 を入れる
「LastColumn が 100」ではなく「LastColumn を 100 にする」って感じ？
（表現が難しい・・・）
・変数の宣言後に初期値が代入される
Long の場合は「0」、String の場合は「""」（空欄）など
文字列の結合
・「&」（Ampersand/アンパサンド）を使用して文字列を結合する
********************************************************
こんな表をイメージしてみた。
Sub 変数演算()
Dim r As Long 'Row の r
Dim LastR As Long '最終行を入れる
Dim Cnt As Long 'Count(カウント) この時点で「0」が代入される
LastR = Cells(Rows.Count, 2).Row '最終行を取得
For r = 2 To LastR '２行目から最終行まで繰り返し
If Instr( Cells( r , 1 ), "Trial" ) > 0 Then '１行目に Trial という文字があれば
Cnt = Cnt + 1 'Cnt に１追加する
End If
Cells( r , 4 ) = Cells( r , 2 ) & Cells( r , 3)
'４列目に2列目と3列目の文字列を結合した値を入力
Next r
MsgBox Cnt
End Sub
********************************************************
今日の範囲は、良く使用しているから問題なく理解できた。
サンプルのコードは変かもしれないけど・・・
文字列の結合は VBA 上ではなく関数でよく使います。
Unique な ID を作成していない表を扱っているので、
Vlookup 用に一時的に作成して完了したら削除。
※Unique・・・唯一、一意
＿／＿／＿／＿／＿／＿／＿／＿／＿／＿／＿／＿／＿／＿／＿／＿／
