macro begrijpen?

[arjoderoon]

Ik heb een excel-bestand waarin macro's opgenomen zijn.
Met macro's ben ik niet erg bekend en ik probeer te begrijpen wat de macro doet.

Kan iemand mij hierbij helpen?, het gaat mij dan met name om het stukje 'union(range....)' (zie vetgedrukt in de code).

Ogen Macro
' De macro is opgenomen op 4-8-2010 door ....
'

'
    Range("A37:K37").Select
    Selection.ClearContents
    Sheets("Output").Select
    Cells.Select
    Selection.ClearContents
    Sheets("Toolkit").Select
    Range("A37:K37").Select
    ActiveCell.FormulaR1C1 = "Ogen"
    Range("A38").Select
    Sheets("Data ... apr 10").Select
   [B][SIZE="2"]Union(Range( _
        "410:423,425:435,437:454,456:471,473:552,554:554,556:559,561:594,596:599,601:610,612:622,624:648,650:685,687:688,690:703,705:738,740:785,787:789,791:826,828:842,844:848,850:870,872:977,980:992,994:1017,1019:1057,1059:1061,1063:1068,1071:1108,1110:1128" _
        ), Range( _
        "1153:1173,1175:1182,1184:1190,1192:1261,1263:1291,1294:1316,1318:1319,1321:1323,1325:1325,1327:1336,1338:1338,1340:1363,1365:1365,1367:1386,1388:1390,1392:1396,1398:1401,1403:1414,1416:1433,1435:1435,1437:1447,1449:1513,1515:1522,1524:1573,1575:1577" _
        ), Range( _
        "1840:1842,1844:1845,1847:1858,1860:1861,1863:1878,1880:1890,1892:1905,1907:1930,1932:1954,1956:1959,1961:1961,1963:2032,2034:2044,2046:2050,2052:2058,2060:2076,2078:2095,2098:2102,2104:2120,2122:2131,2133:2142,2144:2148,2150:2152,2155:2188,2190:2197" _
        ), Range( _
        "2310:2336,2338:2340,2342:2355,2357:2366,2368:2372,2374:2379,2381:2383,2385:2410,2412:2415,2417:2441,2443:2474,2476:2487,2489:2495,2497:2504,2506:2509,2511:2524,2526:2540,2542:2553,2555:2556,2558:2645,2647:2648,2650:2651,2653:2664,2666:2666,2668:2680" _
        ), Range( _
        "2784:2797,2799:2851,1:65536,10:10,12:19,21:25,27:27,30:70,72:74,76:77,79:88,90:92,94:94,96:97,99:132,134:136,138:145,147:166,168:191,193:221,223:225,227:245,247:275,277:282,284:285,287:288,290:298,300:309,311:323,325:340,342:345,348:367" _
        ), Range("369:401,403:408")).Select[/SIZE][/B]    Selection.Copy
    Sheets("Output").Select
    Range("A1").Select
    Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=False
    Columns("A:A").Select
    Application.CutCopyMode = False
    Selection.Delete Shift:=xlToLeft
    Columns("I:I").Select
    Selection.Delete Shift:=xlToLeft
    Columns("J:AI").Select
    Selection.Delete Shift:=xlToLeft
    Columns("K:Q").Select
    Selection.Delete Shift:=xlToLeft
    Columns("L:Q").Select
    Selection.Delete Shift:=xlToLeft
    Columns("A:K").Select
    Range("K1").Activate
    Columns("A:K").EntireColumn.AutoFit
    Selection.Sort Key1:=Range("K2"), Order1:=xlDescending, Header:=xlYes, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
    Range("A1:K1").Select
    Selection.AutoFilter
    Range("A1").Select
    Sheets("Toolkit").Select
    Range("A1:H4").Select
End Sub

 

[ExcelAmateur]

arjoderoon
macro begrijpen?

Kijk hier maar eens (onder aan de pagina)
Hier is ook nog wat er over.