如何从VBA Microsoft Excel中的字符串中删除文本

I want to trim a string in MS Excel each cell to 100 characters in a column with 500 cells.I want to trim a string in MS Excel each cell t