Identifying Concentric Square Loops Special Character for Find & Replace

Guessed · #5 07-08-2024, 03:43 PM

You could also use a macro to find out the ascii or asciiWide values to avoid having to use other websites to convert between hex and decimal

Code:

Sub WhatChar()
  Dim aChar As Range, sReport As String
  sReport = "Char" & vbTab & "Asc" & vbTab & "AscW" & vbCr
  For Each aChar In Selection.Range.Characters
    sReport = sReport & aChar & vbTab & Asc(aChar) & vbTab & AscW(aChar) & vbCr
  Next aChar
  MsgBox sReport, vbOKOnly, "Selected characters"
End Sub

Sub InsertUnicodeChar()
  Selection.Range.InsertAfter ChrW(8203)
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Find-and-Replace Special Characters	davidvargas72	Word VBA	8	01-28-2023 10:03 PM
Find/Replace of funny character	WJSwanepoel	Word	2	06-03-2020 01:58 AM
multiple find and replace in vba for special words	kvnrao	Word VBA	7	11-02-2018 06:28 PM
Infinite loops occurring in find and replace functions in word macro	Thefirstfish`	Word VBA	5	04-06-2017 07:18 PM
Find & replace a character in a particuler position	klllmmm	Excel	1	07-27-2016 11:27 PM