LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 39
Default VB Code not grabbing cell values

hi, i was given the VB code below which takes all the value of cells V17 and
X25 and create a list down columns A and K on the 'graphs' sheet, it works
when i manually enter values into cells V17 and X25 and was testing it, but
it doesn't work when those cells are auto populated with data as they
calculate other cells, so the VB code isn't taking the values that appear in
those cells automatically like it should.

any ideas?

Private Sub Worksheet_Change(ByVal Target As Range)
Dim strColumn As String, lngRow As Long, ws As Worksheet

If Target.Count < 1 Or Target.Text = "" Then Exit Sub

If Target.Address = "$V$17" Then
strColumn = "A"
ElseIf Target.Address = "$X$25" Then
strColumn = "K"
End If

If strColumn < vbNullString Then
Set ws = Worksheets("graphs")
Application.EnableEvents = False
lngRow = ws.Cells(Rows.Count, strColumn).End(xlUp).Row
ws.Range(strColumn & lngRow + 1) = Target.Text
Application.EnableEvents = True
End If


End Sub

--
thanks
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Grabbing a number from another cell on another worksheet thermocorp Excel Discussion (Misc queries) 2 December 10th 09 03:46 AM
Keeps grabbing more than one cell/column confused Excel Worksheet Functions 1 March 11th 09 03:42 PM
Grabbing Formula Information from Another Cell RJB Excel Discussion (Misc queries) 7 September 13th 08 06:03 PM
Grabbing data from a specific cell *Kenneth* Excel Worksheet Functions 2 March 18th 08 10:31 PM
Grabbing recods based on date and shift values Jay Excel Worksheet Functions 1 February 25th 05 02:42 PM


All times are GMT +1. The time now is 02:42 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"