![]() |
|
|
Thread Tools | Display Modes |
#7
|
|||
|
|||
![]()
Many Thanks, Brian!
Wow! This macro not only works, I can't see it working—bouncing to the end of the document and back again like the one I recorded does. I wonder if I could beg your help fixing the cousin of the macro you rewrote for me? It, too, works in some documents, but not others. I wrote it to help reorder a sentence—moving a block from the middle to the beginning of the sentence and correcting the capitilazation. Like its cousin, I sometimes get an error message, caused because the macro chokes when asked to paste the text it cut. Here's my code: Sub MoveBlockToBeginningOfSentence() ' ' MoveBlockToBeginningOfSentence Macro ' ' Selection.Cut Application.Run MacroName:="Normal.NewMacros.SentenceLeft" Application.Run MacroName:="Normal.NewMacros.CapitalizeNextLetter" Selection.Paste Application.Run MacroName:="Normal.NewMacros.SentenceLeft" Application.Run MacroName:="Normal.NewMacros.CapitalizeNextLetter" End Sub |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
dabbler | Word | 14 | 01-11-2021 09:54 AM |
![]() |
gasparik | Word VBA | 1 | 05-11-2020 05:41 AM |
![]() |
mrplastic | Word VBA | 4 | 12-20-2019 01:25 PM |
![]() |
vincenzo345 | Word VBA | 4 | 12-01-2017 11:25 AM |
![]() |
JACKsparrow | Word VBA | 1 | 03-09-2016 02:47 PM |