Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 33
Default Reference to Columns

Hi , I am using the next line :

ActiveWorkbook.Worksheets("A").Columns((ConvertToL etter(inicol)) & ":" &
msConvertToLetter(endcol)).Select

Does exist some way for using only the Column Number ? I would prefer don´t
use the function ConvertToLetter.

Thank you in advance.
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 2,202
Default Reference to Columns

ActiveWorkbook.Worksheets("A").Columns((ConvertToL etter(inicol)) & ":" &
msConvertToLetter(endcol)).Select

Does exist some way for using only the Column Number ? I would prefer
don´t
use the function ConvertToLetter.


Well, you could always do what ConvertToLetter does directly in your code...

ActiveWorkbook.Worksheets("A").Columns(Chr(IniCol + 64) & ":" & Chr(EndCol +
64)).Select

Rick

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3,986
Default Reference to Columns

ActiveWorkbook.Worksheets("A").Columns((ConvertToL etter(inicol)) & ":" &
msConvertToLetter(endcol)).Select

You could do it this way:

ActiveWorkbook.Worksheets("A").Range(Cells(1, inicol), Cells(65536,
endcol).Select

"Angeles" wrote:

Hi , I am using the next line :

ActiveWorkbook.Worksheets("A").Columns((ConvertToL etter(inicol)) & ":" &
msConvertToLetter(endcol)).Select

Does exist some way for using only the Column Number ? I would prefer don´t
use the function ConvertToLetter.

Thank you in advance.

  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 2,202
Default Reference to Columns

ActiveWorkbook.Worksheets("A").Columns((ConvertToL etter(inicol)) & ":" &
msConvertToLetter(endcol)).Select

Does exist some way for using only the Column Number ? I would prefer
don´t
use the function ConvertToLetter.


Well, you could always do what ConvertToLetter does directly in your
code...

ActiveWorkbook.Worksheets("A").Columns(Chr(IniCol + 64) & ":" & Chr(EndCol
+ 64)).Select


I can't help feeling there is a more direct method that I am simply
overlooking; but, anyway, here is another way to do it...

ActiveWorkbook.Worksheets("A").Columns(IniCol).Res ize(Rows.Count, EndCol -
IniCol).Select

Rick

  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,092
Default Reference to Columns

Range(Columns(2), Columns(10)).Select

Mike F
"Angeles" wrote in message
...
Hi , I am using the next line :

ActiveWorkbook.Worksheets("A").Columns((ConvertToL etter(inicol)) & ":" &
msConvertToLetter(endcol)).Select

Does exist some way for using only the Column Number ? I would prefer
don´t
use the function ConvertToLetter.

Thank you in advance.





  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 2,202
Default Reference to Columns

ActiveWorkbook.Worksheets("A").Columns(IniCol).Res ize(Rows.Count, EndCol -
IniCol).Select


I forgot the +1...

ActiveWorkbook.Worksheets("Sheet1").Columns(IniCol ).Resize(Rows.Count,
EndCol - IniCol + 1).Select

Rick

  #7   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,092
Default Reference to Columns

Using your variables Dimmed As Long:

Range(Columns(inicol), Columns(endcol)).Select

Mike F
"Mike Fogleman" wrote in message
...
Range(Columns(2), Columns(10)).Select

Mike F
"Angeles" wrote in message
...
Hi , I am using the next line :

ActiveWorkbook.Worksheets("A").Columns((ConvertToL etter(inicol)) & ":" &
msConvertToLetter(endcol)).Select

Does exist some way for using only the Column Number ? I would prefer
don´t
use the function ConvertToLetter.

Thank you in advance.





  #8   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,092
Default Reference to Columns

See my responses Rick.

Mike Fogleman
"Rick Rothstein (MVP - VB)" wrote in
message ...
ActiveWorkbook.Worksheets("A").Columns((ConvertToL etter(inicol)) & ":" &
msConvertToLetter(endcol)).Select

Does exist some way for using only the Column Number ? I would prefer
don´t
use the function ConvertToLetter.


Well, you could always do what ConvertToLetter does directly in your
code...

ActiveWorkbook.Worksheets("A").Columns(Chr(IniCol + 64) & ":" &
Chr(EndCol + 64)).Select


I can't help feeling there is a more direct method that I am simply
overlooking; but, anyway, here is another way to do it...

ActiveWorkbook.Worksheets("A").Columns(IniCol).Res ize(Rows.Count, EndCol -
IniCol).Select

Rick



  #9   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 2,202
Default Reference to Columns

Thanks... see, I knew I was missing something obvious.

Rick

"Mike Fogleman" wrote in message
m...
See my responses Rick.

Mike Fogleman
"Rick Rothstein (MVP - VB)" wrote in
message ...
ActiveWorkbook.Worksheets("A").Columns((ConvertToL etter(inicol)) & ":"
&
msConvertToLetter(endcol)).Select

Does exist some way for using only the Column Number ? I would prefer
don´t
use the function ConvertToLetter.

Well, you could always do what ConvertToLetter does directly in your
code...

ActiveWorkbook.Worksheets("A").Columns(Chr(IniCol + 64) & ":" &
Chr(EndCol + 64)).Select


I can't help feeling there is a more direct method that I am simply
overlooking; but, anyway, here is another way to do it...

ActiveWorkbook.Worksheets("A").Columns(IniCol).Res ize(Rows.Count,
EndCol - IniCol).Select

Rick




Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Reference columns using For each r in currentregion RominallL Excel Programming 3 February 1st 07 12:05 AM
how do I sumif using 3 reference columns? tw5633 Excel Worksheet Functions 3 October 3rd 05 06:55 AM
how do I sum using 3 reference columns? tw5633 Excel Worksheet Functions 3 October 3rd 05 04:03 AM
How do I sum with 3 reference columns? tw5633 Excel Worksheet Functions 2 October 1st 05 09:37 AM
Using variables to reference columns in VBA aktiv Excel Programming 3 May 24th 04 04:46 AM


All times are GMT +1. The time now is 12:21 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"