VBAには、文字列から先頭のスペースを削除するLTrim関数と、末尾のスペースを削除した文字列を返すRTrim関数があります。 もちろん、先頭と末尾の空白をどちらも削除するには、Trim関数を使用することができます。

LTrim関数、RTrimL関数、Trim関数の引数には文字列を指定します。

B2セルの先頭の空白を削除するコードは、

Sub セルの先頭の空白を削除()
    Dim myStr As String
    myStr = Selection.Value
    Selection.Value = LTrim(myStr)
End Sub
    

B2セルを選択して実行すると、先頭の空白が削除されます。

ただし、任意の複数セル範囲の先頭の空白を削除するには、おなじみのFor Each～Nextステートメントで、ひとつずつセルを処理します。 変数には、わかりやすいように日本語でそのままセルと宣言します。慣れている場合は半角英の1文字でcなどで良いでしょう。

コードは次のようになります。

Sub 任意の複数セルの先頭の空白を削除()
    Dim セル As Range
    Dim myStr As String
    For Each セル In Selection
      myStr = セル.Value
      セル.Value = LTrim(myStr)
    Next セル
End Sub
    

先頭の空白を削除したいセル範囲を選択してマクロを実行します。

選択範囲の先頭の空白が削除されました。

選択範囲の末尾の空白だけを削除したければ、RTrim関数を使ってください。

Sub 任意の複数セルの末尾の空白を削除()
    Dim セル As Range
    Dim myStr As String
    For Each セル In Selection
      myStr = セル.Value
      セル.Value = RTrim(myStr)
    Next セル
End Sub