Thread: Autofill
View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Jim Cone[_2_] Jim Cone[_2_] is offline
external usenet poster
 
Posts: 1,549
Default Autofill

If Target.Column = "T" should be changed to... If Target.Column = 20

The code runs almost instantly for me and it fills in 8700 rows of
vlookup formulas and calculates a new value from my "Delivery" range.
This is in xl2002.

Question: Why the auto fill? The formulas are already filled down 8700 rows.
--
Jim Cone
Portland, Oregon USA



"Ken"
wrote in message
Jim,
I had already changed from the "intersect" to the following:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim endRow As Long
If Target.Column = "T" And Target.Row 3 Then
endRow = Cells(Rows.Count, 20).End(xlUp).Row
Range("U3").Autofill Destination:=Range("U3:U" & endRow)
End If
End Sub

I actually want the value resulting from the formula in "U" to
automatically be entered into "U" without having to click a button.
The formula is this and it increments with the rows:

=IF(ISNA(VLOOKUP(T3, DELIVERY, 2, FALSE)),"",VLOOKUP(T3, DELIVERY, 2,
FALSE))

Changing the macro did straighten out the problem with selection of
rows and columns, but not the recalculation of all 8700 values when
data is entered into Col "T". That's the big drawback.
Just trying to make the spreadsheet better....thanks for your help!
Ken