Dharani,
It's not quite clear what you're going for, but here's the information we need to help you:
1. What are you trying to accomplish? Do you have a group of files and you're trying to summarize the data into one sheet? Or do you have a list (like the one attached) and you need to categorize the items in that list?
2. What are the exact operations & business rules by which you derive your output? It looks like you placing certain values into intervals--what are those intervals, and what is the starting value?
3. You've done some formatting (highlighting, deleting some values)--is that part of the macro as well?
If you can help us understand what you want, we can be a lot more helpful in guiding you.
Lastly: by and large, this forum will not write code for you. We'll certainly help solve specific problems, but nobody here will do your work for you. So take a stab at it, and then when you get stuck, post your specific problem and we'll help you out.
A great place to start is reading and writing cell values. To do that, just go like this:
'To write:
Dim lRow as Long
Dim lColumn as Long
Dim sNewValue as String
'Set the variables to the desired values here
CurrentSheet.Cells(lRow,lColumn) = sNewValue
'Now that cell has the value you assigned it
'To read:
Dim lRow as Long
Dim lColumn as Long
Dim sCurrentValue as String
'Set the variables to the desired values here
sCurrentValue = CurrentSheet.Cells(lRow,lColumn)
'now sCurrentValue holds the value of that cell
'You can reference another worksheet's cell like this:
sCurrentValue = Worksheets("Sheet1").CurrentSheet.Cells(lRow,lColumn)
Hopefully that will get you started. Good luck!
Dan