Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Selecting Columns
On Feb 25, 6:38*am, "Mike Fogleman" wrote:
Sub test() Dim i As Long Dim numcolumn As Long numcolumn = Range("J2") 'Column AC is 18 columns from K For i = 18 To numcolumn Step -1 Columns("K:K").Offset(0, i).Delete Next End Sub Mike F "Simon Lloyd" wrote in message ... This should do what you need Dim i As Long Dim numcolumn As Long numcolumn = Range("J2") For i = numcolumn To 1 Step -1 Columns("K:K").Offset(0, i).Delete Next ;244984 Wrote: Hi all! I am trying to run a program which would allow me to do the following: I have a number that is put in Cell J2 by me or any other user. That number denotes the number of columns away from column K that I need to start deleting from; I will delete from there all the way up to column AC. So, fo rexample, I have the number 5 in cell J2. This would mean I need to start deleting from column P all the way to column AC. If the number is 3 in J2, then I would delete from column M to column AC. I don't know the method to select the columns based on the number. So far I have: NumColumn = Range("J2") Range("K2").Select ActiveCell.Offset(0,NumColumn) From this point on, I don't know how to select the column I'm in after the offset all the way to column AC. If someone can help with this, I would be forever grateful! Thanks in advance! -- Simon Lloyd Regards, Simon Lloyd 'The Code Cage' (http://www.thecodecage.com) ------------------------------------------------------------------------ Simon Lloyd's Profile: http://www.thecodecage.com/forumz/member.php?userid=1 View this thread:http://www.thecodecage.com/forumz/sh...d.php?t=68330- Hide quoted text - - Show quoted text - Thank you very much to everyone for their help. All the solutions have worked and I'm grateful for the assistance. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Selecting Columns | Excel Programming | |||
Selecting columns | Excel Programming | |||
Selecting Columns | Excel Programming | |||
Selecting columns | Excel Programming | |||
Selecting Columns | Excel Programming |