Microsoft Office Forums

Go Back   Microsoft Office Forums > >

 
 
Thread Tools Display Modes
Prev Previous Post   Next Post Next
  #4  
Old 11-18-2015, 01:22 AM
macropod's Avatar
macropod macropod is offline Arrange shortest to longest sentence in Word Windows 7 64bit Arrange shortest to longest sentence in Word Office 2010 32bit
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 22,467
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default

You could run a macro like the following against a selection of paragraphs:
Code:
Sub Demo()
Application.ScreenUpdating = False
Dim Tbl As Table, i As Long
With Selection
  Set Tbl = .Range.ConvertToTable
  With Tbl
    .Columns.Add
    For i = 1 To .Rows.Count
      .Cell(i, 2).Range.Text = Len(.Cell(i, 1).Range.Text)
    Next
    .Sort ExcludeHeader:=False, FieldNumber:=2
    .Columns(2).Delete
    .ConvertToText
  End With
End With
Application.ScreenUpdating = True
End Sub
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote
 



Similar Threads
Thread Thread Starter Forum Replies Last Post
Auto scheduling issue - longest task first? Project_64 Project 3 01-25-2016 01:14 PM
Arrange shortest to longest sentence in Word Delete does not bring second sentence closer to first sentence Andoheb Word 29 07-03-2014 01:48 PM
Arrange shortest to longest sentence in Word First word of sentence IF and then awolf Word VBA 7 03-16-2014 02:40 PM
Arrange shortest to longest sentence in Word Undo Arrange All in Word nineball Word 1 10-11-2013 12:36 PM
I want to lock a sentence in Word smorkette Word 1 02-06-2010 12:57 AM

Other Forums: Access Forums

All times are GMT -7. The time now is 09:14 PM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft