How do I select the entire row of C after I find and select it? Thanks
Set C = .Find("Date", LookIn:=xlValues)
If C Is Nothing Then
MsgBox "Not Found!"
Else
C.Select
How do I select the entire row of C after I find and select it? Thanks
Set C = .Find("Date", LookIn:=xlValues)
If C Is Nothing Then
MsgBox "Not Found!"
Else
C.Select
C.Entirerow.Select
--
HTH...
Jim Thomlinson
"Kou Vang" wrote:
> How do I select the entire row of C after I find and select it? Thanks
>
> Set C = .Find("Date", LookIn:=xlValues)
> If C Is Nothing Then
> MsgBox "Not Found!"
> Else
> C.Select
>
>
>
I swear I tried that! But thanks again JIM!!! Once again, Access VBA is
frying my brains!
"Jim Thomlinson" wrote:
> C.Entirerow.Select
> --
> HTH...
>
> Jim Thomlinson
>
>
> "Kou Vang" wrote:
>
> > How do I select the entire row of C after I find and select it? Thanks
> >
> > Set C = .Find("Date", LookIn:=xlValues)
> > If C Is Nothing Then
> > MsgBox "Not Found!"
> > Else
> > C.Select
> >
> >
> >
One more thing, if I wanted to select everything above C, then would I use an
autofill to do this?
"Jim Thomlinson" wrote:
> C.Entirerow.Select
> --
> HTH...
>
> Jim Thomlinson
>
>
> "Kou Vang" wrote:
>
> > How do I select the entire row of C after I find and select it? Thanks
> >
> > Set C = .Find("Date", LookIn:=xlValues)
> > If C Is Nothing Then
> > MsgBox "Not Found!"
> > Else
> > C.Select
> >
> >
> >
Nope you don't need the autofill for that matter you do not need the select.
With ActiveSheet.Range("a1:a50")
Set C = .Find("Date", LookIn:=xlValues)
If C Is Nothing Then
MsgBox "Not Found!"
Else
activesheet.Range("A1", C).entirerow.delete
--
HTH...
Jim Thomlinson
"Kou Vang" wrote:
> One more thing, if I wanted to select everything above C, then would I use an
> autofill to do this?
>
> "Jim Thomlinson" wrote:
>
> > C.Entirerow.Select
> > --
> > HTH...
> >
> > Jim Thomlinson
> >
> >
> > "Kou Vang" wrote:
> >
> > > How do I select the entire row of C after I find and select it? Thanks
> > >
> > > Set C = .Find("Date", LookIn:=xlValues)
> > > If C Is Nothing Then
> > > MsgBox "Not Found!"
> > > Else
> > > C.Select
> > >
> > >
> > >
Kou Vang,
Use
C.EntireRow.Select
Regards
Ian
--
Work performed in the spirit of service is worship...Baha''''i Writings
"Kou Vang" wrote:
> How do I select the entire row of C after I find and select it? Thanks
>
> Set C = .Find("Date", LookIn:=xlValues)
> If C Is Nothing Then
> MsgBox "Not Found!"
> Else
> C.Select
>
>
>
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks