エクセルのの200個のデータに、それぞれ1~100をかけたデータを作成したいです。

エクセルの200個のデータに、それぞれ1~100をかけて、
20,000個のデータを作る必要があるのですが、どのようにしたら良いでしょうか・・・？
色々考えたのですが、解決できず。。
アドバイス頂けると幸いです。よろしくお願いいたします。

No.1 ベストアンサー 回答者： angkor_h 回答日時： 2020/07/09 16:35

例えば、

B1から横に、1～100までの数字を配置すれば、CW1が「100」になります。
A2から下へ(Anに)元データーを置き、
B2=$A2*B$1
として、このセルを全計算範囲にコピー(或いはドラッグ)すればよいはずです。

この回答へのお礼

早々にご回答いただきありがとうございます！横展開思いつかなかったです。助かりました！！

お礼日時：2020/07/09 17:46

No.3 回答者： tom04 回答日時： 2020/07/09 16:47

こんにちは！

手っ取り早くVBAでの一例です。
元データはA列の1行目以降にあるとし、B列以降に表示するとします。
B列　→　×2
C列　→　×3
　・
　・
といった感じで、最終列はCV列になります。

Sub Sample1()
　Dim i As Long, j As Long
　　For i = 1 To Cells(Rows.Count, "A").End(xlUp).Row
　　　For j = 2 To 100
　　　　Cells(i, j) = Cells(i, "A") * j
　　　Next j
　　Next i
End Sub

※　A列は必ず数値データだという前提です。
（文字列だとエラーになると思います）m(_ _)m

No.2 回答者： fujillin 回答日時： 2020/07/09 16:42

こんにちは

＞それぞれ1~100をかけて～
というのは、元の値をAとするなら、A×1、A×2・・・A×100をそれぞれ計算したものを表にすれば良いものと解釈しました。

◇ シートのA列に200個のデータがあるものとします。（A1:A200）

1）B1セルに =$A1*COLUMN(A1) の式を入力します。

2）これを右方向にCW1セルまでフィルコピーします。（←この作業だけ一寸面倒）

3）B1:CW1が選択されている状態で、右下のコピーハンドルをダブルクリックします。
　(これにより、B1:CW200に式がフィルコピーされます）

以上で、ご質問の内容の表が完成すると思います。
（A列とB列は値がダブるので、=$A1*COLUMN(B1) から始めても良いかもしれません）