文字列を終端から検索するにはRight関数を使用します。
第一引数に対象文字列、第二引数に文字数を指定します。
以下は文字列の最後が¥で終わってない場合メッセージを表示する例です。

If (Right("c:¥tools", 1)) <> "¥" Then
    MsgBox ("¥で終わって下さい")
End If