View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
solid solid is offline
external usenet poster
 
Posts: 6
Default updating two sets of data

I have this formula under that I use to update the numbers in my
worksheet and is working find
But I have two sets of data now on the same worksheet coming from
a1:a20 starting from the number (1) one to number twenty (20) and the
other number also starting from a21: a100 starting from the number one
to number ninety
What is needed is two command buttons to update the first part from
a1:a20 and the other part from a21:a100

Sub BBB()
Dim rng As Range
With ActiveSheet
Set rng = .Range(.Cells(2, 2), .Cells(2, 2).End(xlDown))
End With
Set rng = rng.Offset(0, -1)
rng(1) = 1
rng(2) = 2
rng(1).Resize(2, 1).AutoFill rng
End Sub