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 |
Trim Find Issue
Instead of looking at xlwhole, maybe looking at xlpart would be sufficient.
Arturo wrote: 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 -- Dave Peterson |
All times are GMT +1. The time now is 03:59 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com