'いろんな窓
'持ちネタ
'
'優先順位
'
'　　エラーへの対応　プロ・アマの違いはココ
'
'全体のスケジュール
'
'室温 女性に合わす
'
'  　書いたら読み直そう
'
'　　Dim A(3) As String, B As Variant
'
'　　配列を配列に入れなれないから､バリアントにする
'　　ここでB(3)　ではなく　B
'
'　　Split関数（元の文字列，区切り文字）　とても大事
'
'　　変数と型を統一すると後から読みやすい
'いい質問です
'　　オブジェクト型変数
'　　set A = Range("A1")   オブジェクト型変数
'　　Range　Worksheet　Workbook　　型には３種類ある  特定
'　　Object　　　　　　　　　　　　　型には３種類ある　Objectそのもの
'　　Variant　　　　　　　　　　　型には３種類ある　　なんでも
'　　カウント　Ｃｕｔ＝Ｃｕｔ＋１
'　　：　で２行を１行にできる
'復習
'　　Worksheets.Count
'
'　　コメント必ず書く
'　　On　Error　Resume　Next　’エラーを無視する　丸暗記
'　　On　Error　Goto　O
'　　エラーになったら必ず読む