Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Word / Programming / November 2007

Tip: Looking for answers? Try searching our database.

Macro to Sort 5 Column Table

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
Alan in NJ - 12 Nov 2007 19:02 GMT
Rarely writing macros, I forgot how to deal with the pesky end-of-cell mark.
I need a macro to simply alphabetically sort a five-column table.  Some
quick help would be appreciated.

Alan
Doug Robbins - Word MVP - 12 Nov 2007 19:28 GMT
You don't need to worry about the end of cell marker.  If you type Sort into
the Visual Basic Editor and press F1, you will get the following information

     Word Developer Reference
     Table.Sort Method
Sorts the specified table.
expression.Sort(ExcludeHeader, FieldNumber, SortFieldType, SortOrder,
FieldNumber2, SortFieldType2, SortOrder2, FieldNumber3, SortFieldType3,
SortOrder3, CaseSensitive, BidiSort, IgnoreThe, IgnoreKashida,
IgnoreDiacritics, IgnoreHe, LanguageID)

expression   Required. A variable that represents a Table object.

Parameters

     Name Required/Optional Data Type Description
     ExcludeHeader Optional Variant True to exclude the first row from the
sort operation. The default value is False.
     FieldNumber Optional Variant The first field by which to sort.
Microsoft Word sorts by FieldNumber, then by FieldNumber2, and then by
FieldNumber3.
     SortFieldType Optional Variant The sort type for FieldNumber. Can be
one of the WdSortFieldType constants. Some of these constants may not be
available to you, depending on the language support (U.S. English, for
example) that you have selected or installed. The default value is
wdSortFieldAlphanumeric.
     SortOrder Optional Variant The sorting order to use when sorting
FieldNumber. Can be a WdSortOrder constant.
     FieldNumber2 Optional Variant The second field by which to sort.
     SortFieldType2 Optional Variant The sort type for FieldNumber2. Can be
one of the WdSortFieldType constants. Some of these constants may not be
available to you, depending on the language support (U.S. English, for
example) that you have selected or installed. The default value is
wdSortFieldAlphanumeric.
     SortOrder2 Optional Variant The sorting order to use when sorting
FieldNumber2. Can be one WdSortOrder constant.
     FieldNumber3 Optional Variant The third field by which to sort.
     SortFieldType3 Optional Variant The sort type for FieldNumber3. Can be
one of the WdSortFieldType constants. Some of these constants may not be
available to you, depending on the language support (U.S. English, for
example) that you have selected or installed. The default value is
wdSortFieldAlphanumeric.
     SortOrder3 Optional Variant The sorting order to use when sorting
FieldNumber3. Can be one WdSortOrder constant.
     CaseSensitive Optional Variant True to sort with case sensitivity. The
default value is False.
     BidiSort Optional Variant True to sort based on right-to-left language
rules. This argument may not be available to you, depending on the language
support (U.S. English, for example) that you've selected or installed.
     IgnoreThe Optional Variant True to ignore the Arabic character alef
lam when sorting right-to-left language text. This argument may not be
available to you, depending on the language support (U.S. English, for
example) that you've selected or installed.
     IgnoreKashida Optional Variant True to ignore kashidas when sorting
right-to-left language text. This argument may not be available to you,
depending on the language support (U.S. English, for example) that you've
selected or installed.
     IgnoreDiacritics Optional Variant True to ignore bidirectional control
characters when sorting right-to-left language text. This argument may not
be available to you, depending on the language support (U.S. English, for
example) that you've selected or installed.
     IgnoreHe Optional Variant True to ignore the Hebrew character he when
sorting right-to-left language text. This argument may not be available to
you, depending on the language support (U.S. English, for example) that you've
selected or installed.
     LanguageID Optional Variant Specifies the sorting language. Can be one
of the WdLanguageID constants. Refer to the Object Browser for a list of the
WdLanguageID constants.

Example

This example sorts the first table in the active document, excluding the
heading row.

     Visual Basic for Applications
Sub NewTableSort()
   ActiveDocument.Tables(1).Sort ExcludeHeader:=True
End Sub

Signature

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

> Rarely writing macros, I forgot how to deal with the pesky end-of-cell
> mark. I need a macro to simply alphabetically sort a five-column table.
> Some quick help would be appreciated.
>
> Alan
Alan in NJ - 12 Nov 2007 19:45 GMT
Thanks Doug.  I'll give it a try.

alan
> You don't need to worry about the end of cell marker.  If you type Sort
> into the Visual Basic Editor and press F1, you will get the following
[quoted text clipped - 82 lines]
>>
>> Alan
Alan in NJ - 12 Nov 2007 21:32 GMT
Really strange: in Word 2002 I can't get even the example (NewTableSort) to
work.  If I put in a sample one row one column table with a bunch of row, it
sorts a row or two, deleted some rows and moves several individual letters
to the right of the table outside the border.  Any ideas would be
appreaciated.
> Rarely writing macros, I forgot how to deal with the pesky end-of-cell
> mark. I need a macro to simply alphabetically sort a five-column table.
> Some quick help would be appreciated.
>
> Alan
Russ - 14 Nov 2007 19:04 GMT
Alan,
I think you are mixing up the terminology. Doug's info will sort table rows.
Are you trying to sort paragraphs or lines inside table cell(s)?

> Really strange: in Word 2002 I can't get even the example (NewTableSort) to
> work.  If I put in a sample one row one column table with a bunch of row, it
[quoted text clipped - 6 lines]
>>
>> Alan

Signature

Russ

drsmN0SPAMikleAThotmailD0Tcom.INVALID

Alan in NJ - 15 Nov 2007 21:25 GMT
Yes, I am trying to sort lines of text in a table cell.  Any help would be
GREATLY appreciated.
Alan
> Alan,
> I think you are mixing up the terminology. Doug's info will sort table
[quoted text clipped - 14 lines]
>>>
>>> Alan
Alan in NJ - 16 Nov 2007 00:51 GMT
Russ:Found one of your old posts and was able to figure it out.
Thanks.
alan
> Alan,
> I think you are mixing up the terminology. Doug's info will sort table
[quoted text clipped - 14 lines]
>>>
>>> Alan
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.