|
For文の中に更にFor文をいれ、ある列にその列の一つ左の列と更に左の列の演算式を作りました。
1度目(繰り返し回数)の列はうまくいくのですが、2度目の列は参照場所がおかしいです。
少し省略しておりますが、具体的に申し上げますと、
D列にC列/1000+B列という演算式を入れました。
65536行も還すようにしています。
またD列から右へ4列目も同じように演算式が入るようにしました。
しかしH列(D列から4列目)はG列、F列もみず、変な列を参照してしまいます。
理由が分かりませんので対処のしようがないです。
誰かお力をお貸し頂けないでしょうか。
よろしくお願い致します。
<省略>
'------------------------------あまり関係ない
u = 2
If u <= t * 4 Then
For w = u To 4 * t
If sh1.Cells(3, u).Value = "" Then
Exit For
sh1.Select
Cells.Clear
End If
x = sh1.Cells(65536, u).End(xlUp).Row
sh2.Cells(18, 8).Value = x
If sh1.Cells(3, u).Value <> "" Then
sh1.Cells(2, u + 2).Value = "あ"
End If
For o = 3 To x
sh1.Cells(o, u + 2).FormulaR1C1 = "=RC[-1]/1000+RC[-2]" ← ここの構文
Next o
u = u + 4
Next w
|
|