I am not able to manipulate data on the "Charts" worksheet.

I have three worksheets ("Charts", "Data", and "DataDown") in a single
workbook.
1. The "Charts" worksheet is where the final output needs to reside.
2. The "Data" worksheet is data copied from "DataDown" and another
workbook.
3. The "DownData" worksheet is a download of 49 columns.

I have entered the subroutine below on the "Data" worksheet. When the
sunroutine runs, it brings the "Charts" worksheet to the front but
manipulates the data on the "Data" sheet.

I need to be able to manipulate the data on the "Charts" worksheet from
the "Data" worksheet. I do not even need to bring the "Charts"
worksheet to the front.

I have lost my senses and cannot alter the data on "Charts".

Your thoughts are eagerly sought and appreciated!

Craigm

----------------------
Sub Acc_Types()

Dim wbBook As Workbook
Dim wsSheet As Worksheet

Dim rDescription 'Description
Column

Set wbBook = Workbooks("Charts_DataDown.xls")
Set wsSheet = wbBook.Sheets("Data")

Worksheets("Charts").Activate 'Move to "Charts" worksheet

'We are manipulating the DATA
Sheet NOT CHARTS sheet!
For Each rDescription In Range("A8:A10")
If rDescription.Value < "" Then
rDescription.Value = rDescription.Value & "9999;"
End If


Next rDescription

End Sub
-----------------------------------


--
Craigm
------------------------------------------------------------------------
Craigm's Profile: http://www.excelforum.com/member.php...o&userid=24381
View this thread: http://www.excelforum.com/showthread...hreadid=381733