Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.word.tables
|
|||
|
|||
Newbie Question on on tables
I would like to print out a table which has the sequence in descending
alphabetical order in the first column as follows:- 1A 1B 1C 2A 2B 2C 3A ...etc until 41C Thereafter , I would like the sequence to go:- 42A 42B 42C 42D 42E 42F 43A ....etc until 54F Could anyone tell me how to arrange this , please ? B.N. |
#2
Posted to microsoft.public.word.tables
|
|||
|
|||
Newbie Question on on tables
If you run a macro containing the following code, it will insert that
sequence of numbers into the cells in the first column of the table: Dim i As Long, j As Long, k As Long Dim atable As Table Set atable = Selection.Tables(1) k = 1 For i = 1 To 123 Step 3 For j = 1 To 3 atable.Cell(i + j - 1, 1).Range.InsertBefore k & Chr(64 + j) Next j k = k + 1 Next i k = 42 For i = 124 To 201 Step 6 For j = 1 To 6 atable.Cell(i + j - 1, 1).Range.InsertBefore k & Chr(64 + j) Next j k = k + 1 Next i -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP wrote in message ... I would like to print out a table which has the sequence in descending alphabetical order in the first column as follows:- 1A 1B 1C 2A 2B 2C 3A ..etc until 41C Thereafter , I would like the sequence to go:- 42A 42B 42C 42D 42E 42F 43A ...etc until 54F Could anyone tell me how to arrange this , please ? B.N. |
#3
Posted to microsoft.public.word.tables
|
|||
|
|||
Newbie Question on on tables
On Mon, 4 Dec 2006 22:43:17 +0100, "Doug Robbins - Word MVP"
wrote: If you run a macro containing the following code, it will insert that sequence of numbers into the cells in the first column of the table: Dim i As Long, j As Long, k As Long Dim atable As Table Set atable = Selection.Tables(1) k = 1 For i = 1 To 123 Step 3 For j = 1 To 3 atable.Cell(i + j - 1, 1).Range.InsertBefore k & Chr(64 + j) Next j k = k + 1 Next i k = 42 For i = 124 To 201 Step 6 For j = 1 To 6 atable.Cell(i + j - 1, 1).Range.InsertBefore k & Chr(64 + j) Next j k = k + 1 Next i Mr Robbins , Thank you for the prompt reply. However , I know nothing about running macros as I'm afraid I've never used them before. I have Word 2000 and have read the Help file which tells me to go to Tools Macro Record New Macro but that's as far as I've got. Could you tell me what to do after that, please ? I would like to print out a page with the symbols mentioned running down the left hand side of the page with each symbol , 1A,1B ...etc separated from each other with a line across the page. regards, B.N. |
#4
Posted to microsoft.public.word.tables
|
|||
|
|||
Newbie Question on on tables
See the article "What do I do with macros sent to me by other newsgroup
readers to help me out?" http://www.word.mvps.org/FAQs/Macros...eateAMacro.htm -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP wrote in message ... On Mon, 4 Dec 2006 22:43:17 +0100, "Doug Robbins - Word MVP" wrote: If you run a macro containing the following code, it will insert that sequence of numbers into the cells in the first column of the table: Dim i As Long, j As Long, k As Long Dim atable As Table Set atable = Selection.Tables(1) k = 1 For i = 1 To 123 Step 3 For j = 1 To 3 atable.Cell(i + j - 1, 1).Range.InsertBefore k & Chr(64 + j) Next j k = k + 1 Next i k = 42 For i = 124 To 201 Step 6 For j = 1 To 6 atable.Cell(i + j - 1, 1).Range.InsertBefore k & Chr(64 + j) Next j k = k + 1 Next i Mr Robbins , Thank you for the prompt reply. However , I know nothing about running macros as I'm afraid I've never used them before. I have Word 2000 and have read the Help file which tells me to go to Tools Macro Record New Macro but that's as far as I've got. Could you tell me what to do after that, please ? I would like to print out a page with the symbols mentioned running down the left hand side of the page with each symbol , 1A,1B ...etc separated from each other with a line across the page. regards, B.N. |
#5
Posted to microsoft.public.word.tables
|
|||
|
|||
Newbie Question on on tables
On Tue, 5 Dec 2006 05:45:35 +0100, "Doug Robbins - Word MVP"
wrote: See the article "What do I do with macros sent to me by other newsgroup readers to help me out?" http://www.word.mvps.org/FAQs/Macros...eateAMacro.htm Thanks, I'll have a look. B.N. |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Tables print distorted (vertically stretched) | Tables | |||
Complete newbie question | Mailmerge | |||
Question about tables. | New Users | |||
NewBie Question 2 Please Help | New Users | |||
Newbie document question please | New Users |