This is my 1st post on this excellent website. 
I hope you can help me out with a code I am trying to set up. Apologies in advance if this is a repeat but searching the website I dont think there is a similar case.

In a subroutine I determined that a user can select a column. I want it to be in a column format F:F (but the actual column is to be specified by user, so column F is an example). I came up with the following:

```
Dim rng As Range

On Error Resume Next

Set rng = Application.InputBox(Prompt:="Select the column", Title:="Selecting the column", Type:=8)

On Error GoTo 0

```

Next, I want the selected column to move to column Z. For this exercise we wrote the following:

```
Range("F2:F" & Cells(Rows.Count, "F").End(xlUp).Row).Copy Destination:=Range("Z2")

```

So I want the data which starts in the column the user selected to move to the column that we specified (currently it is column Z). The data starts from row 2 with row 1 being the header.

I tried to link the 2 above but am not sure how to proceed.

Your input is appreciated.