Prev: Userform ComboBox Row Source
Next: Calling a sub on another worksheet
From: G on 27 May 2010 17:15
Lets say we have 5 columns (A,B,C,D,E). Normally, When you are in column A,

when you hit the Tab Key it goes to column B, then Column C. I like a way
to rearrange the order. For example if I am in Column A, and hit a tab, I
may want to go to Column D, and then Column E.

I hope that helps.


G


"JLGWhiz" wrote:

> Can you illustrate what you mean by column sequencing? Do you mean
> rearrange the column header designation or do you mean sort the data in the
> columns or do you mean move the data in the columns from one column to
> another? Examples help.
>
>
>
> "G" <G(a)discussions.microsoft.com> wrote in message
> news:4F721629-B91C-4DDC-B54C-D19A6239B7B9(a)microsoft.com...
> >I am currently using Excel 2003 and 2007 if necessary.
> >
> > I would like the ability to configure the excel sheet column sequencing
> > when
> > I hit the enter key or tab key. Is this possible?? Any suggestions???
> >
> >
> > Thank You,
> >
> > G
>
>
> .
>
From: GS on 27 May 2010 17:26
G explained on 5/27/2010 :
> Lets say we have 5 columns (A,B,C,D,E). Normally, When you are in column A,
>
> when you hit the Tab Key it goes to column B, then Column C. I like a way
> to rearrange the order. For example if I am in Column A, and hit a tab, I
> may want to go to Column D, and then Column E.
>
> I hope that helps.
>
>
> G
>
>
> "JLGWhiz" wrote:
>
>> Can you illustrate what you mean by column sequencing? Do you mean
>> rearrange the column header designation or do you mean sort the data in the
>> columns or do you mean move the data in the columns from one column to
>> another? Examples help.
>>
>>
>>
>> "G" <G(a)discussions.microsoft.com> wrote in message
>> news:4F721629-B91C-4DDC-B54C-D19A6239B7B9(a)microsoft.com...
>>> I am currently using Excel 2003 and 2007 if necessary.
>>>
>>> I would like the ability to configure the excel sheet column sequencing
>>> when
>>> I hit the enter key or tab key. Is this possible?? Any suggestions???
>>>
>>>
>>> Thank You,
>>>
>>> G
>>
>>
>> .
>>

My suggestion works when you leave edit mode in the cell, however that
happens. That means whether you use the Tab, Enter, or arrow keys it
selects whatever column a label has been entered in the first row. For
example, to have the active cell move to ColD from ColA, enter D in the
first row of ColA. Otherwise, tab behavior will behave normally if
nothing is entered in the first row of any column.

--
Garry

Free usenet access at http://www.eternal-september.org
ClassicVB Users Regroup! comp.lang.basic.visual.misc


From: OssieMac on 29 May 2010 07:19
Hakyab,

I've been away and hense did not get back to this sooner. However, I think
you are confusing Worksheet_SelectionChange with Worksheet_Change. The code I
posted only fires if an actual change is made to the data in the cell. I
included the following to clarify this "if you are actually entering and/or
changing data on the worksheet"

I tested the code before posting.

--
Regards,

OssieMac


"Hakyab" wrote:

> OssieMac, your code will surely render the workbook inoperable, as each
> select statement will trigger the change event, resulting in an infinite loop.
>
> May I offer a modification:
> > Private Sub Worksheet_Change(ByVal Target As Range)
> >
> > Dim strCol As String
> >>>>>> Static Recursed as Booelan
> >>>>>> if recursed then exit sub
> >>>>>> recursed = true
>
> > 'Assign the column Alpha Id to variable
> > strCol = Split(Columns(Target.Column) _
> > .Address(, 0), ":")(1)
> >
> > Select Case strCol
> > Case "A"
> > Cells(Target.Row, "D").Select
> >
> > Case "B"
> > Cells(Target.Row, "E").Select
> >
> > Case "C"
> > Cells(Target.Row, "K").Select
> >
> > Case "AB"
> > Cells(Target.Row, "AZ").Select
> >
> > End Select
> >>>>>> recursed = false
> > End Sub
> >
> Best,
>
First  |  Prev  | 
Pages: 1 2
Prev: Userform ComboBox Row Source
Next: Calling a sub on another worksheet