Fråga : Makro som väljer data

I den fäste Excel spara, Sheet1 innehåller data, och Sheet2 innehåller en lista av numrerar i kolonn A.  En makro är nödvändig att se varje numrerar i Sheet2 kolonn A och finner en match på Sheet1 kolonn A.  Om en match finnas, kopiera datan (som finnas på Sheet1) som förbinder till det, numrerar på till Sheet3. Attachments: för >
<-/div> filenamen " för class= för >Test.zip " fileSize " > (579 KB) " javascript för href= " för <-/span>Tesst <-/div>
för >
<-/div> " klar "

Svar : Makro som väljer data

Hi Rishi,

Försök efter makroen.


Låt mig veta, om du har några utfärdar,

- Ardhendu
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:

Explicit alternativ

UnderMacro4 ()

Dunkel ws1     som arbetssedeln, _,
    ws2     som arbetssedeln, _,
    ws3     som arbetssedeln, _,
    lst1    som heltalet, _,
    lst2    som heltal


Uppsättningen ws1 = täcker (”Sheet1”)
Uppsättningen ws2 = täcker (”Sheet2”)
Uppsättningen ws3 = täcker (”Sheet3”)

lst1 = ws1.Cells (65536, ”A”). Avsluta (xlUp). Ro
lst2 = ws2.Cells (65536, ”A”). Avsluta (xlUp). Ro

ws1.Range (”A1: Handling för F” & för lst1) .AdvancedFilter: =xlFilterCopy CriteriaRange: =ws2.Range (”A1: ” & lst2), _,
    CopyToRange: =ws3.Columns (”A: F”) som är unikt: =True
Avsluta suben
Andra lösningar  
 
programming4us programming4us