Vervangt tekst in geladen cellen van het klassieke XLS-werkblad en retourneert het aantal gewijzigde cellen
Syntaxis
function ReplaceText(SearchText: WideString; ReplacementText: WideString): Integer; overload;
function ReplaceText(SearchText: WideString; ReplacementText: WideString; MatchCase: Boolean): Integer; overload;
Opmerkingen
ReplaceText doorzoekt alleen cellen die al in het werkbladmodel bestaan. De overload met twee parameters is niet hoofdlettergevoelig. Geef True for MatchCase when replacements must match the original casing exactly
De methode werkt alleen gewone tekstcellen bij. Formulecellen en niet-tekstcellen blijven ongewijzigd, zodat sjabloon-placeholders kunnen worden vervangen zonder formules of numerieke waarden te herschrijven
Voorbeeld
Changed := Workbook.Sheets[1].ReplaceText(
'[CONTACT]',
'John Smith');
Zie Ook