Trim Find Issue
Dim HeadingsToSync As Variant
Dim rngFound As Range
HeadingsToSync = Array("AA",BB", CC", DD % of Total, "XX AA/BB)
For y = LBound(HeadingsToSync) To UBound(HeadingsToSync)
Set rngFound = Cells.Find(What:=HeadingsToSync(y), _
After:=ActiveCell, _
LookIn:=xlValues, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=True, _
SearchFormat:=False)
==================================
Though the parameters in HeadingsToSyncs array are keyed in correctly,
their counterparts in any given sheet may have trailing or leading spaces.
Where exactly should I place the trim for cell being searched? Will keep
trying but keep getting a runtime error type mismatch 13.
Appreciatively,
Arturo
|