excel is opening a text File
the array are data for  column index and length of string string to be
converted to a cells

Array(Array(1, 2), Array(2, 4))

text file contents:  "ABCDEFG"

converted to 2 columns
column 1  = "AB"
column 2 = "CDEF"

If you use [Text To Column] ( of DATA menu) you will understand this code.
CMIIW



On Wed, Mar 16, 2011 at 12:04 AM, Skanda <skanda.pokkun...@gmail.com> wrote:

> What does the following code do?especially the array part!
>
> Application.StatusBar = "Please Wait.....Loading " & Trim(Prod) & " Data
> File"
>     Workbooks.OpenText FileName:=FileLoc, Origin _
>         :=xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
>         xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True,
> Semicolon:=False, _
>         Comma:=False, Space:=False, Other:=True, OtherChar:="~",
> 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, 1), Array(14, 1), Array(15, 1), Array(16, 1),
> Array(17, 1), Array(18, 1), _
>               Array(19, 1), Array(20, 1), Array(21, 1), Array(22, 1),
> Array(23, 1), Array(24, 1), _
>               Array(25, 1), Array(26, 1), Array(27, 1), Array(28, 1),
> Array(29, 1), Array(30, 1), _
>               Array(31, 1), Array(32, 1), Array(33, 1), Array(34, 1),
> Array(35, 1), Array(36, 1), _
>               Array(37, 1), Array(38, 1), Array(39, 1), Array(40, 1),
> Array(41, 1), _
>               Array(52, 2))
>
>

-- 
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel

Reply via email to