[Excel VBA] CSVファイルをUserFormを使った配列のみ読み込み

あるCSVのファイルがあり、そこのA19セル目のROWから番号が振ってあります。そこのRowの番号をUserForm1で選択し、OKボタンを押したら、そこの欄だけコピーペーストをあるシートに実行したいのですが、戸惑っています。　欄はここではROWからJudgeまでコピペが実行できればいいです。
。例えば、Userform1に「2」と数値を入力したら、A22,A23からI22とI23までコピーして、ペーストできればいいのです。また、この欄は右へ増えることがあります。
なにとぞよろしくお願いします。

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

• 

  「その数字を選ぶときには、UserForm1を使用したい。」でした。

  No.1の回答に寄せられた補足コメントです。 補足日時：2015/11/13 11:30

No.2 回答者： ゆや 回答日時： 2015/11/14 06:39

No.1の者です

ひょっとしてUserForm1に入力された数字を変数に格納する方法も不明なのかと思い、
一応下記を紹介させていただきます
「エクセルの神髄｜鵜原パソコンソフト研究所」
http://excel-ubara.com/excelvba3/EXCELFORM007.html
セルに入力してある部分を、検索のキーとして使う変数に書き換えれば使えます

検索に関してですが紹介したサイトは1個見つかる毎に変数に記録しております
そこを都度見つかったセルを選択し、下記のコピー処理を行うように変更すれば、
処理時間はともかく作りとしては簡単だと思います

コピーに関してですが、コピー範囲の開始セルは検索で選択するとします
次に終端の最右列とでも呼べばいいでしょうか、そのセルは途中に空きが無い限り
Range(Selection, Selection.End(xlToRight))
の範囲をコピーすればいい事になります
そのため下記でコピーができるはずです
Range(Selection, Selection.End(xlToRight)).Copy コピー先

No.1 回答者： ゆや 回答日時： 2015/11/07 21:57

質問はどちらでしょうか、または全く別でしょうか?

1．Userform1に入力された値をキーとして、「Row」の行にある数字を探したい。ただし複数ある。
2．コピーする範囲が変動するため、どのように処理をすればいいか。

とりあえず、質問がはっきりしないためにそれぞれに対応した解説されているURLを紹介します。
1．すべて検索する
「Office TANAKA」
http://www.officetanaka.net/excel/vba/tips/tips1 …

2．最終列を選択する
「教えて!goo」
https://oshiete.goo.ne.jp/qa/4377204.html
画像を見る限り空白セルが無いですから、ベストアンサーの方式で可能です

上記以外にも検索の代わりにフィルターによる絞り込みを行う等複数の方法があるので、
疑問がある処理を具体的にしていただきたいです。
またどのような回答内容を求めているかも示していただけると幸いです。
(何を使えば求む処理ができるのか、それとも該当処理を行うソースを求めているか不明)

この回答へのお礼

1の回答ですが、　その通りでROWの行にある複数の同じ数字を選び、その選ばれた数字の欄だけ右方向の数値すべて選択し、コピペする。その数値を選ぶときには、UserFormを使用したい。
2の回答ですが、コピーする範囲が右方向に変動されます。10~500Pointまででしょうか。
よろしくお願いいたします。

お礼日時：2015/11/13 11:26