Data in A1:A20
B1
C40
any VB code???