Substring to replace string

[Andrew Slentz]

Andrew

*** Sent via Devdex http://www.devdex.com ***
Don't just participate in USENET...get rewarded for it!

 

[Frank Kabel]

Hi
try something like

with activesheet.range("A1")
.value = left(.value,5)
end with