エクセルで選択列の決められた行に特定の文字を入れるマクロ

選択されている列の決められた行に特定の文字を入れるマクロを作りたいのですができますか？
私はマクロの記録でしかマクロを作れず、知識も乏しく困っています。
ご教示いただければ幸いです。

質問者からの補足コメント

• 拙い文章で申し訳ありません・・・
  例えば
  C列が選択されているとして、その列の１～３行目、それと5行目にテスト
  と入力したい場合どういったマクロになりますか。

    補足日時：2016/02/27 21:38

No.2 ベストアンサー 回答者： tom04 回答日時： 2016/02/27 21:48

No.1です。

＞その列の１～３行目、それと5行目にテスト
と入力したい場合

色んなやり方がありますが、

Sub Sample2()
Dim j As Long
j = Selection.Column
Union(Range(Cells(1, j), Cells(3, j)), Cells(5, j)).Value = "テスト"
End Sub

こんな感じではどうでしょうか？m(_ _)m

No.1 回答者： tom04 回答日時： 2016/02/27 21:13

こんばんは！

質問内容があまりに漠然としすぎて具体的なアドバイスができませんが・・・
仮に10行目に「特定の文字」を入れる場合は

Sub Sample1()
Cells(10, Selection.Column) = "特定の文字"
End Sub

といった感じになると思います。m(_ _)m