What is the coding to read data from spreadsheet and write into a new
column?
Depends on what you're trying to do. If you just want to copy the value
from one column to another it could be as simple as
Range("B1").Value = Range("A1").Value
You can read all the values from column A into column J using
Dim rCell As Range
For Each rCell In Range("A1:A" & Range("A" & _
Rows.Count).End(xlUp).Row)
.Offset(0, 9).Value = .Value
Next rCell
OTOH, it could be very much more complex - what do you want to
accomplish?