Macro chaning
 

I currently use the following macro:
Selection.AutoFilter Field:=1, Criteria1:="<"

How can I change thus macro so that the "1"in field would be changed to the
cell that is selected.
(IE how do I capture the cell where the cursor is located when I run this
macro
In visual basic the code would be something like:
d$=celladdress
Field=d$
Thanks

Macro chaning
 

pcor wrote:
I currently use the following macro:
Selection.AutoFilter Field:=1, Criteria1:="<"

How can I change thus macro so that the "1"in field would be changed to the
cell that is selected.
(IE how do I capture the cell where the cursor is located when I run this
macro
In visual basic the code would be something like:
d$=celladdress
Field=d$
Thanks

Try:
Selection.AutoFilter Field:=Application.ActiveCell,Criteria1:="<"

Macro chaning
 

How about something like:

Option Explicit
Sub testme()

Dim myCol As Long

With ActiveSheet
If Intersect(.AutoFilter.Range, ActiveCell) Is Nothing Then
Beep
Exit Sub
End If
myCol = ActiveCell.Column - .AutoFilter.Range.Column + 1
.AutoFilter.Range.AutoFilter Field:=myCol, Criteria1:="<"
End With

End Sub



pcor wrote:

I currently use the following macro:
Selection.AutoFilter Field:=1, Criteria1:="<"

How can I change thus macro so that the "1"in field would be changed to the
cell that is selected.
(IE how do I capture the cell where the cursor is located when I run this
macro
In visual basic the code would be something like:
d$=celladdress
Field=d$
Thanks

--

Dave Peterson

Macro chaning
 

pcor

Selection.AutoFilter Field:=ActiveCell.Column, Criteria1:="<"


Gord Dibben MS Excel MVP

On Wed, 20 Sep 2006 14:34:02 -0700, pcor wrote:

I currently use the following macro:
Selection.AutoFilter Field:=1, Criteria1:="<"

How can I change thus macro so that the "1"in field would be changed to the
cell that is selected.
(IE how do I capture the cell where the cursor is located when I run this
macro
In visual basic the code would be something like:
d$=celladdress
Field=d$
Thanks

Macro chaning
 

My thanks to Mark, Dave and Gord for your efforts.
Much appreciated.

"pcor" wrote:

I currently use the following macro:
Selection.AutoFilter Field:=1, Criteria1:="<"

How can I change thus macro so that the "1"in field would be changed to the
cell that is selected.
(IE how do I capture the cell where the cursor is located when I run this
macro
In visual basic the code would be something like:
d$=celladdress
Field=d$
Thanks