|
▼INA さん:
>>一つのワークシートに、ブックが150ぐらいあります。
>一つのブックに、ワークシートが150 ですね?
>
>
>>ブックのタグには、様々な名前にしてます。
>シート名 ですね?
>
>
>以下のコードは、アクティブシートA1に
>ブック内の他のシートのA1を加算していくサンプルです。
>
>Sub sample()
>Dim myWS As Worksheet
>
>With ActiveSheet
>
> For Each myWS In Worksheets
> If .Name <> myWS.Name Then
> .Range("A1").Value = _
> .Range("A1").Value + myWS.Range("A1").Value
> End If
> Next
>
>End With
>End Sub
INAさん、ありがとうございました。
> .Range("A1").Value = _
> .Range("A1").Value + myWS.Range("A1").Value
を書き換えれば、任意の座標の集計が出来ますよね。
早速、やってみます。
ほんと、悩んでいましたので助かりました。
|
|