View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Bob Phillips[_6_] Bob Phillips[_6_] is offline
external usenet poster
 
Posts: 11,272
Default Macro to move selected cell contents to a specific column on same row

Ben,

Why do you need to reference column A. For instance, this macro will move
column B to C

Sub MoveToC()
With ActiveCell
.Cut Destination:=.Offset(0, 1)
End With
End Sub


This will move it to D

Sub MoveToD()
With ActiveCell
.Cut Destination:=.Offset(0, 2)
End With
End Sub

etc.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Ben Johnson" wrote in message
om...
Hello,

I am trying to write a macro to move data from one cell to a specific
column on the same row.

I have a data table like this:

A B C D E F
1 EMPLID Name Recommended Reserve Hover Not_Competetive
2 8163249 Bloggs
3 8894890 Jones
4 8293943 Smith


The order of names is important, and the EMPID needs to stay in column
A while the name needs to be able to be moved between columns
C,D,E,etc when you press an appropriate toolbar button.

eg.

A B C D E F
1 EMPLID Name Recommended Reserve Hover Not_Competetive
2 8163249 Bloggs
3 8894890 Jones
4 8293943 Smith


I need the flexibility of later on saying, "now I want Smith to move
to the Reserve column". I thought I could use the offset function to
select column A + 3 and past the data in there but I couldnt work out
how to make the offset always reference column A

Thanks,

Ben