在VBA中检测空格，可以使用以下几种方法：
使用`Len`函数
通过`Len`函数可以获取单元格中文本的长度。如果长度为1，则单元格可能只包含一个空格或其他不可见字符。
使用`Find`函数
`Find`函数可以用来查找单元格中的特定字符，包括空格。如果找不到空格，则说明单元格中没有空格。
使用`Replace`函数
通过`Replace`函数将单元格中的所有空格替换掉，然后检查替换后的结果是否为空。如果替换后的结果为空，则说明原单元格中只包含空格。
使用`IsNull`函数
`IsNull`函数可以用来检查单元格是否为空。如果单元格为空，则返回`True`。
使用`IsBlank`函数
`IsBlank`函数也可以用来检查单元格是否为空或只包含空白字符。如果单元格为空或只包含空白字符，则返回`True`。
使用条件格式
虽然这不是VBA代码，但可以通过条件格式来快速检查单元格是否为空。选中单元格后，设置条件格式为“值等于空”，这样空单元格会被标记为红色。
```vba
Sub CheckForSpaces（）
Dim cell As Range
Dim foundSpace As Boolean
For Each cell In Selection
If Len（cell.Value） = 1 Then
foundSpace = True
Exit For
End If
If Not IsEmpty（cell.Value） And Not IsError（cell.Value） And cell.Value <> Chr（13） & Chr（7） Then
foundSpace = True
Exit For
End If
Next cell
If foundSpace Then
MsgBox "选中的单元格中包含空格。"
Else
MsgBox "选中的单元格中没有空格。"
End If
End Sub
```
这个代码会遍历选中的单元格，检查每个单元格的长度是否为1（可能只包含空格）或是否包含非空白字符。如果找到空格，则显示消息框提示用户。