: $$Excel-Macros$$ Re: EXTRACTING DATA BASE ON MATCHING VALUE
Have you tried my code ?
Kris
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please
Help, Urgent, Need Help, Formula Problem, Code Problem, and
or your help….
>
>
>
> Siraj
>
>
>
>
>
> *From:* excel-macros@googlegroups.com [mailto:
> excel-macros@googlegroups.com] *On Behalf Of *bpascal123
> *Sent:* Monday, April 23, 2012 5:56 PM
> *To:* excel-macros@googlegroups.com
> *Cc:* Pascal Baro
> *S
, 2012 5:56 PM
To: excel-macros@googlegroups.com
Cc: Pascal Baro
Subject: Re: $$Excel-Macros$$ Re: EXTRACTING DATA BASE ON MATCHING VALUE
Hi Siraj,
Insert : Set wb = ThisWorkbook between Sub Clear() and set ws
Pascal
On Monday, April 23, 2012 12:50:13 PM UTC+1, Siraj Momin (BTG) wrote
Hi Siraj,
Insert : Set wb = ThisWorkbook between Sub Clear() and set ws
Pascal
On Monday, April 23, 2012 12:50:13 PM UTC+1, Siraj Momin (BTG) wrote:
>
>
>
> Dear Pascal,
>
>
>
> Its giving an error, anyway I recorded the macro and I am using that, just
> for knowledge purpose if you can clear
Have you tried my code ?
Kris
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don
Hi Sirag, to clear row 8 to row 100, I advise you to create another
button so that you don't mix the cleaning part and the main process. Open
vba ide, in the same module where you have the previous code, write or
create a sub, like sub clearData and between "sub" and "end sub" enter
Set wsB = w
ros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Re: EXTRACTING DATA BASE ON MATCHING VALUE
Hi Siraj,
You mean row 8 or row 7. Row 7 would include row headers...
Before running the code, if you clear-content Report Index from row 8 to
anywhere, the code will place your data there. If you don
Hi
may be..
Sub kTest()
Dim k(), ka, i As Long, n As Long, c As Long, Cols
Dim MatchKeyAs String
ka = Sheets("PROGRESS
TRACKING-DATA").Range("a1").CurrentRegion.Resize(, 16)
Cols = Array(6, 7, 8, 5, 9, 12, 14, 15)
MatchKey = LCase$(Sheets("REPORT-INDEX").Range("
Hi Siraj,
You mean row 8 or row 7. Row 7 would include row headers...
Before running the code, if you clear-content Report Index from row 8 to
anywhere, the code will place your data there. If you don't clear it, it
will place it from bottom. You should tell if you want to clear the
previous data,
