Home |
Search |
Today's Posts |
#1
|
|||
|
|||
reading line from table cell into array
Hi,
I want to read a line from a table cell into an array. Just can not figure out how to read the lines into arrays. This is what I´ve got so far from http://mypage.bluewin.ch/reprobst/Wo...htm#Tabellen05 Sub WordTabelleNachEindimensionalenArray1() Dim x() As String Dim oTable As Table, Zelle As Cell If ActiveDocument.Tables.Count = 0 Then MsgBox "Das Dokument enthält keine Tabelle.", vbInformation Exit Sub End If Set oTable = ActiveDocument.Tables(1) ReDim x(1 To oTable.Range.Cells.Count) i = 0 'Oder auch -1, wenn der Array bei "0" beginnen soll For Each Zelle In oTable.Range.Cells i = i + 1 strText = Zelle.Range.Text x(i) = Left(strText, Len(strText) - 2) Next Zelle End Sub I can save the whole cell into the array, but not just one line. How should this be changed? Thanks in advance for every help Rob |
#2
|
|||
|
|||
Hi Rob,
I don't think this will hardly work without using the selection. Before I code something to work with a variety of lines, I'd like to know, whether you need always the same line, lets say line(2), how may lines there are in the cells, whether in each cell in the same number of lines, and whether the line you need can be the last line in a cell. Do lines wrap automatically or do You use linefeed or paragraph marks to enforce wrapping? Helmut Weber MVP Word VBA |
#3
|
|||
|
|||
Sorry, I don't fully understand your goal:
Do you have more than one line of text in a cell, and you want to seperate them? Or, do you want to read the contents of just one row of cells into an array, or ?? Regards Jay |
#4
|
|||
|
|||
"Helmut Weber" schrieb im Newsbeitrag
ups.com... Hi Rob, I don't think this will hardly work without using the selection. Before I code something to work with a variety of lines, I'd like to know, whether you need always the same line, lets say line(2), how may lines there are in the cells, whether in each cell in the same number of lines, and whether the line you need can be the last line in a cell. There is no regularity in the cells. For instance, you can have just three lines in one cell, but in another there are 6 lines, depending on the written data. Did I understand this right? Do lines wrap automatically or do You use linefeed or paragraph marks to enforce wrapping? There are linefeeds seperating the lines. Hope this helps us out Rob |
#5
|
|||
|
|||
"jay M" schrieb im Newsbeitrag
ups.com... Hi Jay Sorry, I don't fully understand your goal: Do you have more than one line of text in a cell, and you want to seperate them? That´s right. My final goal is to seperate the lines, wirte them into an array, and then export it into an excel sheet. That´s why I want to do this. Or, do you want to read the contents of just one row of cells into an array, or ?? Hm, can´t figure out what this means. In one cell I have some lines, and each of it should be written into an array to export them later into excel. Do you know what I mean right now? |
#6
|
|||
|
|||
Hi Robert
answered in ...public.word.vba.general Helmut |
#7
|
|||
|
|||
*** so you look at the contents of each cell, and:
for all cells in o_table if (contents of cell is what I want) then [split cell text at line breaks, put each line into seperate variable] else [check next cell] end if next cell **** right? |
#8
|
|||
|
|||
oops- I should have looked at the responses above- they didn't appear
in the word_tables forum where I found the question! I tend to forget the "split" function (not to confuse with any of the other 'split' operators) - the above is a nice example. |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
double window envelope | Page Layout | |||
How to merge data into a table and keep it's contents in line | Mailmerge | |||
How to wrap text from cell to cell in a table. | Tables | |||
Placing 1st table into a cell within 2nd table | Tables | |||
word table cell resize or word table cell size change or word table change cell size | Tables |