Last active
September 8, 2022 16:31
-
-
Save deyvicode/c428f2eae4dab83ef62127cc92cf987e to your computer and use it in GitHub Desktop.
CONSOLIDATORS
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Sub consolidate() | |
Dim Destiny As Workbook | |
Set Destiny = ThisWorkbook | |
Dim Data As Workbook | |
Dim Path As String | |
Dim mrs As Variant | |
mrs = Array( _ | |
"1 HUANUCO", _ | |
"2 AMARILIS", _ | |
"3 CHINCHAO", _ | |
"4 CHURUBAMBA", _ | |
"5 MARGOS", _ | |
"6 HUANCAPALLAC", _ | |
"7 SAN FRANCISCO DE CAYRAN", _ | |
"8 SAN PEDRO DE CHAULAN", _ | |
"9 SANTA MARIA DE VALLE", _ | |
"10 YARUMAYO", _ | |
"11 PILLCOMARCA", _ | |
"12 YACUS", _ | |
"13 SAN PABLO DE PILLAO" _ | |
) | |
Dim mr As Variant | |
Dim oFSO As Object | |
Dim oFolder As Object | |
Dim oFile As Object | |
Dim mainDirectory As String | |
Set oFSO = CreateObject("Scripting.FileSystemObject") | |
mainDirectory = GetFolderPath | |
Dim currentRow As Integer | |
Set firstCell = Application.InputBox(prompt:="Seleccione primera celda donde poner los datos:", Type:=8) | |
currentRow = firstCell.Row | |
For Each mr In mrs | |
Debug.Print mainDirectory & "\" & mr | |
Set oFolder = oFSO.GetFolder(mainDirectory & "\" & mr) | |
For Each oFile In oFolder.Files | |
Set Data = Workbooks.Open(oFile.Path) | |
Debug.Print "- " & currentRow & " " & oFile.Name | |
CopyValues Data, Destiny, currentRow | |
Data.Close savechanges:=False | |
currentRow = currentRow + 1 | |
Next oFile | |
currentRow = currentRow + 1 | |
Next mr | |
MsgBox "SE COMPLETO LA CONSOLIDACION DE DATOS" | |
End Sub | |
Sub CopyValues(Data, Destiny, DestinyInitRow) | |
Dim Selection As Range | |
Dim Cel As Range | |
Dim Counter As Integer | |
Dim originCells As Variant | |
originCells = Array( _ | |
"S12", "AC12", "AN12", "AZ12", "BM12", "BZ12", "S13", "AC13", "AN13", "AZ13", "BM13", "BZ13", "S14", "AC14", "AN14", "AZ14", "BM14", "BZ14", "S15", "AC15", "AN15", "AZ15", "BM15", "BZ15", "S16", "AC16", "AN16", "AZ16", "BM16", "BZ16", "S17", "AC17", "AN17", "AZ17", "BM17", "BZ17", "S18", "AC18", "AN18", "AZ18", "BM18", "BZ18", "S19", "AC19", "AN19", "AZ19", "BM19", "BZ19", _ | |
"S20", "AC20", "AN20", "AZ20", "BM20", "BZ20", "S21", "AC21", "AN21", "AZ21", "BM21", "BZ21", "S22", "AC22", "AN22", "AZ22", "BM22", "BZ22", "S23", "AC23", "AN23", "AZ23", "BM23", "BZ23", "S24", "AC24", "AN24", "AZ24", "BM24", "BZ24", "S25", "AC25", "AN25", "AZ25", "BM25", "BZ25", "S26", "AC26", "AN26", "AZ26", "BM26", "BZ26", "S27", "AC27", "AN27", "AZ27", "BM27", "BZ27", _ | |
"S32", "AC32", "AN32", "AZ32", "BM32", "BZ32", "S33", "AC33", "AN33", "AZ33", "BM33", "BZ33", "S39", "AC39", "AN39", "AZ39", "BM39", "BZ39", "S40", "AC40", "AN40", "AZ40", "BM40", "BZ40", "R44", "AB44", "AM44", "AY44", "BL44", "BY44", "R45", "AB45", "AM45", "AY45", "BL45", "BY45", "R46", "AB46", "AM46", "AY46", "BL46", "BY46", "Q52", "AA52", "AL52", "AX52", "BK52", "BX52", _ | |
"Q53", "AA53", "AL53", "AX53", "BK53", "BX53", "Q61", "AA61", "AL61", "AX61", "BK61", "BX61", "Q62", "AA62", "AL62", "AX62", "BK62", "BX62", "Q63", "AA63", "AL63", "AX63", "BK63", "BX63", "Q64", "AA64", "AL64", "AX64", "BK64", "BX64", "Q65", "AA65", "AL65", "AX65", "BK65", "BX65", "P72", "Z72", "AK72", "AW72", "BJ72", "BW72", "P73", "Z73", "AK73", "AW73", "BJ73", "BW73", _ | |
"P79", "Z79", "AK79", "AW79", "BJ79", "BW79", "P80", "Z80", "AK80", "AW80", "BJ80", "BW80", "P85", "Z85", "AK85", "AW85", "BJ85", "BW85", "P86", "Z86", "AK86", "AW86", "BJ86", "BW86", "BC91", "BO91", "CB91", "CQ91", "CZ91", "DC91", "BC92", "BO92", "CB92", "CQ92", "CZ92", "DC92", "BC93", "BO93", "CB93", "CQ93", "CZ93", "DC93", "BC94", "BO94", "CB94", "CQ94", "CZ94", "DC94", _ | |
"BC95", "BO95", "CB95", "CQ95", "CZ95", "DC95", "BC96", "BO96", "CB96", "CQ96", "CZ96", "DC96", "S102", "AC102", "AN102", "AZ102", "BM102", "BZ102", "S103", "AC103", "AN103", "AZ103", "BM103", "BZ103", "S104", "AC104", "AN104", "AZ104", "BM104", "BZ104", "S105", "AC105", "AN105", "AZ105", "BM105", "BZ105", "O110", "Y110", "O111", "Y111", "O112", "Y112", "O113", "Y113", "O114", "Y114", "O115", "Y115", _ | |
"T122", "AE122", "AO122", "BB122", "BN122", "CA122", "T123", "AE123", "AO123", "BB123", "BN123", "CA123", "T124", "AE124", "AO124", "BB124", "BN124", "CA124", "T125", "AE125", "AO125", "BB125", "BN125", "CA125", "T126", "AE126", "AO126", "BB126", "BN126", "CA126", "T127", "AE127", "AO127", "BB127", "BN127", "CA127", "T128", "AE128", "AO128", "BB128", "BN128", "CA128", "T129", "AE129", "AO129", "BB129", "BN129", "CA129", _ | |
"T130", "AE130", "AO130", "BB130", "BN130", "CA130", "T131", "AE131", "AO131", "BB131", "BN131", "CA131", "U138", "AF138", "AQ138", "BD138", "BP138", "CC138", "U139", "AF139", "AQ139", "BD139", "BP139", "CC139", "U140", "AF140", "AQ140", "BD140", "BP140", "CC140", "U141", "AF141", "AQ141", "BD141", "BP141", "CC141", "BI147", "BU147", "CH147", "CY147", "DB147", "DE147", "BI148", "BU148", "CH148", "CY148", "DB148", "DE148", _ | |
"BI149", "BU149", "CH149", "CY149", "DB149", "DE149", "BI150", "BU150", "CH150", "CY150", "DB150", "DE150", "BI151", "BU151", "CH151", "CY151", "DB151", "DE151", "BI152", "BU152", "CH152", "CY152", "DB152", "DE152", "BI153", "BU153", "CH153", "CY153", "DB153", "DE153", "BI154", "BU154", "CH154", "CY154", "DB154", "DE154", "BH160", "BT160", "CG160", "CX160", "DA160", "DD160", "BH161", "BT161", "CG161", "CX161", "DA161", "DD161", _ | |
"BH162", "BT162", "CG162", "CX162", "DA162", "DD162", "BH163", "BT163", "CG163", "CX163", "DA163", "DD163", "BH164", "BT164", "CG164", "CX164", "DA164", "DD164", "BH165", "BT165", "CG165", "CX165", "DA165", "DD165", "BH166", "BT166", "CG166", "CX166", "DA166", "DD166", "BH167", "BT167", "CG167", "CX167", "DA167", "DD167", "X173", "AJ173", "AT173", "BG173", "BS173", "CF173", "X174", "AJ174", "AT174", "BG174", "BS174", "CF174", _ | |
"X175", "AJ175", "AT175", "BG175", "BS175", "CF175", "X176", "AJ176", "AT176", "BG176", "BS176", "CF176", "X181", "AJ181", "AT181", "BG181", "BS181", "CF181", "X183", "AJ183", "AT183", "BG183", "BS183", "CF183", "X185", "AJ185", "AT185", "BG185", "BS185", "CF185", "V196", "AH196", "AR196", "BE196", "BQ196", "CD196", "V197", "AH197", "AR197", "BE197", "BQ197", "CD197", "V203", "AH203", "AR203", "BE203", "BQ203", "CD203", _ | |
"W209", "AI209", "AS209", "BF209", "BR209", "CE209", "W210", "AI210", "AS210", "BF210", "BR210", "CE210", "V216", "AH216", "AR216", "BE216", "BQ216", "CD216", "V217", "AH217", "AR217", "BE217", "BQ217", "CD217", _ | |
"V221", "AH221", "AR221", "BE221", "BQ221", "CD221" _ | |
) | |
Set Selection = Destiny.Sheets(1).Range("D" & DestinyInitRow & ":UM" & DestinyInitRow) | |
For Each Cel In Selection.Cells | |
Cel.Value = Data.Sheets(1).Range(originCells(Counter)) | |
If Len(Cel.Value) < 1 Then | |
Cel.Value = 0 | |
End If | |
Counter = Counter + 1 | |
Next Cel | |
End Sub | |
Function GetFolderPath() As String | |
Dim fldr As FileDialog | |
Dim sItem As String | |
Set fldr = Application.FileDialog(msoFileDialogFolderPicker) | |
With fldr | |
.Title = "SELECCIONA LA CARPETA DE DATOS PARA DANIOS NO TRANSMISIBLES" | |
.AllowMultiSelect = False | |
.InitialFileName = Application.DefaultFilePath | |
If .Show <> -1 Then GoTo NextCode | |
sItem = .SelectedItems(1) | |
End With | |
NextCode: | |
GetFolderPath = sItem | |
Set fldr = Nothing | |
End Function |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Sub consolidate() | |
Dim Destiny As Workbook | |
Set Destiny = ThisWorkbook | |
Dim Data As Workbook | |
Dim Path As String | |
Dim mrs As Variant | |
mrs = Array( _ | |
"1 HUANUCO", _ | |
"2 AMARILIS", _ | |
"3 CHINCHAO", _ | |
"4 CHURUBAMBA", _ | |
"5 MARGOS", _ | |
"6 HUANCAPALLAC", _ | |
"7 SAN FRANCISCO DE CAYRAN", _ | |
"8 SAN PEDRO DE CHAULAN", _ | |
"9 SANTA MARIA DE VALLE", _ | |
"10 YARUMAYO", _ | |
"11 PILLCOMARCA", _ | |
"12 YACUS", _ | |
"13 SAN PABLO DE PILLAO" _ | |
) | |
Dim mr As Variant | |
Dim oFSO As Object | |
Dim oFolder As Object | |
Dim oFile As Object | |
Dim mainDirectory As String | |
Set oFSO = CreateObject("Scripting.FileSystemObject") | |
mainDirectory = GetFolderPath | |
Dim currentRow As Integer | |
Set firstCell = Application.InputBox(prompt:="Seleccione primera celda donde poner los datos:", Type:=8) | |
currentRow = firstCell.Row | |
For Each mr In mrs | |
Debug.Print mainDirectory & "\" & mr | |
Set oFolder = oFSO.GetFolder(mainDirectory & "\" & mr) | |
For Each oFile In oFolder.Files | |
Set Data = Workbooks.Open(oFile.Path) | |
Debug.Print "- " & currentRow & " " & oFile.Name | |
CopyValues Data, Destiny, currentRow | |
Data.Close savechanges:=False | |
currentRow = currentRow + 1 | |
Next oFile | |
currentRow = currentRow + 1 | |
Next mr | |
MsgBox "SE COMPLETO LA CONSOLIDACION DE DATOS" | |
End Sub | |
Sub CopyValues(Data, Destiny, DestinyInitRow) | |
Dim Selection As Range | |
Dim Cel As Range | |
Dim Counter As Integer | |
Dim originCells As Variant | |
originCells = Array( _ | |
"CE17", "FB17", "IL17", "LX17", "OU17", "RP17", "TE17", "UU17", _ | |
"CE18", "FB18", "IL18", "LX18", "OU18", "RP18", "TE18", "UU18", _ | |
"CE24", "FB24", "IL24", "LX24", _ | |
"CE25", "FB25", "IL25", "LX25", _ | |
"CE31", "FB31", "IL31", "LX31", "OU31", "RP31", "TE31", "UU31", "WS31", "XT31", "YU31", "ZN31", _ | |
"CE32", "FB32", "IL32", "LX32", "OU32", "RP32", "TE32", "UU32", "WS32", "XT32", "YU32", "ZN32", _ | |
"DM41", "GP41", "KC41", "NM41", "QF41", "SI41", "UC41", "VY41", "XH41", "YE41", "ZC41", "ZW41", "AAQ41", "ABC41", "ABG41", "ABI41", "ABK41", "ABM41", "ABO41", _ | |
"DM42", "GP42", "KC42", "NM42", "QF42", "SI42", "UC42", "VY42", "XH42", "YE42", "ZC42", "ZW42", "AAQ42", "ABC42", "ABG42", "ABI42", "ABK42", "ABM42", "ABO42", _ | |
"DM43", "GP43", "KC43", "NM43", "QF43", "SI43", "UC43", "VY43", "XH43", "YE43", "ZC43", "ZW43", "AAQ43", "ABC43", "ABG43", "ABI43", "ABK43", "ABM43", "ABO43", _ | |
"DM44", "GP44", "KC44", "NM44", "QF44", "SI44", "UC44", "VY44", "XH44", "YE44", "ZC44", "ZW44", "AAQ44", "ABC44", "ABG44", "ABI44", "ABK44", "ABM44", "ABO44", _ | |
"DM45", "GP45", "KC45", "NM45", "QF45", "SI45", "UC45", "VY45", "XH45", "YE45", "ZC45", "ZW45", "AAQ45", "ABC45", "ABG45", "ABI45", "ABK45", "ABM45", "ABO45", _ | |
"DM46", "GP46", "KC46", "NM46", "QF46", "SI46", "UC46", "VY46", "XH46", "YE46", "ZC46", "ZW46", "AAQ46", "ABC46", "ABG46", "ABI46", "ABK46", "ABM46", "ABO46", _ | |
"DM47", "GP47", "KC47", "NM47", "QF47", "SI47", "UC47", "VY47", "XH47", "YE47", "ZC47", "ZW47", "AAQ47", "ABC47", "ABG47", "ABI47", "ABK47", "ABM47", "ABO47", _ | |
"DM48", "GP48", "KC48", "NM48", "QF48", "SI48", "UC48", "VY48", "XH48", "YE48", "ZC48", "ZW48", "AAQ48", "ABC48", "ABG48", "ABI48", "ABK48", "ABM48", "ABO48", _ | |
"DM49", "GP49", "KC49", "NM49", "QF49", "SI49", "UC49", "VY49", "XH49", "YE49", "ZC49", "ZW49", "AAQ49", "ABC49", "ABG49", "ABI49", "ABK49", "ABM49", "ABO49", _ | |
"DM50", "GP50", "KC50", "NM50", "QF50", "SI50", "UC50", "VY50", "XH50", "YE50", "ZC50", "ZW50", "AAQ50", "ABC50", "ABG50", "ABI50", "ABK50", "ABM50", "ABO50", _ | |
"DM51", "GP51", "KC51", "NM51", "QF51", "SI51", "UC51", "VY51", "XH51", "YE51", "ZC51", "ZW51", "AAQ51", "ABC51", "ABG51", "ABI51", "ABK51", "ABM51", "ABO51", _ | |
"DM52", "GP52", "KC52", "NM52", "QF52", "SI52", "UC52", "VY52", "XH52", "YE52", "ZC52", "ZW52", "AAQ52", "ABC52", "ABG52", "ABI52", "ABK52", "ABM52", "ABO52", _ | |
"DM53", "GP53", "KC53", "NM53", "QF53", "SI53", "UC53", "VY53", "XH53", "YE53", "ZC53", "ZW53", "AAQ53", "ABC53", "ABG53", "ABI53", "ABK53", "ABM53", "ABO53", _ | |
"DM54", "GP54", "KC54", "NM54", "QF54", "SI54", "UC54", "VY54", "XH54", "YE54", "ZC54", "ZW54", "AAQ54", "ABC54", "ABG54", "ABI54", "ABK54", "ABM54", "ABO54", _ | |
"DM55", "GP55", "KC55", "NM55", "QF55", "SI55", "UC55", "VY55", "XH55", "YE55", "ZC55", "ZW55", "AAQ55", "ABC55", "ABG55", "ABI55", "ABK55", "ABM55", "ABO55", _ | |
"DM60", "FB60", _ | |
"DM61", "FB61", _ | |
"CE65", "FD65", "ID65", "LQ65", _ | |
"CE66", "FD66", "ID66", "LQ66", _ | |
"CE67", "FD67", "ID67", "LQ67", _ | |
"CE68", "FD68", "ID68", "LQ68", _ | |
"CE72", "FD72", "ID72", "LQ72", _ | |
"CE73", "FD73", "ID73", "LQ73", _ | |
"CE77", "FD77", "ID77", "LQ77", _ | |
"CE78", "FD78", "ID78", "LQ78", _ | |
"CE79", "FD79", "ID79", "LQ79", _ | |
"CE80", "FD80", "ID80", "LQ80", _ | |
"CE83", "FD83", _ | |
"CE84", "FD84", _ | |
"IB89", "LR89", _ | |
"IB90", "LR90", _ | |
"IB91", "LR91", _ | |
"IB92", "LR92", _ | |
"FD95", "IM95", _ | |
"FD96", "IM96", _ | |
"FD97", "IM97", _ | |
"FD98", "IM98", _ | |
"FD101", "IM101", _ | |
"FD102", "IM102", _ | |
"FD103", "IM103", _ | |
"CE108", "DV108", _ | |
"FB112", "IZ112", "LL112", "OV112", "QS112", "SZ112", "UK112", "WI112", _ | |
"FB115", "JK115", _ | |
"FB116", "JK116", _ | |
"DM119", "FV119", "IG119", _ | |
"T123", "AZ123", "DA123", "FC123", _ | |
"HC128", "JM128", _ | |
"HC129", "JM129", _ | |
"DM132", "GQ132", _ | |
"DM133", "GQ133", _ | |
"DM134", "GQ134", _ | |
) | |
Set Selection = Destiny.Sheets(1).Range("D" & DestinyInitRow & ":FEL" & DestinyInitRow) | |
For Each Cel In Selection.Cells | |
Cel.Value = Data.Sheets(1).Range(originCells(Counter)) | |
If Len(Cel.Value) < 1 Then | |
Cel.Value = 0 | |
End If | |
Counter = Counter + 1 | |
Next Cel | |
End Sub | |
Function GetFolderPath() As String | |
Dim fldr As FileDialog | |
Dim sItem As String | |
Set fldr = Application.FileDialog(msoFileDialogFolderPicker) | |
With fldr | |
.Title = "SELECCIONA LA CARPETA DE DATOS PARA SALUD FAMILIAR" | |
.AllowMultiSelect = False | |
.InitialFileName = Application.DefaultFilePath | |
If .Show <> -1 Then GoTo NextCode | |
sItem = .SelectedItems(1) | |
End With | |
NextCode: | |
GetFolderPath = sItem | |
Set fldr = Nothing | |
End Function | |
"CE17", "FB17", "IL17", "LX17", "OU17", "RP17", "TE17", "UU17", "CE18", "FB18", "IL18", "LX18", "OU18", "RP18", "TE18", "UU18", "CE24", "FB24", "IL24", "LX24", "CE25", "FB25", "IL25", "LX25", "CE31", "FB31", "IL31", "LX31", "OU31", "RP31", "TE31", "UU31", "WS31", "XT31", "YU31", "ZN31", "CE32", "FB32", "IL32", "LX32", | |
"OU32", "RP32", "TE32", "UU32", "WS32", "XT32", "YU32", "ZN32", | |
"DM41", "GP41", "KC41", "NM41", "QF41", "SI41", "UC41", "VY41", "XH41", "YE41", "ZC41", "ZW41", "AAQ41", "ABC41", "ABG41", "ABI41", "ABK41", "ABM41", "ABO41", | |
"DM42", "GP42", "KC42", "NM42", "QF42", "SI42", "UC42", "VY42", "XH42", "YE42", "ZC42", "ZW42", "AAQ42", "ABC42", "ABG42", "ABI42", "ABK42", "ABM42", "ABO42", | |
"DM43", "GP43", "KC43", "NM43", "QF43", "SI43", "UC43", "VY43", "XH43", "YE43", "ZC43", "ZW43", "AAQ43", "ABC43", "ABG43", "ABI43", "ABK43", "ABM43", "ABO43", | |
"DM44", "GP44", "KC44", "NM44", "QF44", "SI44", "UC44", "VY44", "XH44", "YE44", "ZC44", "ZW44", "AAQ44", "ABC44", "ABG44", "ABI44", "ABK44", "ABM44", "ABO44", | |
"DM45", "GP45", "KC45", "NM45", "QF45", "SI45", "UC45", "VY45", "XH45", "YE45", "ZC45", "ZW45", "AAQ45", "ABC45", "ABG45", "ABI45", "ABK45", "ABM45", "ABO45", | |
"DM46", "GP46", "KC46", "NM46", "QF46", "SI46", "UC46", "VY46", "XH46", "YE46", "ZC46", "ZW46", "AAQ46", "ABC46", "ABG46", "ABI46", "ABK46", "ABM46", "ABO46", | |
"DM47", "GP47", "KC47", "NM47", "QF47", "SI47", "UC47", "VY47", "XH47", "YE47", "ZC47", "ZW47", "AAQ47", "ABC47", "ABG47", "ABI47", "ABK47", "ABM47", "ABO47", | |
"DM48", "GP48", "KC48", "NM48", "QF48", "SI48", "UC48", "VY48", "XH48", "YE48", "ZC48", "ZW48", "AAQ48", "ABC48", "ABG48", "ABI48", "ABK48", "ABM48", "ABO48", | |
"DM49", "GP49", "KC49", "NM49", "QF49", "SI49", "UC49", "VY49", "XH49", "YE49", "ZC49", "ZW49", "AAQ49", "ABC49", "ABG49", "ABI49", "ABK49", "ABM49", "ABO49", | |
"DM50", "GP50", "KC50", "NM50", "QF50", "SI50", "UC50", "VY50", "XH50", "YE50", "ZC50", "ZW50", "AAQ50", "ABC50", "ABG50", "ABI50", "ABK50", "ABM50", "ABO50", | |
"DM51", "GP51", "KC51", "NM51", "QF51", "SI51", "UC51", "VY51", "XH51", "YE51", "ZC51", "ZW51", "AAQ51", "ABC51", "ABG51", "ABI51", "ABK51", "ABM51", "ABO51", | |
"DM52", "GP52", "KC52", "NM52", "QF52", "SI52", "UC52", "VY52", "XH52", "YE52", "ZC52", "ZW52", "AAQ52", "ABC52", "ABG52", "ABI52", "ABK52", "ABM52", "ABO52", | |
"DM53", "GP53", "KC53", "NM53", "QF53", "SI53", "UC53", "VY53", "XH53", "YE53", "ZC53", "ZW53", "AAQ53", "ABC53", "ABG53", "ABI53", "ABK53", "ABM53", "ABO53", | |
"DM54", "GP54", "KC54", "NM54", "QF54", "SI54", "UC54", "VY54", "XH54", "YE54", "ZC54", "ZW54", "AAQ54", "ABC54", "ABG54", "ABI54", "ABK54", "ABM54", "ABO54", | |
"DM55", "GP55", "KC55", "NM55", "QF55", "SI55", "UC55", "VY55", "XH55", "YE55", "ZC55", "ZW55", "AAQ55", "ABC55", "ABG55", "ABI55", "ABK55", "ABM55", "ABO55", | |
"DM60", "FB60", "DM61", "FB61", | |
"CE65", "FD65", "ID65", "LQ65", | |
"CE66", "FD66", "ID66", "LQ66", | |
"CE67", "FD67", "ID67", "LQ67", | |
"CE68", "FD68", "ID68", "LQ68", | |
"CE72", "FD72", "ID72", "LQ72", | |
"CE73", "FD73", "ID73", "LQ73", | |
"CE77", "FD77", "ID77", "LQ77", | |
"CE78", "FD78", "ID78", "LQ78", | |
"CE79", "FD79", "ID79", "LQ79", | |
"CE80", "FD80", "ID80", "LQ80", | |
"CE83", "FD83", "CE84", "FD84", | |
"IB89", "LR89", "IB90", "L90", | |
"IB91", "L91", "IB92", "L92", | |
"FD95", "IM95", "FD96", "IM96", | |
"FD97", "IM97", "FD98", "IM98", | |
"FD101", "IM101", "FD102", "IM102", | |
"FD103", "IM103", "CE108", "DV108", | |
"FB112", "IZ112", "LL112", "OV112", "QS112", "SZ112", "UK112", "WI112", | |
"FB115", "JK115", "FB116", "JK116", | |
"DM119", "FV119", "IG119", | |
"T123", "AZ123", "DA123", "FC123", | |
"HC128", "JM128", "HC129", "JM129", | |
"DM132", "GQ132", "DM133", "GQ133", | |
"DM134", "GQ134", "FX141", "IH141", | |
"IK146", "LD146", | |
"FW154", "IZ154", "MG154", "OY154", "RO154", "TD154", "UQ154", "WM154", "XO154", "YM154", "ZH154", | |
"FW155", "IZ155", "MG155", "OY155", "RO155", "TD155", "UQ155", "WM155", "XO155", "YM155", "ZH155", | |
"FX158", "JA158", "FX159", "JA159", | |
"FX160", "JA160", "JB165", "MJ165", | |
"JB166", "MJ166", | |
"FX172", "JD172", "LV172", "OS172", "RA172", "SX172", | |
"FX176", "JD176", "FX181", "IO181", | |
"FX184", "JD184", "LE184", "OH184", "QE184", "SG184", | |
"JC190", "LT190", "FX194", "A206", "T206", "AZ206", | |
"A212", | |
"T212", | |
"AZ212", | |
"A219", | |
"A224", | |
"DW230", | |
"GD230", | |
"IQ230", | |
"KO230", | |
"NC230", | |
"PA230", | |
"DW231", | |
"GD231", | |
"IQ231", | |
"KO231", | |
"NC231", | |
"PA231", | |
"DW232", | |
"GD232", | |
"IQ232", | |
"KO232", | |
"NC232", | |
"PA232", | |
"DW233", | |
"GD233", | |
"IQ233", | |
"KO233", | |
"NC233", | |
"PA233", | |
"DW234", | |
"GD234", | |
"IQ234", | |
"KO234", | |
"NC234", | |
"PA234", | |
"DW235", | |
"GD235", | |
"IQ235", | |
"KO235", | |
"NC235", | |
"PA235", | |
"DW236", | |
"GD236", | |
"IQ236", | |
"KO236", | |
"NC236", | |
"PA236", | |
"DW237", | |
"GD237", | |
"IQ237", | |
"KO237", | |
"NC237", | |
"PA237", | |
"A242", | |
"T242", | |
"DW247", | |
"GD247", | |
"DW248", | |
"GD248", | |
"DW249", | |
"GD249", | |
"DW250", | |
"GD250", | |
"DW251", | |
"GD251", | |
"DW252", | |
"GD252", | |
"DW253", | |
"GD253", | |
"T261", | |
"AZ261", | |
"T267", | |
"AZ267", | |
"DW273", | |
"GD273", | |
"IQ273", | |
"KO273", | |
"DW274", | |
"GD274", | |
"IQ274", | |
"KO274", | |
"DW275", | |
"GD275", | |
"IQ275", | |
"KO275", | |
"DW276", | |
"GD276", | |
"IQ276", | |
"KO276", | |
"DW277", | |
"GD277", | |
"IQ277", | |
"KO277", | |
"DW278", | |
"GD278", | |
"IQ278", | |
"KO278", | |
"DW279", | |
"GD279", | |
"IQ279", | |
"KO279", | |
"DW285", | |
"GD285", | |
"IQ285", | |
"KO285", | |
"DW286", | |
"GD286", | |
"IQ286", | |
"KO286", | |
"DW287", | |
"GD287", | |
"IQ287", | |
"KO287", | |
"DW288", | |
"GD288", | |
"IQ288", | |
"KO288", | |
"DW289", | |
"GD289", | |
"IQ289", | |
"KO289", | |
"DW290", | |
"GD290", | |
"IQ290", | |
"KO290", | |
"DW291", | |
"GD291", | |
"IQ291", | |
"KO291", | |
"DW299", | |
"GD299", | |
"IQ299", | |
"KO299", | |
"NC299", | |
"PA299", | |
"QU299", | |
"SD299", | |
"DW300", | |
"GD300", | |
"IQ300", | |
"KO300", | |
"NC300", | |
"PA300", | |
"QU300", | |
"SD300", | |
"DW301", | |
"GD301", | |
"IQ301", | |
"KO301", | |
"NC301", | |
"PA301", | |
"QU301", | |
"SD301", | |
"DW306", | |
"GD306", | |
"IQ306", | |
"DW307", | |
"GD307", | |
"IQ307", | |
"DW308", | |
"GD308", | |
"IQ308", | |
"DW313", | |
"GD313", | |
"DW314", | |
"GD314", | |
"DW315", | |
"GD315", | |
"DW322", | |
"GD322", | |
"IQ322", | |
"DW323", | |
"GD323", | |
"IQ323", | |
"DW324", | |
"GD324", | |
"IQ324", | |
"A337", | |
"BQ337", | |
"GK337", | |
"A345", | |
"BQ345", | |
"GK345", | |
"T353", | |
"AZ353", | |
"CN353", | |
"EO353", | |
"T354", | |
"AZ354", | |
"CN354", | |
"EO354", | |
"A364", | |
"T364", | |
"AZ364", | |
"CN364", | |
"A370", | |
"T370", | |
"AZ370", | |
"CN370", | |
"AP380", | |
"CD380", | |
"DU380", | |
"GA380", | |
"AP386", | |
"CD386", | |
"DU386", | |
"GA386", | |
"AP393", | |
"CD393", | |
"DU393", | |
"GA393", | |
"IJ393", | |
"KN393", | |
"MW393", | |
"OX393", | |
"AP394", | |
"CD394", | |
"DU394", | |
"GA394", | |
"IJ394", | |
"KN394", | |
"MW394", | |
"OX394", | |
"A401", | |
"T401", | |
"AZ401", | |
"CN401", | |
"EO401", | |
"GP401", | |
"JF401", | |
"LI401", | |
"DD409", | |
"FE409", | |
"HI409", | |
"JR409", | |
"DD410", | |
"FE410", | |
"HI410", | |
"JR410", | |
"DD411", | |
"FE411", | |
"HI411", | |
"JR411", | |
"BQ420", | |
"DI420", | |
"FO420", | |
"HP420", | |
"KA420", | |
"MM420", | |
"OK420", | |
"QG420", | |
"BQ421", | |
"DI421", | |
"FO421", | |
"HP421", | |
"KA421", | |
"MM421", | |
"OK421", | |
"QG421", | |
"BQ428", | |
"DI428", | |
"FO428", | |
"HP428", | |
"KA428", | |
"MM428", | |
"OK428", | |
"QG428", | |
"BQ429", | |
"DI429", | |
"FO429", | |
"HP429", | |
"KA429", | |
"MM429", | |
"OK429", | |
"QG429", | |
"BQ437", | |
"DI437", | |
"FO437", | |
"HP437", | |
"BQ438", | |
"DI438", | |
"FO438", | |
"HP438", | |
"BQ444", | |
"DI444", | |
"FO444", | |
"HP444", | |
"BQ445", | |
"DI445", | |
"FO445", | |
"HP445", | |
"AP453", | |
"CD453", | |
"DU453", | |
"GA453", | |
"AP459", | |
"CD459", | |
"DU459", | |
"GA459", | |
"BL467", | |
"DE467", | |
"FK467", | |
"HK467", | |
"BL468", | |
"DE468", | |
"FK468", | |
"HK468", | |
"BL469", | |
"DE469", | |
"FK469", | |
"HK469", | |
"BL475", | |
"DE475", | |
"FK475", | |
"HK475", | |
"BL476", | |
"DE476", | |
"FK476", | |
"HK476", | |
"BL477", | |
"DE477", | |
"FK477", | |
"HK477", | |
"AP485", | |
"CD485", | |
"DU485", | |
"GA485", | |
"AP486", | |
"CD486", | |
"DU486", | |
"GA486", | |
"AP493", | |
"CD493", | |
"DU493", | |
"GA493", | |
"IJ493", | |
"KN493", | |
"MW493", | |
"OX493", | |
"AV504", | |
"CJ504", | |
"EC504", | |
"GI504", | |
"IX504", | |
"KW504", | |
"NJ504", | |
"PK504", | |
"QZ504", | |
"AV505", | |
"CJ505", | |
"EC505", | |
"GI505", | |
"IX505", | |
"KW505", | |
"NJ505", | |
"PK505", | |
"QZ505", | |
"AV506", | |
"CJ506", | |
"EC506", | |
"GI506", | |
"IX506", | |
"KW506", | |
"NJ506", | |
"PK506", | |
"QZ506", | |
"AV507", | |
"CJ507", | |
"EC507", | |
"GI507", | |
"IX507", | |
"KW507", | |
"NJ507", | |
"PK507", | |
"QZ507", | |
"AW513", | |
"CK513", | |
"ED513", | |
"GJ513", | |
"IY513", | |
"KX513", | |
"AW514", | |
"CK514", | |
"ED514", | |
"GJ514", | |
"IY514", | |
"KX514", | |
"AW515", | |
"CK515", | |
"ED515", | |
"GJ515", | |
"IY515", | |
"KX515", | |
"AW516", | |
"CK516", | |
"ED516", | |
"GJ516", | |
"IY516", | |
"KX516", | |
"E526", | |
"V526", | |
"BB526", | |
"ER526", | |
"ER526", | |
"GS526", | |
"JH526", | |
"LK526", | |
"NR526", | |
"C530", | |
"U530", | |
"BA530", | |
"CO530", | |
"EP530", | |
"GR530", | |
"C536", | |
"U536", | |
"BH536", | |
"CY536", | |
"FN536", | |
"HW536", | |
"KK536", | |
"NA536", | |
"PO536", | |
"RL536", | |
"SU536", | |
"TZ536", | |
"VU536", | |
"WT536", | |
"XN536", | |
"YI536", | |
"ZA536", | |
"ZP536", | |
"C540", | |
"U540", | |
"BH540", | |
"CY540", | |
"FN540", | |
"HW540", | |
"KK540", | |
"NA540", | |
"PO540", | |
"RL540", | |
"SU540", | |
"TZ540", | |
"C546", | |
"U546", | |
"BA546", | |
"CO546", | |
"EP546", | |
"GR546", | |
"JG546", | |
"LJ546", | |
"NQ546", | |
"C550", | |
"U550", | |
"BA550", | |
"CO550", | |
"EP550", | |
"GR550", | |
"DJ556", | |
"FR556", | |
"HT556", | |
"KD556", | |
"MP556", | |
"OM556", | |
"QI556", | |
"RU556", | |
"TA556", | |
"UG556", | |
"VR556", | |
"WO556", | |
"XJ556", | |
"YA556", | |
"YR556", | |
"ZE556", | |
"ZT556", | |
"AAK556", | |
"DJ557", | |
"FR557", | |
"HT557", | |
"KD557", | |
"MP557", | |
"OM557", | |
"QI557", | |
"RU557", | |
"TA557", | |
"UG557", | |
"VR557", | |
"WO557", | |
"XJ557", | |
"YA557", | |
"YR557", | |
"ZE557", | |
"ZT557", | |
"AAK557", | |
"DJ561", | |
"FR561", | |
"HT561", | |
"KD561", | |
"MP561", | |
"OM561", | |
"QI561", | |
"RU561", | |
"TA561", | |
"UG561", | |
"VR561", | |
"WO561", | |
"DJ562", | |
"FR562", | |
"HT562", | |
"KD562", | |
"MP562", | |
"OM562", | |
"QI562", | |
"RU562", | |
"TA562", | |
"UG562", | |
"VR562", | |
"WO562", | |
"U568", | |
"BA568", | |
"CX568", | |
"EZ568", | |
"HQ568", | |
"KB568", | |
"MX568", | |
"OZ568", | |
"RK568", | |
"SO568", | |
"UA568", | |
"VH568", | |
"WU568", | |
"XM568", | |
"YJ568", | |
"YX568", | |
"ZQ568", | |
"AAH568", | |
"U569", | |
"BA569", | |
"CX569", | |
"EZ569", | |
"HQ569", | |
"KB569", | |
"MX569", | |
"OZ569", | |
"RK569", | |
"SO569", | |
"UA569", | |
"VH569", | |
"WU569", | |
"XM569", | |
"YJ569", | |
"YX569", | |
"ZQ569", | |
"AAH569", | |
"U570", | |
"BA570", | |
"CX570", | |
"EZ570", | |
"HQ570", | |
"KB570", | |
"MX570", | |
"OZ570", | |
"RK570", | |
"SO570", | |
"UA570", | |
"VH570", | |
"WU570", | |
"XM570", | |
"YJ570", | |
"YX570", | |
"ZQ570", | |
"AAH570", | |
"U571", | |
"BA571", | |
"CX571", | |
"EZ571", | |
"HQ571", | |
"KB571", | |
"MX571", | |
"OZ571", | |
"RK571", | |
"SO571", | |
"UA571", | |
"VH571", | |
"WU571", | |
"XM571", | |
"YJ571", | |
"YX571", | |
"ZQ571", | |
"AAH571", | |
"U572", | |
"BA572", | |
"CX572", | |
"EZ572", | |
"HQ572", | |
"KB572", | |
"MX572", | |
"OZ572", | |
"RK572", | |
"SO572", | |
"UA572", | |
"VH572", | |
"WU572", | |
"XM572", | |
"YJ572", | |
"YX572", | |
"ZQ572", | |
"AAH572", | |
"U573", | |
"BA573", | |
"CX573", | |
"EZ573", | |
"HQ573", | |
"KB573", | |
"MX573", | |
"OZ573", | |
"RK573", | |
"SO573", | |
"UA573", | |
"VH573", | |
"WU573", | |
"XM573", | |
"YJ573", | |
"YX573", | |
"ZQ573", | |
"AAH573", | |
"U577", | |
"BA577", | |
"CX577", | |
"EZ577", | |
"HQ577", | |
"KB577", | |
"MX577", | |
"OZ577", | |
"RK577", | |
"SO577", | |
"UA577", | |
"VH577", | |
"U578", | |
"BA578", | |
"CX578", | |
"EZ578", | |
"HQ578", | |
"KB578", | |
"MX578", | |
"OZ578", | |
"RK578", | |
"SO578", | |
"UA578", | |
"VH578", | |
"U579", | |
"BA579", | |
"CX579", | |
"EZ579", | |
"HQ579", | |
"KB579", | |
"MX579", | |
"OZ579", | |
"RK579", | |
"SO579", | |
"UA579", | |
"VH579", | |
"U580", | |
"BA580", | |
"CX580", | |
"EZ580", | |
"HQ580", | |
"KB580", | |
"MX580", | |
"OZ580", | |
"RK580", | |
"SO580", | |
"UA580", | |
"VH580", | |
"U581", | |
"BA581", | |
"CX581", | |
"EZ581", | |
"HQ581", | |
"KB581", | |
"MX581", | |
"OZ581", | |
"RK581", | |
"SO581", | |
"UA581", | |
"VH581", | |
"U582", | |
"BA582", | |
"CX582", | |
"EZ582", | |
"HQ582", | |
"KB582", | |
"MX582", | |
"OZ582", | |
"RK582", | |
"SO582", | |
"UA582", | |
"VH582", | |
"BE590", | |
"CT590", | |
"FS590", | |
"HU590", | |
"KY590", | |
"NL590", | |
"PY590", | |
"RR590", | |
"TF590", | |
"UN590", | |
"WD590", | |
"XB590", | |
"XX590", | |
"YQ590", | |
"ZJ590", | |
"ZY590", | |
"AAP590", | |
"AAX590", | |
"BE591", | |
"CT591", | |
"FS591", | |
"HU591", | |
"KY591", | |
"NL591", | |
"PY591", | |
"RR591", | |
"TF591", | |
"UN591", | |
"WD591", | |
"XB591", | |
"XX591", | |
"YQ591", | |
"ZJ591", | |
"ZY591", | |
"AAP591", | |
"AAX591", | |
"BE592", | |
"CT592", | |
"FS592", | |
"HU592", | |
"KY592", | |
"NL592", | |
"PY592", | |
"RR592", | |
"TF592", | |
"UN592", | |
"WD592", | |
"XB592", | |
"XX592", | |
"YQ592", | |
"ZJ592", | |
"ZY592", | |
"AAP592", | |
"AAX592", | |
"BE593", | |
"CT593", | |
"FS593", | |
"HU593", | |
"KY593", | |
"NL593", | |
"PY593", | |
"RR593", | |
"TF593", | |
"UN593", | |
"WD593", | |
"XB593", | |
"XX593", | |
"YQ593", | |
"ZJ593", | |
"ZY593", | |
"AAP593", | |
"AAX593", | |
"BF599", | |
"CV599", | |
"FS599", | |
"HU599", | |
"KY599", | |
"NL599", | |
"PY599", | |
"RR599", | |
"TF599", | |
"UN599", | |
"WD599", | |
"XB599", | |
"XX599", | |
"YQ599", | |
"ZJ599", | |
"ZY599", | |
"AAP599", | |
"AAX599", | |
"BF600", | |
"CV600", | |
"FS600", | |
"HU600", | |
"KY600", | |
"NL600", | |
"PY600", | |
"RR600", | |
"TF600", | |
"UN600", | |
"WD600", | |
"XB600", | |
"XX600", | |
"YQ600", | |
"ZJ600", | |
"ZY600", | |
"AAP600", | |
"AAX600", | |
"BF601", | |
"CV601", | |
"FS601", | |
"HU601", | |
"KY601", | |
"NL601", | |
PY601 | |
RR601 | |
TF601 | |
UN601 | |
WD601 | |
XB601 | |
XX601 | |
YQ601 | |
ZJ601 | |
ZY601 | |
AAP601 | |
AAX601 | |
BF602 | |
CV602 | |
FS602 | |
HU602 | |
KY602 | |
NL602 | |
PY602 | |
"RR602", | |
"TF602", | |
"UN602", | |
"WD602", | |
"XB602", | |
"XX602", | |
"YQ602", | |
"ZJ602", | |
"ZY602", | |
"AAP602", | |
"AAX602", | |
"BF608", | |
"CV608", | |
"FT608", | |
"HU608", | |
"KZ608", | |
"NL608", | |
"PZ608", | |
"RQ608", | |
"TG608", | |
"UN608", | |
"WE608", | |
"XB608", | |
"BF609", | |
"CV609", | |
"FT609", | |
"HU609", | |
"KZ609", | |
"NL609", | |
"PZ609", | |
"RQ609", | |
"TG609", | |
"UN609", | |
"WE609", | |
"XB609", | |
"BF610", | |
"CV610", | |
"FT610", | |
"HU610", | |
"KZ610", | |
"NL610", | |
"PZ610", | |
"RQ610", | |
"TG610", | |
"UN610", | |
"WE610", | |
"XB610", | |
"BF611", | |
"CV611", | |
"FT611", | |
"HU611", | |
"KZ611", | |
"NL611", | |
"PZ611", | |
"RQ611", | |
"TG611", | |
"UN611", | |
"WE611", | |
"XB611", | |
"BG617", | |
"CW617", | |
"FT617", | |
"HU617", | |
"KZ617", | |
"NL617", | |
"QA617", | |
"RR617", | |
"TG617", | |
"UN617", | |
"WE617", | |
"XB617", | |
"BG618", | |
"CW618", | |
"FT618", | |
"HU618", | |
"KZ618", | |
"NL618", | |
"QA618", | |
"RR618", | |
"TG618", | |
"UN618", | |
"WE618", | |
"XB618", | |
"BG619", | |
"CW619", | |
"FT619", | |
"HU619", | |
"KZ619", | |
"NL619", | |
"QA619", | |
"RR619", | |
"TG619", | |
"UN619", | |
"WE619", | |
"XB619", | |
"BG620", | |
"CW620", | |
"FT620", | |
"HU620", | |
"KZ620", | |
"NL620", | |
"QA620", | |
"RR620", | |
"TG620", | |
"UN620", | |
"WE620", | |
"XB620", | |
"BE626", | |
"CT626", | |
"EV626", | |
"HA626", | |
"JJ626", | |
"LP626", | |
"NW626", | |
"PW626", | |
"RM626", | |
"SQ626", | |
"TW626", | |
"UT626", | |
"WG626", | |
"XC626", | |
"XU626", | |
"YL626", | |
"ZB626", | |
"ZO626", | |
"BE627", | |
"CT627", | |
"EV627", | |
"HA627", | |
"JJ627", | |
"LP627", | |
"NW627", | |
"PW627", | |
"RM627", | |
"SQ627", | |
"TW627", | |
"UT627", | |
"WG627", | |
"XC627", | |
"XU627", | |
"YL627", | |
"ZB627", | |
"ZO627", | |
"BE628", | |
"CT628", | |
"EV628", | |
"HA628", | |
"JJ628", | |
"LP628", | |
"NW628", | |
"PW628", | |
"RM628", | |
"SQ628", | |
"TW628", | |
"UT628", | |
"WG628", | |
"XC628", | |
"XU628", | |
"YL628", | |
"ZB628", | |
"ZO628", | |
"BE629", | |
"CT629", | |
"EV629", | |
"HA629", | |
"JJ629", | |
"LP629", | |
"NW629", | |
"PW629", | |
"RM629", | |
"SQ629", | |
"TW629", | |
"UT629", | |
"WG629", | |
"XC629", | |
"XU629", | |
"YL629", | |
"ZB629", | |
"ZO629", | |
"BE633", | |
"CT633", | |
"EV633", | |
"HA633", | |
"JJ633", | |
"LP633", | |
"NW633", | |
"PW633", | |
"RM633", | |
"SQ633", | |
"TW633", | |
"UT633", | |
"BE634", | |
"CT634", | |
"EV634", | |
"HA634", | |
"JJ634", | |
"LP634", | |
"NW634", | |
"PW634", | |
"RM634", | |
"SQ634", | |
"TW634", | |
"UT634", | |
"BE635", | |
"CT635", | |
"EV635", | |
"HA635", | |
"JJ635", | |
"LP635", | |
"NW635", | |
"PW635", | |
"RM635", | |
"SQ635", | |
"TW635", | |
"UT635", | |
"BE636", | |
"CT636", | |
"EV636", | |
"HA636", | |
"JJ636", | |
"LP636", | |
"NW636", | |
"PW636", | |
"RM636", | |
"SQ636", | |
"TW636", | |
"UT636", | |
"EN642", | |
"GO642", | |
"JE642", | |
"LH642", | |
"NO642", | |
"PR642", | |
"RH642", | |
"SJ642", | |
"TQ642", | |
"UR642", | |
"WB642", | |
"WZ642", | |
"XS642", | |
"YK642", | |
"YZ642", | |
"ZM642", | |
"AAB642", | |
"AAN642", | |
"EN643", | |
"GO643", | |
"JE643", | |
"LH643", | |
"NO643", | |
"PR643", | |
"RH643", | |
"SJ643", | |
"TQ643", | |
"UR643", | |
"WB643", | |
"WZ643", | |
"XS643", | |
"YK643", | |
"YZ643", | |
"ZM643", | |
"AAB643", | |
"AAN643", | |
"EN644", | |
"GO644", | |
"JE644", | |
"LH644", | |
"NO644", | |
"PR644", | |
"RH644", | |
"SJ644", | |
"TQ644", | |
"UR644", | |
"WB644", | |
"WZ644", | |
"XS644", | |
"YK644", | |
"YZ644", | |
"ZM644", | |
"AAB644", | |
"AAN644", | |
"EN645", | |
"GO645", | |
"JE645", | |
"LH645", | |
"NO645", | |
"PR645", | |
"RH645", | |
"SJ645", | |
"TQ645", | |
"UR645", | |
"WB645", | |
"WZ645", | |
"XS645", | |
"YK645", | |
"YZ645", | |
"ZM645", | |
"AAB645", | |
"AAN645", | |
"EN646", | |
"GO646", | |
"JE646", | |
"LH646", | |
"NO646", | |
"PR646", | |
"RH646", | |
"SJ646", | |
"TQ646", | |
"UR646", | |
"WB646", | |
"WZ646", | |
"XS646", | |
"YK646", | |
"YZ646", | |
"ZM646", | |
"AAB646", | |
"AAN646", | |
"EN647", | |
"GO647", | |
"JE647", | |
"LH647", | |
"NO647", | |
"PR647", | |
"RH647", | |
"SJ647", | |
"TQ647", | |
"UR647", | |
"WB647", | |
"WZ647", | |
"XS647", | |
"YK647", | |
"YZ647", | |
"ZM647", | |
"AAB647", | |
"AAN647", | |
"EN648", | |
"GO648", | |
"JE648", | |
"LH648", | |
"NO648", | |
"PR648", | |
"RH648", | |
"SJ648", | |
"TQ648", | |
"UR648", | |
"WB648", | |
"WZ648", | |
"XS648", | |
"YK648", | |
"YZ648", | |
"ZM648", | |
"AAB648", | |
"AAN648", | |
"EN649", | |
"GO649", | |
"JE649", | |
"LH649", | |
"NO649", | |
"PR649", | |
"RH649", | |
"SJ649", | |
"TQ649", | |
"UR649", | |
"WB649", | |
"WZ649", | |
"XS649", | |
"YK649", | |
"YZ649", | |
"ZM649", | |
"AAB649", | |
"AAN649", | |
"EN650", | |
"GO650", | |
"JE650", | |
"LH650", | |
"NO650", | |
"PR650", | |
"RH650", | |
"SJ650", | |
"TQ650", | |
"UR650", | |
"WB650", | |
"WZ650", | |
"XS650", | |
"YK650", | |
"YZ650", | |
"ZM650", | |
"AAB650", | |
"AAN650", | |
"EN651", | |
"GO651", | |
"JE651", | |
"LH651", | |
"NO651", | |
"PR651", | |
"RH651", | |
"SJ651", | |
"TQ651", | |
"UR651", | |
"WB651", | |
"WZ651", | |
"XS651", | |
"YK651", | |
"YZ651", | |
"ZM651", | |
"AAB651", | |
"AAN651", | |
"EN652", | |
"GO652", | |
"JE652", | |
"LH652", | |
"NO652", | |
"PR652", | |
"RH652", | |
"SJ652", | |
"TQ652", | |
"UR652", | |
"WB652", | |
"WZ652", | |
"XS652", | |
"YK652", | |
"YZ652", | |
"ZM652", | |
"AAB652", | |
"AAN652", | |
"EN653", | |
"GO653", | |
"JE653", | |
"LH653", | |
"NO653", | |
"PR653", | |
"RH653", | |
"SJ653", | |
"TQ653", | |
"UR653", | |
"WB653", | |
"WZ653", | |
"XS653", | |
"YK653", | |
"YZ653", | |
"ZM653", | |
"AAB653", | |
"AAN653", | |
"EN657", | |
"GO657", | |
"JE657", | |
"LH657", | |
"NO657", | |
"PR657", | |
"RH657", | |
"SJ657", | |
"TQ657", | |
"UR657", | |
"WB657", | |
"WZ657", | |
"EN658", | |
"GO658", | |
"JE658", | |
"LH658", | |
"NO658", | |
"PR658", | |
"RH658", | |
"SJ658", | |
"TQ658", | |
"UR658", | |
"WB658", | |
"WZ658", | |
"EN659", | |
"GO659", | |
"JE659", | |
"LH659", | |
"NO659", | |
"PR659", | |
"RH659", | |
"SJ659", | |
"TQ659", | |
"UR659", | |
"WB659", | |
"WZ659", | |
"EN660", | |
"GO660", | |
"JE660", | |
"LH660", | |
"NO660", | |
"PR660", | |
"RH660", | |
"SJ660", | |
"TQ660", | |
"UR660", | |
"WB660", | |
"WZ660", | |
"EN661", | |
"GO661", | |
"JE661", | |
"LH661", | |
"NO661", | |
"PR661", | |
"RH661", | |
"SJ661", | |
"TQ661", | |
"UR661", | |
"WB661", | |
"WZ661", | |
EN662 | |
GO662 | |
JE662 | |
LH662 | |
NO662 | |
PR662 | |
RH662 | |
SJ662 | |
TQ662 | |
UR662 | |
WB662 | |
WZ662 | |
EN663 | |
GO663 | |
JE663 | |
LH663 | |
NO663 | |
PR663 | |
RH663 | |
SJ663 | |
TQ663 | |
UR663 | |
WB663 | |
WZ663 | |
EN664 | |
GO664 | |
JE664 | |
LH664 | |
NO664 | |
PR664 | |
RH664 | |
SJ664 | |
TQ664 | |
UR664 | |
WB664 | |
WZ664 | |
EN665 | |
GO665 | |
JE665 | |
LH665 | |
NO665 | |
PR665 | |
RH665 | |
SJ665 | |
TQ665 | |
UR665 | |
WB665 | |
WZ665 | |
EN666 | |
GO666 | |
JE666 | |
LH666 | |
NO666 | |
PR666 | |
RH666 | |
SJ666 | |
TQ666 | |
UR666 | |
WB666 | |
WZ666 | |
EN667 | |
GO667 | |
JE667 | |
LH667 | |
NO667 | |
PR667 | |
RH667 | |
SJ667 | |
TQ667 | |
UR667 | |
WB667 | |
WZ667 | |
EN668 | |
GO668 | |
JE668 | |
LH668 | |
NO668 | |
PR668 | |
RH668 | |
SJ668 | |
TQ668 | |
UR668 | |
WB668 | |
WZ668 | |
AI676 | |
BR676 | |
DK676 | |
FT676 | |
HU676 | |
KE676 | |
MQ676 | |
ON676 | |
QJ676 | |
AI677 | |
BR677 | |
DK677 | |
FT677 | |
HU677 | |
KE677 | |
MQ677 | |
ON677 | |
QJ677 | |
AI678 | |
BR678 | |
DK678 | |
FT678 | |
HU678 | |
KE678 | |
MQ678 | |
ON678 | |
QJ678 | |
AI679 | |
BR679 | |
DK679 | |
FT679 | |
HU679 | |
KE679 | |
MQ679 | |
ON679 | |
QJ679 | |
AI680 | |
BR680 | |
DK680 | |
FT680 | |
HU680 | |
KE680 | |
MQ680 | |
ON680 | |
QJ680 | |
AI684 | |
BR684 | |
DK684 | |
FT684 | |
HU684 | |
KE684 | |
AI685 | |
BR685 | |
DK685 | |
FT685 | |
HU685 | |
KE685 | |
AI686 | |
BR686 | |
DK686 | |
FT686 | |
HU686 | |
KE686 | |
AI687 | |
BR687 | |
DK687 | |
FT687 | |
HU687 | |
KE687 | |
AI688 | |
BR688 | |
DK688 | |
FT688 | |
HU688 | |
KE688 | |
S694 | |
BC694 | |
CS694 | |
EY694 | |
HG694 | |
JQ694 | |
MH694 | |
OG694 | |
QH694 | |
S695 | |
BC695 | |
CS695 | |
EY695 | |
HG695 | |
JQ695 | |
MH695 | |
OG695 | |
QH695 | |
X702 | |
BC702 | |
CR702 | |
ES702 | |
GU702 | |
JI702 | |
X703 | |
BC703 | |
CR703 | |
ES703 | |
GU703 | |
JI703 | |
AY709 | |
CM709 | |
EN709 | |
GO709 | |
JE709 | |
LH709 | |
NO709 | |
PR709 | |
RH709 | |
AY710 | |
CM710 | |
EN710 | |
GO710 | |
JE710 | |
LH710 | |
NO710 | |
PR710 | |
RH710 | |
AY711 | |
CM711 | |
EN711 | |
GO711 | |
JE711 | |
LH711 | |
NO711 | |
PR711 | |
RH711 | |
AY712 | |
CM712 | |
EN712 | |
GO712 | |
JE712 | |
LH712 | |
NO712 | |
PR712 | |
RH712 | |
AY713 | |
CM713 | |
EN713 | |
GO713 | |
JE713 | |
LH713 | |
NO713 | |
PR713 | |
RH713 | |
AY714 | |
CM714 | |
EN714 | |
GO714 | |
JE714 | |
LH714 | |
NO714 | |
PR714 | |
RH714 | |
BC718 | |
CR718 | |
ES718 | |
GU718 | |
JI718 | |
LM718 | |
BC719 | |
CR719 | |
ES719 | |
GU719 | |
JI719 | |
LM719 | |
BC720 | |
CR720 | |
ES720 | |
GU720 | |
JI720 | |
LM720 | |
BC721 | |
CR721 | |
ES721 | |
GU721 | |
JI721 | |
LM721 | |
BC722 | |
CR722 | |
ES722 | |
GU722 | |
JI722 | |
LM722 | |
BC723 | |
CR723 | |
ES723 | |
GU723 | |
JI723 | |
LM723 | |
BC729 | |
CR729 | |
ES729 | |
GU729 | |
JI729 | |
LM729 | |
NU729 | |
PV729 | |
RJ729 | |
BC730 | |
CR730 | |
ES730 | |
GU730 | |
JI730 | |
LM730 | |
NU730 | |
PV730 | |
RJ730 | |
BC734 | |
CR734 | |
ES734 | |
GU734 | |
JI734 | |
LM734 | |
BC735 | |
CR735 | |
ES735 | |
GU735 | |
JI735 | |
LM735 | |
CO745 | |
EP745 | |
GO745 | |
JE745 | |
LG745 | |
NN745 | |
CO746 | |
EP746 | |
GO746 | |
JE746 | |
LG746 | |
NN746 | |
CO747 | |
EP747 | |
GO747 | |
JE747 | |
LG747 | |
NN747 | |
CO748 | |
EP748 | |
GO748 | |
JE748 | |
LG748 | |
NN748 | |
CO749 | |
EP749 | |
GO749 | |
JE749 | |
LG749 | |
NN749 | |
CO750 | |
EP750 | |
GO750 | |
JE750 | |
LG750 | |
NN750 | |
CN756 | |
EO756 | |
GP756 | |
JF756 | |
LI756 | |
NP756 | |
PS756 | |
RI756 | |
SK756 | |
TR756 | |
US756 | |
WC756 | |
CN757 | |
EO757 | |
GP757 | |
JF757 | |
LI757 | |
NP757 | |
PS757 | |
RI757 | |
SK757 | |
TR757 | |
US757 | |
WC757 | |
CN758 | |
EO758 | |
GP758 | |
JF758 | |
LI758 | |
NP758 | |
PS758 | |
RI758 | |
SK758 | |
TR758 | |
US758 | |
WC758 | |
CN759 | |
EO759 | |
GP759 | |
JF759 | |
LI759 | |
NP759 | |
PS759 | |
RI759 | |
SK759 | |
TR759 | |
US759 | |
WC759 | |
CN760 | |
EO760 | |
GP760 | |
JF760 | |
LI760 | |
NP760 | |
PS760 | |
RI760 | |
SK760 | |
TR760 | |
US760 | |
WC760 | |
CN761 | |
EO761 | |
GP761 | |
JF761 | |
LI761 | |
NP761 | |
PS761 | |
RI761 | |
SK761 | |
TR761 | |
US761 | |
WC761 | |
BA769 | |
CO769 | |
EP769 | |
GR769 | |
JG769 | |
LJ769 | |
BA770 | |
CO770 | |
EP770 | |
GR770 | |
JG770 | |
LJ770 | |
AY776 | |
CM776 | |
EN776 | |
GO776 | |
JE776 | |
LH776 | |
NO776 | |
PR776 | |
RH776 | |
SJ776 | |
TQ776 | |
UR776 | |
AY777 | |
CM777 | |
EN777 | |
GO777 | |
JE777 | |
LH777 | |
NO777 | |
PR777 | |
RH777 | |
SJ777 | |
TQ777 | |
UR777 | |
BC783 | |
CR783 | |
ES783 | |
GU783 | |
JI783 | |
LM783 | |
NU783 | |
PV783 | |
RJ783 | |
SM783 | |
BC784 | |
CR784 | |
ES784 | |
GU784 | |
JI784 | |
LM784 | |
NU784 | |
PV784 | |
RJ784 | |
SM784 | |
AI790 | |
BR790 | |
DK790 | |
FT790 | |
HU790 | |
KE790 | |
MQ790 | |
ON790 | |
QJ790 | |
RV790 | |
TB790 | |
UI790 | |
VS790 | |
WP790 | |
XK790 | |
YB790 | |
YS790 | |
ZF790 | |
AI791 | |
BR791 | |
DK791 | |
FT791 | |
HU791 | |
KE791 | |
MQ791 | |
ON791 | |
QJ791 | |
RV791 | |
TB791 | |
UI791 | |
VS791 | |
WP791 | |
XK791 | |
YB791 | |
YS791 | |
ZF791 | |
AI792 | |
BR792 | |
DK792 | |
FT792 | |
HU792 | |
KE792 | |
MQ792 | |
ON792 | |
QJ792 | |
RV792 | |
TB792 | |
UI792 | |
VS792 | |
WP792 | |
XK792 | |
YB792 | |
YS792 | |
ZF792 | |
AI796 | |
BR796 | |
DK796 | |
FT796 | |
HU796 | |
KE796 | |
MQ796 | |
ON796 | |
QJ796 | |
RV796 | |
TB796 | |
UI796 | |
AI797 | |
BR797 | |
DK797 | |
FT797 | |
HU797 | |
KE797 | |
MQ797 | |
ON797 | |
QJ797 | |
RV797 | |
TB797 | |
UI797 | |
AI798 | |
BR798 | |
DK798 | |
FT798 | |
HU798 | |
KE798 | |
MQ798 | |
ON798 | |
QJ798 | |
RV798 | |
TB798 | |
UI798 | |
AS804 | |
CH804 | |
EA804 | |
GG804 | |
IV804 | |
KU804 | |
NH804 | |
PI804 | |
QX804 | |
SE804 | |
TL804 | |
UO804 | |
VZ804 | |
WW804 | |
XQ804 | |
YG804 | |
YV804 | |
ZK804 | |
AS805 | |
CH805 | |
EA805 | |
GG805 | |
IV805 | |
KU805 | |
NH805 | |
PI805 | |
QX805 | |
SE805 | |
TL805 | |
UO805 | |
VZ805 | |
WW805 | |
XQ805 | |
YG805 | |
YV805 | |
ZK805 | |
AS806 | |
CH806 | |
EA806 | |
GG806 | |
IV806 | |
KU806 | |
NH806 | |
PI806 | |
QX806 | |
SE806 | |
TL806 | |
UO806 | |
VZ806 | |
WW806 | |
XQ806 | |
YG806 | |
YV806 | |
ZK806 | |
AS807 | |
CH807 | |
EA807 | |
GG807 | |
IV807 | |
KU807 | |
NH807 | |
PI807 | |
QX807 | |
SE807 | |
TL807 | |
UO807 | |
VZ807 | |
WW807 | |
XQ807 | |
YG807 | |
YV807 | |
ZK807 | |
AS808 | |
CH808 | |
EA808 | |
GG808 | |
IV808 | |
KU808 | |
NH808 | |
PI808 | |
QX808 | |
SE808 | |
TL808 | |
UO808 | |
VZ808 | |
WW808 | |
XQ808 | |
YG808 | |
YV808 | |
ZK808 | |
AS809 | |
CH809 | |
EA809 | |
GG809 | |
IV809 | |
KU809 | |
NH809 | |
PI809 | |
QX809 | |
SE809 | |
TL809 | |
UO809 | |
VZ809 | |
WW809 | |
XQ809 | |
YG809 | |
YV809 | |
ZK809 | |
AS810 | |
CH810 | |
EA810 | |
GG810 | |
IV810 | |
KU810 | |
NH810 | |
PI810 | |
QX810 | |
SE810 | |
TL810 | |
UO810 | |
VZ810 | |
WW810 | |
XQ810 | |
YG810 | |
YV810 | |
ZK810 | |
AS811 | |
CH811 | |
EA811 | |
GG811 | |
IV811 | |
KU811 | |
NH811 | |
PI811 | |
QX811 | |
SE811 | |
TL811 | |
UO811 | |
VZ811 | |
WW811 | |
XQ811 | |
YG811 | |
YV811 | |
ZK811 | |
AS812 | |
CH812 | |
EA812 | |
GG812 | |
IV812 | |
KU812 | |
NH812 | |
PI812 | |
QX812 | |
SE812 | |
TL812 | |
UO812 | |
VZ812 | |
WW812 | |
XQ812 | |
YG812 | |
YV812 | |
ZK812 | |
AS813 | |
CH813 | |
EA813 | |
GG813 | |
IV813 | |
KU813 | |
NH813 | |
PI813 | |
QX813 | |
SE813 | |
TL813 | |
UO813 | |
VZ813 | |
WW813 | |
XQ813 | |
YG813 | |
YV813 | |
ZK813 | |
AS814 | |
CH814 | |
EA814 | |
GG814 | |
IV814 | |
KU814 | |
NH814 | |
PI814 | |
QX814 | |
SE814 | |
TL814 | |
UO814 | |
VZ814 | |
WW814 | |
XQ814 | |
YG814 | |
YV814 | |
ZK814 | |
AS815 | |
CH815 | |
EA815 | |
GG815 | |
IV815 | |
KU815 | |
NH815 | |
PI815 | |
QX815 | |
SE815 | |
TL815 | |
UO815 | |
VZ815 | |
WW815 | |
XQ815 | |
YG815 | |
YV815 | |
ZK815 | |
AS819 | |
CH819 | |
EA819 | |
GG819 | |
IV819 | |
KU819 | |
NH819 | |
PI819 | |
QX819 | |
SE819 | |
TL819 | |
UO819 | |
AS820 | |
CH820 | |
EA820 | |
GG820 | |
IV820 | |
KU820 | |
NH820 | |
PI820 | |
QX820 | |
SE820 | |
TL820 | |
UO820 | |
AS821 | |
CH821 | |
EA821 | |
GG821 | |
IV821 | |
KU821 | |
NH821 | |
PI821 | |
QX821 | |
SE821 | |
TL821 | |
UO821 | |
AS822 | |
CH822 | |
EA822 | |
GG822 | |
IV822 | |
KU822 | |
NH822 | |
PI822 | |
QX822 | |
SE822 | |
TL822 | |
UO822 | |
AS823 | |
CH823 | |
EA823 | |
GG823 | |
IV823 | |
KU823 | |
NH823 | |
PI823 | |
QX823 | |
SE823 | |
TL823 | |
UO823 | |
AS824 | |
CH824 | |
EA824 | |
GG824 | |
IV824 | |
KU824 | |
NH824 | |
PI824 | |
QX824 | |
SE824 | |
TL824 | |
UO824 | |
AS825 | |
CH825 | |
EA825 | |
GG825 | |
IV825 | |
KU825 | |
NH825 | |
PI825 | |
QX825 | |
SE825 | |
TL825 | |
UO825 | |
AS826 | |
CH826 | |
EA826 | |
GG826 | |
IV826 | |
KU826 | |
NH826 | |
PI826 | |
QX826 | |
SE826 | |
TL826 | |
UO826 | |
AS827 | |
CH827 | |
EA827 | |
GG827 | |
IV827 | |
KU827 | |
NH827 | |
PI827 | |
QX827 | |
SE827 | |
TL827 | |
UO827 | |
AS828 | |
CH828 | |
EA828 | |
GG828 | |
IV828 | |
KU828 | |
NH828 | |
PI828 | |
QX828 | |
SE828 | |
TL828 | |
UO828 | |
AS829 | |
CH829 | |
EA829 | |
GG829 | |
IV829 | |
KU829 | |
NH829 | |
PI829 | |
QX829 | |
SE829 | |
TL829 | |
UO829 | |
AS830 | |
CH830 | |
EA830 | |
GG830 | |
IV830 | |
KU830 | |
NH830 | |
PI830 | |
QX830 | |
SE830 | |
TL830 | |
UO830 | |
AT836 | |
CI836 | |
EB836 | |
GH836 | |
IW836 | |
KV836 | |
NI836 | |
PJ836 | |
QY836 | |
SF836 | |
TM836 | |
UP836 | |
WA836 | |
WX836 | |
XR836 | |
YH836 | |
YW836 | |
ZL836 | |
AT837 | |
CI837 | |
EB837 | |
GH837 | |
IW837 | |
KV837 | |
NI837 | |
PJ837 | |
QY837 | |
SF837 | |
TM837 | |
UP837 | |
WA837 | |
WX837 | |
XR837 | |
YH837 | |
YW837 | |
ZL837 | |
AT838 | |
CI838 | |
EB838 | |
GH838 | |
IW838 | |
KV838 | |
NI838 | |
PJ838 | |
QY838 | |
SF838 | |
TM838 | |
UP838 | |
WA838 | |
WX838 | |
XR838 | |
YH838 | |
YW838 | |
ZL838 | |
AT839 | |
CI839 | |
EB839 | |
GH839 | |
IW839 | |
KV839 | |
NI839 | |
PJ839 | |
QY839 | |
SF839 | |
TM839 | |
UP839 | |
WA839 | |
WX839 | |
XR839 | |
YH839 | |
YW839 | |
ZL839 | |
AT840 | |
CI840 | |
EB840 | |
GH840 | |
IW840 | |
KV840 | |
NI840 | |
PJ840 | |
QY840 | |
SF840 | |
TM840 | |
UP840 | |
WA840 | |
WX840 | |
XR840 | |
YH840 | |
YW840 | |
ZL840 | |
AT841 | |
CI841 | |
EB841 | |
GH841 | |
IW841 | |
KV841 | |
NI841 | |
PJ841 | |
QY841 | |
SF841 | |
TM841 | |
UP841 | |
WA841 | |
WX841 | |
XR841 | |
YH841 | |
YW841 | |
ZL841 | |
AT842 | |
CI842 | |
EB842 | |
GH842 | |
IW842 | |
KV842 | |
NI842 | |
PJ842 | |
QY842 | |
SF842 | |
TM842 | |
UP842 | |
WA842 | |
WX842 | |
XR842 | |
YH842 | |
YW842 | |
ZL842 | |
AT843 | |
CI843 | |
EB843 | |
GH843 | |
IW843 | |
KV843 | |
NI843 | |
PJ843 | |
QY843 | |
SF843 | |
TM843 | |
UP843 | |
WA843 | |
WX843 | |
XR843 | |
YH843 | |
YW843 | |
ZL843 | |
AT844 | |
CI844 | |
EB844 | |
GH844 | |
IW844 | |
KV844 | |
NI844 | |
PJ844 | |
QY844 | |
SF844 | |
TM844 | |
UP844 | |
WA844 | |
WX844 | |
XR844 | |
YH844 | |
YW844 | |
ZL844 | |
AT845 | |
CI845 | |
EB845 | |
GH845 | |
IW845 | |
KV845 | |
NI845 | |
PJ845 | |
QY845 | |
SF845 | |
TM845 | |
UP845 | |
WA845 | |
WX845 | |
XR845 | |
YH845 | |
YW845 | |
ZL845 | |
AT846 | |
CI846 | |
EB846 | |
GH846 | |
IW846 | |
KV846 | |
NI846 | |
PJ846 | |
QY846 | |
SF846 | |
TM846 | |
UP846 | |
WA846 | |
WX846 | |
XR846 | |
YH846 | |
YW846 | |
ZL846 | |
AT847 | |
CI847 | |
EB847 | |
GH847 | |
IW847 | |
KV847 | |
NI847 | |
PJ847 | |
QY847 | |
SF847 | |
TM847 | |
UP847 | |
WA847 | |
WX847 | |
XR847 | |
YH847 | |
YW847 | |
ZL847 | |
AT851 | |
CI851 | |
EB851 | |
GH851 | |
IW851 | |
KV851 | |
NI851 | |
PJ851 | |
QY851 | |
SF851 | |
TM851 | |
UP851 | |
AT852 | |
CI852 | |
EB852 | |
GH852 | |
IW852 | |
KV852 | |
NI852 | |
PJ852 | |
QY852 | |
SF852 | |
TM852 | |
UP852 | |
AT853 | |
CI853 | |
EB853 | |
GH853 | |
IW853 | |
KV853 | |
NI853 | |
PJ853 | |
QY853 | |
SF853 | |
TM853 | |
UP853 | |
AT854 | |
CI854 | |
EB854 | |
GH854 | |
IW854 | |
KV854 | |
NI854 | |
PJ854 | |
QY854 | |
SF854 | |
TM854 | |
UP854 | |
AT855 | |
CI855 | |
EB855 | |
GH855 | |
IW855 | |
KV855 | |
NI855 | |
PJ855 | |
QY855 | |
SF855 | |
TM855 | |
UP855 | |
AT856 | |
CI856 | |
EB856 | |
GH856 | |
IW856 | |
KV856 | |
NI856 | |
PJ856 | |
QY856 | |
SF856 | |
TM856 | |
UP856 | |
AT857 | |
CI857 | |
EB857 | |
GH857 | |
IW857 | |
KV857 | |
NI857 | |
PJ857 | |
QY857 | |
SF857 | |
TM857 | |
UP857 | |
AT858 | |
CI858 | |
EB858 | |
GH858 | |
IW858 | |
KV858 | |
NI858 | |
PJ858 | |
QY858 | |
SF858 | |
TM858 | |
UP858 | |
AT859 | |
CI859 | |
EB859 | |
GH859 | |
IW859 | |
KV859 | |
NI859 | |
PJ859 | |
QY859 | |
SF859 | |
TM859 | |
UP859 | |
AT860 | |
CI860 | |
EB860 | |
GH860 | |
IW860 | |
KV860 | |
NI860 | |
PJ860 | |
QY860 | |
SF860 | |
TM860 | |
UP860 | |
AT861 | |
CI861 | |
EB861 | |
GH861 | |
IW861 | |
KV861 | |
NI861 | |
PJ861 | |
QY861 | |
SF861 | |
TM861 | |
UP861 | |
AT862 | |
CI862 | |
EB862 | |
GH862 | |
IW862 | |
KV862 | |
NI862 | |
PJ862 | |
QY862 | |
SF862 | |
TM862 | |
UP862 | |
AJ868 | |
BS868 | |
DL868 | |
FU868 | |
HV868 | |
KF868 | |
MR868 | |
OO868 | |
QK868 | |
RW868 | |
TC868 | |
UJ868 | |
VT868 | |
WQ868 | |
XL868 | |
YC868 | |
YT868 | |
ZG868 | |
AJ869 | |
BS89 | |
DL869 | |
FU869 | |
HV869 | |
KF869 | |
MR869 | |
OO869 | |
QK869 | |
RW869 | |
TC869 | |
UJ869 | |
VT869 | |
WQ869 | |
XL869 | |
YC869 | |
YT869 | |
ZG869 | |
AJ870 | |
BS870 | |
DL870 | |
FU870 | |
HV870 | |
KF870 | |
MR870 | |
OO870 | |
QK870 | |
RW870 | |
TC870 | |
UJ870 | |
VT870 | |
WQ870 | |
XL870 | |
YC870 | |
YT870 | |
ZG870 | |
AJ874 | |
BS874 | |
DL874 | |
FU874 | |
HV874 | |
KF874 | |
MR874 | |
OO874 | |
QK874 | |
RW874 | |
TC874 | |
UJ874 | |
AJ875 | |
BS875 | |
DL875 | |
FU875 | |
HV875 | |
KF875 | |
MR875 | |
OO875 | |
QK875 | |
RW875 | |
TC875 | |
UJ875 | |
AJ876 | |
BS876 | |
DL876 | |
FU876 | |
HV876 | |
KF876 | |
MR876 | |
OO876 | |
QK876 | |
RW876 | |
TC876 | |
UJ876 | |
AZ884 | |
AZ885 | |
AZ886 | |
AZ887 | |
AZ888 | |
AZ889 | |
AZ890 | |
AZ891 | |
EO896 | |
GP896 | |
EO897 | |
GP897 | |
EO898 | |
GP898 | |
EO899 | |
GP899 | |
EO900 | |
GP900 | |
EO901 | |
GP901 | |
EO902 | |
GP902 | |
EO903 | |
GP903 | |
A908 | |
T908 | |
T915 | |
AZ915 | |
T916 | |
AZ916 | |
BO918 | |
AZ924 | |
CN924 | |
EO924 | |
GP924 | |
JF924 | |
LI924 | |
AZ925 | |
CN925 | |
EO925 | |
GP925 | |
JF925 | |
LI925 | |
AZ926 | |
CN926 | |
EO926 | |
GP926 | |
JF926 | |
LI926 | |
AZ927 | |
CN927 | |
EO927 | |
GP927 | |
JF927 | |
LI927 | |
AZ928 | |
CN928 | |
EO928 | |
GP928 | |
JF928 | |
LI928 | |
AZ929 | |
CN929 | |
EO929 | |
GP929 | |
JF929 | |
LI929 | |
AZ930 | |
CN930 | |
EO930 | |
GP930 | |
JF930 | |
LI930 | |
AZ934 | |
CN934 | |
EO934 | |
GP934 | |
JF934 | |
LI934 | |
NP934 | |
PS934 | |
AZ935 | |
CN935 | |
EO935 | |
GP935 | |
JF935 | |
LI935 | |
NP935 | |
PS935 | |
AZ936 | |
CN936 | |
EO936 | |
GP936 | |
JF936 | |
LI936 | |
NP936 | |
PS936 | |
AZ937 | |
CN937 | |
EO937 | |
GP937 | |
JF937 | |
LI937 | |
NP937 | |
PS937 | |
AZ938 | |
CN938 | |
EO938 | |
GP938 | |
JF938 | |
LI938 | |
NP938 | |
PS938 | |
AZ939 | |
CN939 | |
EO939 | |
GP939 | |
JF939 | |
LI939 | |
NP939 | |
PS939 | |
AZ940 | |
CN940 | |
EO940 | |
GP940 | |
JF940 | |
LI940 | |
NP940 | |
PS940 | |
AZ946 | |
CN946 | |
EO946 | |
GP946 | |
AZ947 | |
CN947 | |
EO947 | |
GP947 | |
AZ948 | |
CN948 | |
EO948 | |
GP948 | |
AZ949 | |
CN949 | |
EO949 | |
GP949 | |
AZ950 | |
CN950 | |
EO950 | |
GP950 | |
AZ951 | |
CN951 | |
EO951 | |
GP951 | |
AZ952 | |
CN952 | |
EO952 | |
GP952 | |
AZ957 | |
CN957 | |
AZ958 | |
CN958 | |
AZ959 | |
CN959 | |
AZ960 | |
CN960 | |
AZ961 | |
CN961 | |
AZ962 | |
CN962 | |
AZ963 | |
CN963 | |
AB970 | |
AZ970 | |
AB971 | |
AZ971 | |
AB972 | |
AZ972 | |
AB973 | |
AZ973 | |
AB978 | |
AZ978 | |
AB979 | |
AZ979 | |
AB980 | |
AZ980 | |
AB985 | |
AZ985 | |
AB986 | |
AZ986 | |
AB991 | |
AB992 | |
AB993 | |
AB994 | |
AB999 | |
T1009 | |
AZ1009 | |
T1010 | |
AZ1010 | |
A1016 | |
T1016 | |
AZ1016 | |
CN1016 | |
AZ1021 | |
EO1021 | |
JF1021 | |
A1026 | |
T1026 | |
T1034 | |
AZ1034 | |
CN1034 | |
EO1034 | |
T1035 | |
AZ1035 | |
CN1035 | |
EO1035 | |
AZ1041 | |
CN1041 | |
EO1041 | |
GP1041 | |
AZ1042 | |
CN1042 | |
EO1042 | |
GP1042 | |
AZ1043 | |
CN1043 | |
EO1043 | |
GP1043 | |
T1049 | |
AZ1049 | |
CN1049 | |
EO1049 | |
GP1049 | |
JF1049 | |
T1050 | |
AZ1050 | |
CN1050 | |
EO1050 | |
GP1050 | |
JF1050 | |
T1051 | |
AZ1051 | |
CN1051 | |
EO1051 | |
GP1051 | |
JF1051 | |
AZ1056 | |
CN1056 | |
AZ1057 | |
CN1057 | |
AZ1058 | |
CN1058 | |
CN1070 | |
CN1071 | |
CN1072 | |
AQ1077 | |
CF1077 | |
DZ1077 | |
GF1077 | |
IT1077 | |
KS1077 | |
NF1077 | |
PC1077 | |
A1085 | |
T1085 | |
AZ1085 | |
CN1085 | |
EO1085 | |
GP1085 | |
A1093 | |
T1093 | |
A1098 | |
T1098 | |
A1104 | |
T1104 | |
AZ1104 | |
CN1104 | |
EO1104 | |
GP1104 | |
AZ1111 | |
CN1111 | |
AZ1112 | |
CN1112 | |
AZ1113 | |
CN1113 | |
AZ1119 | |
CN1119 | |
EO1119 | |
GP1119 | |
AZ1120 | |
CN1120 | |
EO1120 | |
GP1120 | |
AZ1121 | |
CN1121 | |
EO1121 | |
GP1121 | |
AZ1128 | |
CN1128 | |
AZ1129 | |
CN1129 | |
AZ1130 | |
CN1130 | |
AZ1135 | |
CN1135 | |
AZ1136 | |
CN1136 | |
AZ1137 | |
CN1137 | |
AZ1142 | |
AZ1143 | |
AZ1144 | |
AZ1150 | |
CN1150 | |
EO1150 | |
GP1150 | |
AZ1151 | |
CN1151 | |
EO1151 | |
GP1151 | |
AZ1152 | |
CN1152 | |
EO1152 | |
GP1152 | |
AC1163 | |
BM1163 | |
DF1163 | |
AC1164 | |
BM1164 | |
DF1164 | |
AC1165 | |
BM1165 | |
DF1165 | |
AC1171 | |
BM1171 | |
DF1171 | |
FM1171 | |
AC1172 | |
BM1172 | |
DF1172 | |
FM1172 | |
AC1173 | |
BM1173 | |
DF1173 | |
FM1173 | |
AC1179 | |
BM1179 | |
DF1179 | |
FM1179 | |
HM1179 | |
JV1179 | |
MI1179 | |
OE1179 | |
QC1179 | |
RS1179 | |
SY1179 | |
UB1179 | |
VJ1179 | |
WL1179 | |
AC1180 | |
BM1180 | |
DF1180 | |
FM1180 | |
HM1180 | |
JV1180 | |
MI1180 | |
OE1180 | |
QC1180 | |
RS1180 | |
SY1180 | |
UB1180 | |
VJ1180 | |
WL1180 | |
L1188 | |
Y1188 | |
BD1188 | |
CU1188 | |
EW1188 | |
HB1188 | |
JL1188 | |
LS1188 | |
OA1188 | |
AK1194 | |
BV1194 | |
DN1194 | |
FY1194 | |
HY1194 | |
KG1194 | |
AK1195 | |
BV1195 | |
DN1195 | |
FY1195 | |
HY1195 | |
KG1195 | |
AM1203 | |
CL1203 | |
AM1209 | |
CL1209 | |
FG1209 | |
IE1209 | |
LN1209 | |
OF1209 | |
AM1215 | |
CL1215 | |
FJ1215 | |
AM1216 | |
CL1216 | |
FJ1216 | |
BI1224 | |
DH1224 | |
FQ1224 | |
IA1224 | |
KK1224 | |
MZ1224 | |
BI1225 | |
DH1225 | |
FQ1225 | |
IA1225 | |
KK1225 | |
MZ1225 | |
BI1226 | |
DH1226 | |
FQ1226 | |
IA1226 | |
KK1226 | |
MZ1226 | |
BI1227 | |
DH1227 | |
FQ1227 | |
IA1227 | |
KK1227 | |
MZ1227 | |
BJ1233 | |
DH1233 | |
FP1233 | |
HZ1233 | |
KJ1233 | |
MY1233 | |
BJ1234 | |
DH1234 | |
FP1234 | |
HZ1234 | |
KJ1234 | |
MY1234 | |
BJ1235 | |
DH1235 | |
FP1235 | |
HZ1235 | |
KJ1235 | |
MY1235 | |
BJ1236 | |
DH1236 | |
FP1236 | |
HZ1236 | |
KJ1236 | |
MY1236 | |
AN1241 | |
CM1241 | |
AN1242 | |
CM1242 | |
AN1243 | |
CM1243 | |
AR1249 | |
CZ1249 | |
FI1249 | |
IF1249 | |
KQ1249 | |
OB1249 | |
PZ1249 | |
RZ1249 | |
AR1250 | |
CZ1250 | |
FI1250 | |
IF1250 | |
KQ1250 | |
OB1250 | |
PZ1250 | |
RZ1250 | |
AR1251 | |
CZ1251 | |
FI1251 | |
IF1251 | |
KQ1251 | |
OB1251 | |
PZ1251 | |
RZ1251 | |
AR1252 | |
CZ1252 | |
FI1252 | |
IF1252 | |
KQ1252 | |
OB1252 | |
PZ1252 | |
RZ1252 | |
AR1253 | |
CZ1253 | |
FI1253 | |
IF1253 | |
KQ1253 | |
OB1253 | |
PZ1253 | |
RZ1253 | |
AR1254 | |
CZ1254 | |
FI1254 | |
IF1254 | |
KQ1254 | |
OB1254 | |
PZ1254 | |
RZ1254 | |
AR1255 | |
CZ1255 | |
FI1255 | |
IF1255 | |
KQ1255 | |
OB1255 | |
PZ1255 | |
RZ1255 | |
AR1256 | |
CZ1256 | |
FI1256 | |
IF1256 | |
KQ1256 | |
OB1256 | |
PZ1256 | |
RZ1256 | |
AR1257 | |
CZ1257 | |
FI1257 | |
IF1257 | |
KQ1257 | |
OB1257 | |
PZ1257 | |
RZ1257 | |
AR1258 | |
CZ1258 | |
FI1258 | |
IF1258 | |
KQ1258 | |
OB1258 | |
PZ1258 | |
RZ1258 | |
AN1264 | |
CM1264 | |
EU1264 | |
AN1265 | |
CM1265 | |
EU1265 | |
AN1266 | |
CM1266 | |
EU1266 | |
AN1267 | |
CM1267 | |
EU1267 | |
AN1268 | |
CM1268 | |
EU1268 | |
AN1275 | |
CC1275 | |
DT1275 | |
GE1275 | |
AN1276 | |
CC1276 | |
DT1276 | |
GE1276 | |
AN1277 | |
CC1277 | |
DT1277 | |
GE1277 | |
AN1278 | |
CC1278 | |
DT1278 | |
GE1278 | |
AN1279 | |
CC1279 | |
DT1279 | |
GE1279 | |
AN1280 | |
CC1280 | |
DT1280 | |
GE1280 | |
AN1285 | |
CC1285 | |
AN1286 | |
CC1286 | |
BK1292 | |
DR1292 | |
GC1292 | |
JN1292 | |
MD1292 | |
OR1292 | |
QO1292 | |
SR1292 | |
BK1293 | |
DR1293 | |
GC1293 | |
JN1293 | |
MD1293 | |
OR1293 | |
QO1293 | |
SR1293 | |
BK1294 | |
DR1294 | |
GC1294 | |
JN1294 | |
MD1294 | |
OR1294 | |
QO1294 | |
SR1294 | |
BK1295 | |
DR1295 | |
GC1295 | |
JN1295 | |
MD1295 | |
OR1295 | |
QO1295 | |
SR1295 | |
AN1300 | |
CC1300 | |
AN1301 | |
CC1301 | |
AN1302 | |
CC1302 | |
AU1310 | |
DB1310 | |
FZ1310 | |
IU1310 | |
LZ1310 | |
OP1310 | |
QV1310 | |
ST1310 | |
UH1310 | |
AU1311 | |
DB1311 | |
FZ1311 | |
IU1311 | |
LZ1311 | |
OP1311 | |
QV1311 | |
ST1311 | |
UH1311 | |
AU1312 | |
DB1312 | |
FZ1312 | |
IU1312 | |
LZ1312 | |
OP1312 | |
QV1312 | |
ST1312 | |
UH1312 | |
AU1313 | |
DB1313 | |
FZ1313 | |
IU1313 | |
LZ1313 | |
OP1313 | |
QV1313 | |
ST1313 | |
UH1313 | |
Q1319 | |
AH1319 | |
BY1319 | |
EJ1319 | |
GX1319 | |
JZ1319 | |
AU1325 | |
DB1325 | |
FL1325 | |
IK1325 | |
KR1325 | |
OC1325 | |
QB1325 | |
SA1325 | |
TJ1325 | |
UX1325 | |
AU1326 | |
DB1326 | |
FL1326 | |
IK1326 | |
KR1326 | |
OC1326 | |
QB1326 | |
SA1326 | |
TJ1326 | |
UX1326 | |
AX1331 | |
CP1331 | |
EX1331 | |
AX1332 | |
CP1332 | |
EX1332 | |
O1337 | |
AR1337 | |
DP1337 | |
AR1343 | |
CZ1343 | |
FI1343 | |
IF1343 | |
AR1344 | |
CZ1344 | |
FI1344 | |
IF1344 | |
AR1345 | |
CZ1345 | |
FI1345 | |
IF1345 | |
AR1346 | |
CZ1346 | |
FI1346 | |
IF1346 | |
AR1347 | |
CZ1347 | |
FI1347 | |
IF1347 | |
AR1348 | |
CZ1348 | |
FI1348 | |
IF1348 | |
AR1353 | |
CZ1353 | |
AR1354 | |
CZ1354 | |
O1364 | |
AG1364 | |
BX1364 | |
EI1364 | |
O1370 | |
AG1370 | |
BX1370 | |
EI1370 | |
GW1370 | |
JY1370 | |
MO1370 | |
PF1370 | |
AN1376 | |
CM1376 | |
FI1376 | |
IF1376 | |
LO1376 | |
OI1376 | |
QR1376 | |
SS1376 | |
UI1376 | |
VZ1376 | |
XD1376 | |
YD1376 | |
YY1376 | |
ZR1376 | |
AAM1376 | |
AAW1376 | |
ABD1376 | |
ABH1376 | |
ABJ1376 | |
ABL1376 | |
CA1381 | |
EM1381 | |
HJ1381 | |
CA1384 | |
EM1384 | |
HJ1384 | |
KL1384 | |
CA1385 | |
EM1385 | |
HJ1385 | |
KL1385 | |
CA1386 | |
EM1386 | |
HJ1386 | |
KL1386 | |
CA1387 | |
EM1387 | |
HJ1387 | |
KL1387 | |
CA1394 | |
EM1394 | |
GM1394 | |
JS1394 | |
MG1394 | |
OW1394 | |
QM1394 | |
SP1394 | |
TV1394 | |
VQ1394 | |
WN1394 | |
XP1394 | |
CA1395 | |
EM1395 | |
GM1395 | |
JS1395 | |
MG1395 | |
OW1395 | |
QM1395 | |
SP1395 | |
TV1395 | |
VQ1395 | |
WN1395 | |
XP1395 | |
CA1396 | |
EM1396 | |
GM1396 | |
JS1396 | |
MG1396 | |
OW1396 | |
QM1396 | |
SP1396 | |
TV1396 | |
VQ1396 | |
WN1396 | |
XP1396 | |
CA1397 | |
EM1397 | |
GM1397 | |
JS1397 | |
MG1397 | |
OW1397 | |
QM1397 | |
SP1397 | |
TV1397 | |
VQ1397 | |
WN1397 | |
XP1397 | |
CA1402 | |
EM1402 | |
HJ1402 | |
KL1402 | |
CA1403 | |
EM1403 | |
HJ1403 | |
KL1403 | |
CA1404 | |
EM1404 | |
HJ1404 | |
KL1404 | |
CA1405 | |
EM1405 | |
HJ1405 | |
KL1405 | |
CA1412 | |
EK1412 | |
HL1412 | |
KM1412 | |
CA1413 | |
EK1413 | |
HL1413 | |
KM1413 | |
CA1414 | |
EK1414 | |
HL1414 | |
KM1414 | |
CA1415 | |
EK1415 | |
HL1415 | |
KM1415 | |
BZ1418 | |
BZ1419 | |
BZ1420 | |
BZ1421 | |
O1431 | |
AG1431 | |
BX1431 | |
EI1431 | |
M1439 | |
AF1439 | |
BW1439 | |
EH1439 | |
GT1439 | |
JX1439 | |
MN1439 | |
PD1439 | |
RC1439 | |
SW1439 | |
BT1444 | |
BT1445 | |
BT1446 | |
BU1451 | |
BU1452 | |
BT1455 | |
EF1455 | |
HH1455 | |
KI1455 | |
NS1455 | |
QD1455 | |
BT1456 | |
EF1456 | |
HH1456 | |
KI1456 | |
NS1456 | |
QD1456 | |
BT1457 | |
EF1457 | |
HH1457 | |
KI1457 | |
NS1457 | |
QD1457 | |
BT1463 | |
EF1463 | |
HD1463 | |
KH1463 | |
BT1464 | |
EF1464 | |
HD1464 | |
KH1464 | |
BT1465 | |
EF1465 | |
HD1465 | |
KH1465 | |
BT1466 | |
EF1466 | |
HD1466 | |
KH1466 | |
BT1467 | |
EF1467 | |
HD1467 | |
KH1467 | |
BT1468 | |
EF1468 | |
HD1468 | |
KH1468 | |
J1476 | |
AD1476 | |
BT1476 | |
EF1476 | |
GN1476 | |
JW1476 | |
ML1476 | |
PB1476 | |
RB1476 | |
SV1476 | |
UD1476 | |
VV1476 | |
WV1476 | |
XV1476 | |
YN1476 | |
ZI1476 | |
ZX1476 | |
AAO1476 | |
AL1482 | |
CB1482 | |
DQ1482 | |
GB1482 | |
IP1482 | |
KT1482 | |
NG1482 | |
PN1482 | |
RD1482 | |
SN1482 | |
TU1482 | |
UY1482 | |
WH1482 | |
XE1482 | |
XW1482 | |
YO1482 | |
ZD1482 | |
ZS1482 | |
AAJ1482 | |
AAU1482 | |
AL1483 | |
CB1483 | |
DQ1483 | |
GB1483 | |
IP1483 | |
KT1483 | |
NG1483 | |
PN1483 | |
RD1483 | |
SN1483 | |
TU1483 | |
UY1483 | |
WH1483 | |
XE1483 | |
XW1483 | |
YO1483 | |
ZD1483 | |
ZS1483 | |
AAJ1483 | |
AAU1483 | |
AL1484 | |
CB1484 | |
DQ1484 | |
GB1484 | |
IP1484 | |
KT1484 | |
NG1484 | |
PN1484 | |
RD1484 | |
SN1484 | |
TU1484 | |
UY1484 | |
WH1484 | |
XE1484 | |
XW1484 | |
YO1484 | |
ZD1484 | |
ZS1484 | |
AAJ1484 | |
AAU1484 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Sub consolidate() | |
Dim Destiny As Workbook | |
Set Destiny = ThisWorkbook | |
Dim Data As Workbook | |
Dim Path As String | |
Dim mrs As Variant | |
mrs = Array( _ | |
"1 HUANUCO", _ | |
"2 AMARILIS", _ | |
"3 CHINCHAO", _ | |
"4 CHURUBAMBA", _ | |
"5 MARGOS", _ | |
"6 HUANCAPALLAC", _ | |
"7 SAN FRANCISCO DE CAYRAN", _ | |
"8 SAN PEDRO DE CHAULAN", _ | |
"9 SANTA MARIA DE VALLE", _ | |
"10 YARUMAYO", _ | |
"11 PILLCOMARCA", _ | |
"12 YACUS", _ | |
"13 SAN PABLO DE PILLAO" _ | |
) | |
Dim mr As Variant | |
Dim oFSO As Object | |
Dim oFolder As Object | |
Dim oFile As Object | |
Dim mainDirectory As String | |
Set oFSO = CreateObject("Scripting.FileSystemObject") | |
mainDirectory = GetFolderPath | |
Dim currentRow As Integer | |
Set firstCell = Application.InputBox(prompt:="Seleccione primera celda donde poner los datos:", Type:=8) | |
currentRow = firstCell.Row | |
For Each mr In mrs | |
Debug.Print mainDirectory & "\" & mr | |
Set oFolder = oFSO.GetFolder(mainDirectory & "\" & mr) | |
For Each oFile In oFolder.Files | |
Set Data = Workbooks.Open(oFile.Path) | |
Debug.Print "- " & currentRow & " " & oFile.Name | |
CopyValues Data, Destiny, currentRow | |
Data.Close savechanges:=False | |
currentRow = currentRow + 1 | |
Next oFile | |
currentRow = currentRow + 1 | |
Next mr | |
MsgBox "SE COMPLETO LA CONSOLIDACION DE DATOS" | |
End Sub | |
Sub CopyValues(Data, Destiny, DestinyInitRow) | |
Dim Selection As Range | |
Dim Cel As Range | |
Dim Counter As Integer | |
Dim originCells As Variant | |
originCells = Array( _ | |
"G12", "J12", "N12", "P12", "R12", _ | |
"D13", "G13", "J13", "P13", "R13", _ | |
"G16", "J16", "N16", "P16", "R16", _ | |
"G17", "J17", "N17", "P17", "R17", _ | |
"G18", "J18", "N18", "P18", "R18", _ | |
"G23", "J23", "N23", "P23", "R23", _ | |
"H28", "H29", "H30", "H31", "H32", "H33", _ | |
"F39", "J39", "F40", "J40", "F41", "J41", "F42", "J42", "F43", "J43", "F44", "J44", "F45", "J45", "F46", "J46", "F47", "J47", _ | |
"F53", "J53", "F54", "J54", "F55", "J55", "F56", "J56", "F57", "J57", "F58", "J58", "F59", "J59", "F60", "J60", "F61", "J61", _ | |
"F67", "J67", "F68", "J68", "F69", "J69", "F70", "J70", "F71", "J71", "F72", "J72", "F73", "J73", "F74", "J74", _ | |
"F81", "J81", "M81", "Q81", "S81", "U81", _ | |
"F82", "J82", "M82", "Q82", "S82", "U82", _ | |
"F83", "J83", "M83", "Q83", "S83", "U83", _ | |
"F84", "J84", "M84", "Q84", "S84", "U84", _ | |
"F85", "J85", "M85", "Q85", "S85", "U85", _ | |
"F86", "J86", "M86", "Q86", "S86", "U86", _ | |
"F87", "J87", "M87", "Q87", "S87", "U87", _ | |
"F88", "J88", "M88", "Q88", "S88", "U88", _ | |
"E94", "E95", "E96", "E97" _ | |
) | |
Set Selection = Destiny.Sheets(1).Range("D" & DestinyInitRow & ":EM" & DestinyInitRow) | |
For Each Cel In Selection.Cells | |
Cel.Value = Data.Sheets(1).Range(originCells(Counter)) | |
If Len(Cel.Value) < 1 Then | |
Cel.Value = 0 | |
End If | |
Counter = Counter + 1 | |
Next Cel | |
End Sub | |
Function GetFolderPath() As String | |
Dim fldr As FileDialog | |
Dim sItem As String | |
Set fldr = Application.FileDialog(msoFileDialogFolderPicker) | |
With fldr | |
.Title = "SELECCIONA LA CARPETA DE DATOS PARA SALUD FAMILIAR" | |
.AllowMultiSelect = False | |
.InitialFileName = Application.DefaultFilePath | |
If .Show <> -1 Then GoTo NextCode | |
sItem = .SelectedItems(1) | |
End With | |
NextCode: | |
GetFolderPath = sItem | |
Set fldr = Nothing | |
End Function |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment