OpenText - mémoire insuffisante

Bonjour Tuan,

Tu travailles sous quelle version d'excel ?
Quel est le type de données de ton fichier ?
Ton fichier représente combien de colonnes et de lignes si il étaient totalement ?

As-tu vérifié... c'est peut être une limite intrinsèque à excel dans ce type d'opération ??


Essaie ce qui suit... est-ce que cela résout ton problème ?
'=================================== L'idée de base fut proposée par P. Penet, mpfe

'---------------------------------------
Sub TransformerUneFichierCSV_TXT()
Dim wb As Workbook, NomFich As Variant
Dim NouvFichierTexte As String

NomFich = "c:classeur1.csv" 'à déterminer
NouvFichierTexte = "c:AAA1.txt" 'à déterminer
Application.ScreenUpdating = False
With Application
'Si tu veux pourvoir le sélectionner toi-même
'active les 2 lignes de code suivantes
'NomFich = Application.GetOpenFilename("Fichiers texte,*.csv;*.txt")
'If NomFich = False Then Exit Sub
Set wb = .Workbooks.Open(NomFich)
wb.Sheets(1).Columns(1).TextToColumns Range("A1"), , , False, , True
wb.SaveAs NouvFichierTexte, xlTextWindows
wb.Close False
End With

End Sub
'===================================
Salutations!




"Tuan" <tuannm@yahoo.com> a écrit dans le message de news:2dbad01c46a85$0d673a00$a501280a@phx.gbl...
Bonjour tout le monde
alors je fai une ptit opentext avec excel sous vba avec
l'enregistreur de macro hors cela doit me crée 68 colonnes
exactement mais au 58eme Array memoire insuffisante
:(
donc si kk1 pouvai m aider ca serai tres gentil !





voila le code c immonde dsl :)


Workbooks.OpenText FileName:= fichier _
JavaTrafficGen.2004.05.16.log" _
, Origin:=xlWindows, StartRow:=1,
DataType:=xlDelimited, TextQualifier _
:=xlDoubleQuote, ConsecutiveDelimiter:=True,
Tab:úlse, Semicolon:=True _
, Comma:úlse, Space:=True, Other:úlse,
FieldInfo:=Array(Array(1, 2), _
Array(2, 2), Array(3, 2), Array(4, 2), Array(5,
2), Array(6, 2), Array(7, 2), Array(8, 2), _
Array(9, 2), Array(10, 2), Array(11, 2), Array(12,
2), Array(13, 2), Array(14, 2), Array(15 _
, 2), Array(16, 2), Array(17, 2), Array(18, 2),
Array(19, 2), Array(20, 2), Array(21, 2), _
Array(22, 2), Array(23, 2), Array(24, 2), Array
(25, 2), Array(26, 2), Array(27, 2), Array( _
28, 2), Array(29, 2), Array(30, 2), Array(31, 2),
Array(32, 2), Array(33, 2), Array(34, 2), _
Array(35, 2), Array(36, 2), Array(37, 2), Array
(38, 2), Array(39, 2), Array(40, 2), Array( _
41, 2), Array(42, 2), Array(43, 2), Array(44, 2),
Array(45, 2), Array(46, 2), Array(47, 2), _
Array(48, 2), Array(49, 2), Array(50, 2), Array
(51, 2), Array(52, 2), Array(53, 2), Array( _
54, 2), Array(55, 2), Array(56, 2), Array(57, 2),
Array(58, 2), Array(59, 2), Array(60, 2), _
Array(61, 2), Array(62, 2), Array(63, 2), Array
(64, 2), Array(65, 2), Array(66, 2), Array( _
67, 2), Array(68, 2))

Bonjour et merci encor de ta réponse

Je suis sous NT et Excel 97, j'ai trouvé sur le site de
microsoft commen contourner leurs limite car en fait la
declaration de tous ces Array prend tro de memoire.
Il me propose de déclarer le tableau avant et de l
utiliser dnas le FieldInfo
sur ce lient

http://support.microsoft.com/default.aspx?scid=kb;en-
us;134826

Mes données sont du texte.

mais maintenant je me prend une erreur dr watson avec
leur "work around" :(
"Exception : violation d'accès adresse etc"
enfin je desespere

========================= ========================= =======
Sub Macro4()

Dim ColumnArray(1 To 100, 1 To 2)
Dim x, i As Integer

For x = 1 To 69
ColumnArray(x, 1) = "bu"
ColumnArray(x, 2) = 2
Next x

'
Workbooks.OpenText FileName:= _
"TrafficGen.2004.05.16.log" _
, Origin:=xlWindows, StartRow:=1,
DataType:=xlDelimited, TextQualifier _
:=xlDoubleQuote, ConsecutiveDelimiter:=True,
Tab:=False, Semicolon:=True _
, Comma:=False, Space:=True, Other:=False,
FieldInfo:=ColumnArray

End Sub
========================= =======================

-----Message d'origine-----
Bonjour Tuan,

Tu travailles sous quelle version d'excel ?
Quel est le type de données de ton fichier ?
Ton fichier représente combien de colonnes et de lignes
si il étaient totalement ?

As-tu vérifié... c'est peut être une limite intrinsèque à
excel dans ce type d'opération ??

Essaie ce qui suit... est-ce que cela résout ton
problème ?

'======================== ============
L'idée de base fut proposée par P. Penet, mpfe

'---------------------------------------
Sub TransformerUneFichierCSV_TXT()
Dim wb As Workbook, NomFich As Variant
Dim NouvFichierTexte As String

NomFich = "c:classeur1.csv" 'à déterminer
NouvFichierTexte = "c:AAA1.txt" 'à déterminer
Application.ScreenUpdating = False
With Application
'Si tu veux pourvoir le sélectionner toi-même
'active les 2 lignes de code suivantes
'NomFich = Application.GetOpenFilename("Fichiers
texte,*.csv;*.txt")

'If NomFich = False Then Exit Sub
Set wb = .Workbooks.Open(NomFich)
wb.Sheets(1).Columns(1).TextToColumns Range
("A1"), , , False, , True

wb.SaveAs NouvFichierTexte, xlTextWindows
wb.Close False
End With

End Sub
'======================== ============

Salutations!




"Tuan" <tuannm@yahoo.com> a écrit dans le message de
news:2dbad01c46a85$0d673a00$a501280a@phx.gbl...

Bonjour tout le monde
alors je fai une ptit opentext avec excel sous vba avec
l'enregistreur de macro hors cela doit me crée 68 colonnes
exactement mais au 58eme Array memoire insuffisante
:(
donc si kk1 pouvai m aider ca serai tres gentil !





voila le code c immonde dsl :)


Workbooks.OpenText FileName:= fichier _
JavaTrafficGen.2004.05.16.log" _
, Origin:=xlWindows, StartRow:=1,
DataType:=xlDelimited, TextQualifier _
:=xlDoubleQuote, ConsecutiveDelimiter:=True,
Tab:=False, Semicolon:=True _
, Comma:=False, Space:=True, Other:=False,
FieldInfo:=Array(Array(1, 2), _
Array(2, 2), Array(3, 2), Array(4, 2), Array(5,
2), Array(6, 2), Array(7, 2), Array(8, 2), _
Array(9, 2), Array(10, 2), Array(11, 2), Array(12,
2), Array(13, 2), Array(14, 2), Array(15 _
, 2), Array(16, 2), Array(17, 2), Array(18, 2),
Array(19, 2), Array(20, 2), Array(21, 2), _
Array(22, 2), Array(23, 2), Array(24, 2), Array
(25, 2), Array(26, 2), Array(27, 2), Array( _
28, 2), Array(29, 2), Array(30, 2), Array(31, 2),
Array(32, 2), Array(33, 2), Array(34, 2), _
Array(35, 2), Array(36, 2), Array(37, 2), Array
(38, 2), Array(39, 2), Array(40, 2), Array( _
41, 2), Array(42, 2), Array(43, 2), Array(44, 2),
Array(45, 2), Array(46, 2), Array(47, 2), _
Array(48, 2), Array(49, 2), Array(50, 2), Array
(51, 2), Array(52, 2), Array(53, 2), Array( _
54, 2), Array(55, 2), Array(56, 2), Array(57, 2),
Array(58, 2), Array(59, 2), Array(60, 2), _
Array(61, 2), Array(62, 2), Array(63, 2), Array
(64, 2), Array(65, 2), Array(66, 2), Array( _
67, 2), Array(68, 2))


.

Bonjour,

Y a-t-il réellement de l'information utile dans ces tableaux de tableaux
?
Le paramètre ne peut-il pas être supprimé ?

Que veux-tu faire précisément, à part ouvrir ton fichier texte ?
Ou l'ouvrir sous quel format ?

alors je fai une ptit opentext avec excel sous vba avec
l'enregistreur de macro hors cela doit me crée 68 colonnes
exactement mais au 58eme Array memoire insuffisante
:(
donc si kk1 pouvai m aider ca serai tres gentil !

voila le code c immonde dsl :)

Workbooks.OpenText FileName:= fichier _
JavaTrafficGen.2004.05.16.log" _
, Origin:=xlWindows, StartRow:=1,
DataType:=xlDelimited, TextQualifier _
:=xlDoubleQuote, ConsecutiveDelimiter:=True,
Tab:úlse, Semicolon:=True _
, Comma:úlse, Space:=True, Other:úlse,
FieldInfo:=Array(Array(1, 2), _
Array(2, 2), Array(3, 2), Array(4, 2), Array(5,
2), Array(6, 2), Array(7, 2), Array(8, 2), _
Array(9, 2), Array(10, 2), Array(11, 2), Array(12,
2), Array(13, 2), Array(14, 2), Array(15 _
, 2), Array(16, 2), Array(17, 2), Array(18, 2),
Array(19, 2), Array(20, 2), Array(21, 2), _
Array(22, 2), Array(23, 2), Array(24, 2), Array
(25, 2), Array(26, 2), Array(27, 2), Array( _
28, 2), Array(29, 2), Array(30, 2), Array(31, 2),
Array(32, 2), Array(33, 2), Array(34, 2), _
Array(35, 2), Array(36, 2), Array(37, 2), Array
(38, 2), Array(39, 2), Array(40, 2), Array( _
41, 2), Array(42, 2), Array(43, 2), Array(44, 2),
Array(45, 2), Array(46, 2), Array(47, 2), _
Array(48, 2), Array(49, 2), Array(50, 2), Array
(51, 2), Array(52, 2), Array(53, 2), Array( _
54, 2), Array(55, 2), Array(56, 2), Array(57, 2),
Array(58, 2), Array(59, 2), Array(60, 2), _
Array(61, 2), Array(62, 2), Array(63, 2), Array
(64, 2), Array(65, 2), Array(66, 2), Array( _
67, 2), Array(68, 2))

--
** Anti-Spam : ajouter [usenet] dans l'objet pour ne pas être rejeté.

Cordialement, Stéphane *** http://www.team-santonum.com
Loisirs, nature, arts, technologie : accueil en Charente-Maritime

Rajoute une ou deux barrette de mémoire..... (juste pour rire) :{)

sinon si t'arrive pas à trouver une sol, une piste :
Workbooks.OpenText FileName:= fichier _

JavaTrafficGen.2004.05.16.log" _
, Origin:=xlWindows, StartRow:=1,
DataType:=xlDelimited, TextQualifier _
etc..

peut-etre tu peut chercher de ce coté la, pour morceller ton importation en plusieurs etapes:
StartRow:Y
mais c'est pas gagné... (pb pr la fin de fichier)

Bonjour tout le monde
alors je fai une ptit opentext avec excel sous vba avec
l'enregistreur de macro hors cela doit me crée 68 colonnes
exactement mais au 58eme Array memoire insuffisante
:(
donc si kk1 pouvai m aider ca serai tres gentil !





voila le code c immonde dsl :)


Workbooks.OpenText FileName:= fichier _
JavaTrafficGen.2004.05.16.log" _
, Origin:=xlWindows, StartRow:=1,
DataType:=xlDelimited, TextQualifier _
:=xlDoubleQuote, ConsecutiveDelimiter:=True,
Tab:úlse, Semicolon:=True _
, Comma:úlse, Space:=True, Other:úlse,
FieldInfo:=Array(Array(1, 2), _
Array(2, 2), Array(3, 2), Array(4, 2), Array(5,
2), Array(6, 2), Array(7, 2), Array(8, 2), _
Array(9, 2), Array(10, 2), Array(11, 2), Array(12,
2), Array(13, 2), Array(14, 2), Array(15 _
, 2), Array(16, 2), Array(17, 2), Array(18, 2),
Array(19, 2), Array(20, 2), Array(21, 2), _
Array(22, 2), Array(23, 2), Array(24, 2), Array
(25, 2), Array(26, 2), Array(27, 2), Array( _
28, 2), Array(29, 2), Array(30, 2), Array(31, 2),
Array(32, 2), Array(33, 2), Array(34, 2), _
Array(35, 2), Array(36, 2), Array(37, 2), Array
(38, 2), Array(39, 2), Array(40, 2), Array( _
41, 2), Array(42, 2), Array(43, 2), Array(44, 2),
Array(45, 2), Array(46, 2), Array(47, 2), _
Array(48, 2), Array(49, 2), Array(50, 2), Array
(51, 2), Array(52, 2), Array(53, 2), Array( _
54, 2), Array(55, 2), Array(56, 2), Array(57, 2),
Array(58, 2), Array(59, 2), Array(60, 2), _
Array(61, 2), Array(62, 2), Array(63, 2), Array
(64, 2), Array(65, 2), Array(66, 2), Array( _
67, 2), Array(68, 2))

Bonjour Loko,

Comme c'est du VBA enregistré , les array se sont fait sans doute par
défaut,
essaye sans les précisern c'est à dire , tu enléve tout:
FieldInfo:=Array(Array(1, 2), _ .....

Ca pourrais fonctionner

A+



loko wrote:

Rajoute une ou deux barrette de mémoire..... (juste pour rire) :{)

sinon si t'arrive pas à trouver une sol, une piste :
Workbooks.OpenText FileName:= fichier _

JavaTrafficGen.2004.05.16.log" _
, Origin:=xlWindows, StartRow:=1,
DataType:=xlDelimited, TextQualifier _

etc..

peut-etre tu peut chercher de ce coté la, pour morceller ton importation en plusieurs etapes:
StartRow:Y
mais c'est pas gagné... (pb pr la fin de fichier)

Bonjour tout le monde
alors je fai une ptit opentext avec excel sous vba avec
l'enregistreur de macro hors cela doit me crée 68 colonnes
exactement mais au 58eme Array memoire insuffisante
:(
donc si kk1 pouvai m aider ca serai tres gentil !





voila le code c immonde dsl :)


Workbooks.OpenText FileName:= fichier _
JavaTrafficGen.2004.05.16.log" _
, Origin:=xlWindows, StartRow:=1,
DataType:=xlDelimited, TextQualifier _
:=xlDoubleQuote, ConsecutiveDelimiter:=True,
Tab:úlse, Semicolon:=True _
, Comma:úlse, Space:=True, Other:úlse,
FieldInfo:=Array(Array(1, 2), _
Array(2, 2), Array(3, 2), Array(4, 2), Array(5,
2), Array(6, 2), Array(7, 2), Array(8, 2), _
Array(9, 2), Array(10, 2), Array(11, 2), Array(12,
2), Array(13, 2), Array(14, 2), Array(15 _
, 2), Array(16, 2), Array(17, 2), Array(18, 2),
Array(19, 2), Array(20, 2), Array(21, 2), _
Array(22, 2), Array(23, 2), Array(24, 2), Array
(25, 2), Array(26, 2), Array(27, 2), Array( _
28, 2), Array(29, 2), Array(30, 2), Array(31, 2),
Array(32, 2), Array(33, 2), Array(34, 2), _
Array(35, 2), Array(36, 2), Array(37, 2), Array
(38, 2), Array(39, 2), Array(40, 2), Array( _
41, 2), Array(42, 2), Array(43, 2), Array(44, 2),
Array(45, 2), Array(46, 2), Array(47, 2), _
Array(48, 2), Array(49, 2), Array(50, 2), Array
(51, 2), Array(52, 2), Array(53, 2), Array( _
54, 2), Array(55, 2), Array(56, 2), Array(57, 2),
Array(58, 2), Array(59, 2), Array(60, 2), _
Array(61, 2), Array(62, 2), Array(63, 2), Array
(64, 2), Array(65, 2), Array(66, 2), Array( _
67, 2), Array(68, 2))

Bonjour,

As-tu réellement essayé la proposition que je t'ai faite ?

Dans la procédure, attention à cette ligne de code :

wb.Sheets(1).Columns(1).TextToColumns Range("A1"), , , False, , True

Fait une recherche dans l'aide d'excel concernant : "TextToColumns" ... il te sera alors possible d'adapter certains
paramètres "False, True" ... selon le type de séparateur (virgule, point virgule, espace ...) d'éléments qu'utilise ton
fichier.


Salutations!



<anonymous@discussions.microsoft.com> a écrit dans le message de news:2e28201c46b0d$56bf21d0$a501280a@phx.gbl...
Bonjour et merci encor de ta réponse

Je suis sous NT et Excel 97, j'ai trouvé sur le site de
microsoft commen contourner leurs limite car en fait la
declaration de tous ces Array prend tro de memoire.
Il me propose de déclarer le tableau avant et de l
utiliser dnas le FieldInfo
sur ce lient

http://support.microsoft.com/default.aspx?scid=kb;en-
us;134826

Mes données sont du texte.

mais maintenant je me prend une erreur dr watson avec
leur "work around" :(
"Exception : violation d'accès adresse etc"
enfin je desespere

======================================================== Sub Macro4()

Dim ColumnArray(1 To 100, 1 To 2)
Dim x, i As Integer

For x = 1 To 69
ColumnArray(x, 1) = "bu"
ColumnArray(x, 2) = 2
Next x

'
Workbooks.OpenText FileName:= _
"TrafficGen.2004.05.16.log" _
, Origin:=xlWindows, StartRow:=1,
DataType:=xlDelimited, TextQualifier _
:=xlDoubleQuote, ConsecutiveDelimiter:=True,
Tab:úlse, Semicolon:=True _
, Comma:úlse, Space:=True, Other:úlse,
FieldInfo:=ColumnArray

End Sub
===============================================

-----Message d'origine-----
Bonjour Tuan,

Tu travailles sous quelle version d'excel ?
Quel est le type de données de ton fichier ?
Ton fichier représente combien de colonnes et de lignes
si il étaient totalement ?

As-tu vérifié... c'est peut être une limite intrinsèque à
excel dans ce type d'opération ??

Essaie ce qui suit... est-ce que cela résout ton
problème ?

'=================================== >L'idée de base fut proposée par P. Penet, mpfe

'---------------------------------------
Sub TransformerUneFichierCSV_TXT()
Dim wb As Workbook, NomFich As Variant
Dim NouvFichierTexte As String

NomFich = "c:classeur1.csv" 'à déterminer
NouvFichierTexte = "c:AAA1.txt" 'à déterminer
Application.ScreenUpdating = False
With Application
'Si tu veux pourvoir le sélectionner toi-même
'active les 2 lignes de code suivantes
'NomFich = Application.GetOpenFilename("Fichiers
texte,*.csv;*.txt")

'If NomFich = False Then Exit Sub
Set wb = .Workbooks.Open(NomFich)
wb.Sheets(1).Columns(1).TextToColumns Range
("A1"), , , False, , True

wb.SaveAs NouvFichierTexte, xlTextWindows
wb.Close False
End With

End Sub
'=================================== >
Salutations!




"Tuan" <tuannm@yahoo.com> a écrit dans le message de
news:2dbad01c46a85$0d673a00$a501280a@phx.gbl...

Bonjour tout le monde
alors je fai une ptit opentext avec excel sous vba avec
l'enregistreur de macro hors cela doit me crée 68 colonnes
exactement mais au 58eme Array memoire insuffisante
:(
donc si kk1 pouvai m aider ca serai tres gentil !





voila le code c immonde dsl :)


Workbooks.OpenText FileName:= fichier _
JavaTrafficGen.2004.05.16.log" _
, Origin:=xlWindows, StartRow:=1,
DataType:=xlDelimited, TextQualifier _
:=xlDoubleQuote, ConsecutiveDelimiter:=True,
Tab:úlse, Semicolon:=True _
, Comma:úlse, Space:=True, Other:úlse,
FieldInfo:=Array(Array(1, 2), _
Array(2, 2), Array(3, 2), Array(4, 2), Array(5,
2), Array(6, 2), Array(7, 2), Array(8, 2), _
Array(9, 2), Array(10, 2), Array(11, 2), Array(12,
2), Array(13, 2), Array(14, 2), Array(15 _
, 2), Array(16, 2), Array(17, 2), Array(18, 2),
Array(19, 2), Array(20, 2), Array(21, 2), _
Array(22, 2), Array(23, 2), Array(24, 2), Array
(25, 2), Array(26, 2), Array(27, 2), Array( _
28, 2), Array(29, 2), Array(30, 2), Array(31, 2),
Array(32, 2), Array(33, 2), Array(34, 2), _
Array(35, 2), Array(36, 2), Array(37, 2), Array
(38, 2), Array(39, 2), Array(40, 2), Array( _
41, 2), Array(42, 2), Array(43, 2), Array(44, 2),
Array(45, 2), Array(46, 2), Array(47, 2), _
Array(48, 2), Array(49, 2), Array(50, 2), Array
(51, 2), Array(52, 2), Array(53, 2), Array( _
54, 2), Array(55, 2), Array(56, 2), Array(57, 2),
Array(58, 2), Array(59, 2), Array(60, 2), _
Array(61, 2), Array(62, 2), Array(63, 2), Array
(64, 2), Array(65, 2), Array(66, 2), Array( _
67, 2), Array(68, 2))


.

ouais exactement : en redefinissant la 2eme dimension des Array, ca devrait....

entre ce que dis michdenis + le coup du StartRow:=XX, on doit pouvoir arriver à morceller complètement l'importation.
pas le tps d'essayer mais Tuan devrait y arriver maintenant...

d'ailleurs Tuan si tu y arrives comme ca, dis le nous.
ca m'interesse. c'est tjs bon à savoir.

Bonjour Loko,

Comme c'est du VBA enregistré , les array se sont fait sans doute par
défaut,
essaye sans les précisern c'est à dire , tu enléve tout:
FieldInfo:=Array(Array(1, 2), _ .....

Ca pourrais fonctionner

A+



loko wrote:

Rajoute une ou deux barrette de mémoire..... (juste pour rire) :{)

sinon si t'arrive pas à trouver une sol, une piste :
Workbooks.OpenText FileName:= fichier _

JavaTrafficGen.2004.05.16.log" _
, Origin:=xlWindows, StartRow:=1,
DataType:=xlDelimited, TextQualifier _

etc..

peut-etre tu peut chercher de ce coté la, pour morceller ton importation en plusieurs etapes:
StartRow:Y
mais c'est pas gagné... (pb pr la fin de fichier)

Bonjour tout le monde
alors je fai une ptit opentext avec excel sous vba avec
l'enregistreur de macro hors cela doit me crée 68 colonnes
exactement mais au 58eme Array memoire insuffisante
:(
donc si kk1 pouvai m aider ca serai tres gentil !





voila le code c immonde dsl :)


Workbooks.OpenText FileName:= fichier _
JavaTrafficGen.2004.05.16.log" _
, Origin:=xlWindows, StartRow:=1,
DataType:=xlDelimited, TextQualifier _
:=xlDoubleQuote, ConsecutiveDelimiter:=True,
Tab:úlse, Semicolon:=True _
, Comma:úlse, Space:=True, Other:úlse,
FieldInfo:=Array(Array(1, 2), _
Array(2, 2), Array(3, 2), Array(4, 2), Array(5,
2), Array(6, 2), Array(7, 2), Array(8, 2), _
Array(9, 2), Array(10, 2), Array(11, 2), Array(12,
2), Array(13, 2), Array(14, 2), Array(15 _
, 2), Array(16, 2), Array(17, 2), Array(18, 2),
Array(19, 2), Array(20, 2), Array(21, 2), _
Array(22, 2), Array(23, 2), Array(24, 2), Array
(25, 2), Array(26, 2), Array(27, 2), Array( _
28, 2), Array(29, 2), Array(30, 2), Array(31, 2),
Array(32, 2), Array(33, 2), Array(34, 2), _
Array(35, 2), Array(36, 2), Array(37, 2), Array
(38, 2), Array(39, 2), Array(40, 2), Array( _
41, 2), Array(42, 2), Array(43, 2), Array(44, 2),
Array(45, 2), Array(46, 2), Array(47, 2), _
Array(48, 2), Array(49, 2), Array(50, 2), Array
(51, 2), Array(52, 2), Array(53, 2), Array( _
54, 2), Array(55, 2), Array(56, 2), Array(57, 2),
Array(58, 2), Array(59, 2), Array(60, 2), _
Array(61, 2), Array(62, 2), Array(63, 2), Array
(64, 2), Array(65, 2), Array(66, 2), Array( _
67, 2), Array(68, 2))