Additional string manipulation

Public Function ClipEnd(s As String, CharCount As Long) As String

Clip CharCount characters from the start of the string.
If the string is less than CharCount characters long, returns an empty string.

Public Function ClipStart(s As String, CharCount As Long) As String

Clip CharCount characters from the start of the string.
If the string is less than CharCount characters long, returns an empty string.

Public Function FixedWidthStr(s As String, PadTrimTo As Integer, Optional PadRight As Boolean = False, Optional PadChar As String = " ") As String

Create a fixed width string by truncating or padding to the desired length.

Public Function RemoveFromEnd(str As String, EndsWithString As String) As String

If the string ends with the search string, remove the search string from the end. Otherwise return the passed string unaltered.


Public Function RemoveFromStart(str As String, StartsWithString As String) As String

If the string ends with the search string, remove the search string from the end. Otherwise return the passed string unaltered.


Public Function RemoveFromStartAndEnd(str As String, RemoveStr As String) As String

If the string ends with the search string, remove the search string from the end. If the string start with the search string, remove the search string from the start. The string does not have to be at the start and end to be removed, it may be at either. Otherwise return the passed string unaltered.


Public Function RepeatStr(RepeatCount As Integer, str As String)

Repeat the string RepeatCount times

Public Function SafeMid(s As String, StartChar As Long, Optional Length As Long = 0) As String

Same as the Mid() VBA builtin string function, but if there's an error just return the empty string.

Public Function StartsAndEndsWith(str As String, StartsEndsWithString As String) As Boolean

Does the string start and end with the search string ?