please suggest changes in the macro that identifies dimensions and change colors with font and also this have to identity each letter
Option Explicit
Private Const OTHERCOLOR = "0, 0, 0"
Sub CATMain()
Dim txts As Collection
Set txts = getShowTxts()
If txts Is Nothing Then...