Select all data in a column

[excelcraze]

Hello,

I use the following code to select all data in a column. In my example data available only in two cells (M8 and M9). When I used the following code it selects from M1 to M9.

Sometimes I may have one or many data.

 Range(Selection, Selection.End(xlDown)).Select
 Range(Selection, Selection.End(xlUp)).Select

Please help

I am using Win 7, Office 2013

 

[Rick Rothstein]

Hello,

I use the following code to select all data in a column. In my example data available only in two cells (M8 and M9). When I used the following code it selects from M1 to M9.

Sometimes I may have one or many data.

 Range(Selection, Selection.End(xlDown)).Select
 Range(Selection, Selection.End(xlUp)).Select

Please help

I am using Win 7, Office 2013

Instead of showing us code that doesn't work all by itself, why don't you tell us about the data setup (what you have AND what you could possibly have) in Column M. For example... Is M1 a header cell with text in it? Can M2 have data in it also? Will the starting selected cell always be M1? Can there be blank cells between the data in Column M and, if yes, do you want those blank cells selected along with the data cells or do you only want the non-contiguous data cells selected by themselves? Etc. Also you should know that it is very rare indeed that you need to select any cells in order to work with them and usually not selecting things beforehand makes the code easier to work with. To that end, in addition to telling us about the layout of your data, if you tell us what you are ultimately attempting to do with it (that is, what was to come next had the selections you indicated you attempted to make actually worked), then we can show you how to proceed.

 

[excelcraze]

Okay.
Here is what I want.

Data what I want to copy is always starts from M8. Number of data may vary (it can even be only one). These cells to be copied and paste in D8.

Thanks.

 

[Rick Rothstein]

Okay.
Here is what I want.

Data what I want to copy is always starts from M8. Number of data may vary (it can even be only one). These cells to be copied and paste in D8.

Does this single line of code do what you want?

Range("M8", Cells(Rows.count, "M").End(xlUp)).Copy Range("D8")

 

[excelcraze]

Fabulous.
I wanted to cut instead of copy. So I replaced Copy with Cut in your code.

Thanks.

Edit:

There are a couple of other question I posted today, can you please take a look at that?