method of range of object _global failed - simple for each loop

Question

I am trying to write a simple for each loop that iterates through each cell in the column to check if it is an numeric value, and if it is, it copies the value from that cell an