エクセル博士来てくれ頼む

1 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:29:11.687 ID:Y5dfJf81a.net

縦のセル
b1,b2,b3......
に
=a2,=a4,=a6........
みたいな式を連続コピペしていきたいんだけどいい方法無い？

2 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:30:17.734 ID:Y5dfJf81a.net

普通にコピペすると=a2,=a3,=a4.....
みたいになってしまう頼む

3 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:31:13.622 ID:4zhuHhnI0.net

Column（A1)*2でいいじゃん

4 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:31:37.468 ID:VBt4cjF90.net

めもちょうで,を改行にして貼り付けられないん？

5 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:31:39.090 ID:Y5dfJf81a.net

>>3
ちょっと試してみる

6 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:31:44.864 ID:ljk+3/r60.net

フィルするセル選択して右クリックしてああ忘れた

7 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:32:07.419 ID:Y5dfJf81a.net

>>4
手打ちだと辛い
800行くらいある

8 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:33:38.231 ID:Y5dfJf81a.net

>>3
すまん駄目だった

9 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:34:54.941 ID:I8Tv3u9J0.net

=INDIRECT("A"&ROW()*2)みたいな

10 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:35:11.664 ID:Y5dfJf81a.net

>>9
試してみる

11 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:35:54.193 ID:nqfQFPBaa.net

三行くらい手打ちして囲んで右下+からダラーっと

12 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:36:12.800 ID:16wr7p1K0.net

2セルだけ
=a2 =a4
って入れてから2セル選んでから
選択してる範囲の右下にあるちっちゃい四角を右にドラッグ？

13 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:37:09.122 ID:16wr7p1K0.net

読み間違えた…縦だったか…

14 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:37:19.616 ID:4zhuHhnI0.net

=INDIRECT（”A" & Column（A1)*2）


ちゃんとこうやった？

15 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:38:09.476 ID:Y5dfJf81a.net

>>9
いけるかもしれない
理屈はさっぱりだけど
ちょっと待ってくれ

16 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:38:46.644 ID:Y5dfJf81a.net

>>11
>>12
これは駄目だった

17 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:39:06.654 ID:OaXmVFSS0.net

INDIRECTを使うしか無い

18 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:39:09.165 ID:4zhuHhnI0.net

ああ、縦方向か
ならROWだな

19 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:39:28.613 ID:Y5dfJf81a.net

>>14
やってなかったごめん

20 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:42:01.723 ID:3Ay8C40G0.net

a2 a4 a6を選んで選択セルの右下を下にドラックしたらできるctrl押しながらだったかな？

21 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:42:48.085 ID:PJZUfiQp0.net

セル表記をR1C1方式にすれば簡単だよ

22 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:44:27.880 ID:Of0c2cMva.net

お前らindirect好きだよなw

23 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:45:39.173 ID:5/1xwLFY0.net

規則性がわかってるならどうにかなりそうな気がするけど
めんどくせぇ

24 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:47:26.184 ID:3Ay8C40G0.net

連続性あったらオートフィルで勝手に追加される気がしたんだかなー

25 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:49:17.715 ID:Y5dfJf81a.net

>>9
いけた行けた多分大丈夫
800行あるからチェック甘々だけど今のとこ完璧
ありがとうありがとう

26 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:54:06.542 ID:Fkin3m8/0.net

For i =1 to 800
cells(i,"b") = "=a"&i×2
next i

27 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:54:26.697 ID:6LjkBRn80.net

Sub viptest()
v = 1
Do Until Cells(v, 1) = ""
Cells(y, 2).Formula = "=A" & v * 2
v = v + 1
Loop
End Sub

28 ：以下、？ちゃんねるからVIPがお送りします：2018/07/10(火) 22:55:33.386 ID:6LjkBRn80.net

間違えたｗ

Sub viptest()
v = 1
Do Until Cells(v, 1) = ""
Cells(v, 2).Formula = "=A" & v * 2
v = v + 1
Loop
End Sub