零长度字符串Microsoft Access

时间:2014-09-14 07:02:57

标签: string excel ms-access-2010 zero blank-line

在excel中,我有一个文本字符串,其中包含数字和文本,我用公式去掉数字。但是,有时文本字符串可能会以空白开头,所以如果发生这种情况,我使用“”返回空白而不是0.当我将此Excel工作表链接到访问数据库时,它不会让我格式化列作为货币,因为它将“”作为文本以及被剥离的数字作为数字。有关如何解决此问题的解决方案?是否还有另一种方法除了“”使单元格完全空白而不是零长度字符串?

这与我遇到的问题有关: http://support.microsoft.com/kb/162539

1 个答案:

答案 0 :(得分:0)

这是一个快速例程,它将公式减少到它们的值,并将零长度字符串剥离为真正空白的单元格。

Sub strip_zero_length_string()
    Dim c As Long
    With Sheets("Sheet1").Cells(1, 1).CurrentRegion
        .Cells = .Cells.Value
        For c = 1 To .Columns.Count
            .Columns(c).TextToColumns Destination:=.Cells(1, c), _
              DataType:=xlFixedWidth, FieldInfo:=Array(0, 1)
        Next c
    End With
End Sub

我正在使用.CurrentRegion,因此数据块中不会有完全空白的行或列,但在准备导出到数据库时通常就是这种情况。