Thread: [Solved] Delete blank pages
View Single Post
 
Old 09-07-2014, 01:56 AM
Dimsok Dimsok is offline Windows XP Office 2007
Advanced Beginner
 
Join Date: Sep 2014
Location: exUSSR
Posts: 50
Dimsok is on a distinguished road
Default

Quote:
Originally Posted by gmayor View Post
It may be possible, but until you tell us what hidden symbols are involved, we cannot progress further with this. Maybe the following macro will help identify them. Select the character and run the macro.

Code:
Sub AnsiCode()
Dim myData As DataObject
Dim vChar As Variant
Dim sCode As String
    Set myData = New DataObject
    For Each vChar In Selection.Characters
        sCode = sCode & "ChrW(" & AscW(vChar) & ") & "
    Next
    sCode = Left(sCode, Len(sCode) - 3)
    MsgBox sCode & vbCr & vbCr & "Copied to clipboard!"
    myData.SetText sCode
    myData.PutInClipboard
End Sub
Compile error. User defined type not defined.

What hidden symbiols? Just ¶¶¶. Is that possible to delete them in the end of document in one click?
Reply With Quote