I want to show c.Value in the set Range elrepcol.
elrepcol remains blank.
How to show c.Value in the cell?
For Each c In ActiveSheet.Range(("D131"), _
Range("D131").Offset(, 40).End(xlToLeft)) _
.Cells
Set elrepcol = Range("AK1").End(xlToLeft).Offset(, 1)
elrepcol = c.Value