Prev: shared workbook - shared workbook options grayed out
Next: Previewer error??
From: Morgan on 3 Mar 2010 18:17
hi, is there any chance of someone amending this code to have cell X25 form a
list down column K on the 'graphs' sheet, i basically want to duplicate what
this code does but add in one more cell, thank you

Private Sub Worksheet_Calculate()
Dim Dest As Range
With Sheets("graphs")
Set Dest = .Range("A" & Rows.Count).End(xlUp)
If Range("V17") <> Dest Then _
Dest.Offset(1) = Range("V17")
End With
End Sub



--
thanks
 | 
Pages: 1
Prev: shared workbook - shared workbook options grayed out
Next: Previewer error??