Hi,
My excel setup is like below, with the autofilter working on hidden columns. After filtering, for example, Item has A, B and D left (with the filter on). I then need to type Yes or No in the next for columns for A, B & D. So I type "Yes" in the column 2 row 2 cell and hit Enter and I expect to have the cursor in column 3 row 2. However, the Cursor would automatically move back to column 1 row 1 cell. I will have to click colum 3 row 2 to continue typing Yes Or No.
How can I stop the cursor moving back to column 1 row 1 and make the Enter key work as usual without autofilter? I tried to turn off the autofilter after each filter, but the cursor still goes back to the original place.
My macro code is something like below:
Dim a as long, b as long,
a = 1
b = worksheets("sheet1").Cells(a,1).EntireRow.Find(what:=Range(H1).value, LookIn:=xlformula, .......,SearchDirection:=xlNext)
*middle part omitted
Worksheets("sheet1").Range("B1").AutoFilter _
field :=lnCol, _
Criteria1:="x", )
*The filter criteria columns are hidden.
[TABLE="width: 500"]
<tbody>[TR]
[TD]Item[/TD]
[TD]Yes/No[/TD]
[TD]Yes/No[/TD]
[TD]Yes/No[/TD]
[TD]Yes/No[/TD]
[/TR]
[TR]
[TD]A[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]B[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]
....
Really appreciate any insights!!
My excel setup is like below, with the autofilter working on hidden columns. After filtering, for example, Item has A, B and D left (with the filter on). I then need to type Yes or No in the next for columns for A, B & D. So I type "Yes" in the column 2 row 2 cell and hit Enter and I expect to have the cursor in column 3 row 2. However, the Cursor would automatically move back to column 1 row 1 cell. I will have to click colum 3 row 2 to continue typing Yes Or No.
How can I stop the cursor moving back to column 1 row 1 and make the Enter key work as usual without autofilter? I tried to turn off the autofilter after each filter, but the cursor still goes back to the original place.
My macro code is something like below:
Dim a as long, b as long,
a = 1
b = worksheets("sheet1").Cells(a,1).EntireRow.Find(what:=Range(H1).value, LookIn:=xlformula, .......,SearchDirection:=xlNext)
*middle part omitted
Worksheets("sheet1").Range("B1").AutoFilter _
field :=lnCol, _
Criteria1:="x", )
*The filter criteria columns are hidden.
[TABLE="width: 500"]
<tbody>[TR]
[TD]Item[/TD]
[TD]Yes/No[/TD]
[TD]Yes/No[/TD]
[TD]Yes/No[/TD]
[TD]Yes/No[/TD]
[/TR]
[TR]
[TD]A[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]B[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]
....
Really appreciate any insights!!