This is a Cross-post from:
http://www.mrexcel.com/forum/excel-q...nge-cells.html
O.K. I have the following Code which takes data from Worksheet CDR1001 (data generated from a report) and pastes it into Sheet1 (for the time being, it will have to be pasted into another workbook when fixed!!) in the correct columns.
Credit Entries
Item# and Values will be copied/pasted into Cols A & B if the Item is <132 (values will be converted to a negative)
Item # and Values will be copied/pasted into Cols D & E if the Item is =132 (values will be converted to a negative)
Item # and Values will be copied/pasted into Cols G & H if the Item is >132 (values will be converted to a negative)
Debit Entries
Item# and Values will be copied/pasted into Cols A & B if the Item is <132
Item # and Values will be copied/pasted into Cols D & E if the Item is =132
Item # and Values will be copied/pasted into Cols G & H if the Item is >132
What I'm having problem with is the Paste Area must be the first Blank Cell in the Column, in a range. i.e. A2:A25, B2:B25,D2:D25, etc
Right now as it stands it copies everything to a similar row as the Source Data, hence the 'CDR_Count' Variable.
Anybody have any ideas??
The Code looks long as I have repeat the same steps six times.
ThanksPlease Login or Register to view this content.
Bookmarks