访问 VBA - 使用 TextToColumns 将 excel 列格式化为常规

【问题标题】：Access VBA - Format excel column to General using TextToColumns访问 VBA - 使用 TextToColumns 将 excel 列格式化为常规
【发布时间】：2015-06-25 01:56:02
【问题描述】：

我正在尝试使用 Access vba 中的 TextToColumns 在 excel 中格式化列。我想将列（包含 excel 中的日期）格式化为通用格式。运行代码时我没有遇到错误，但列的格式没有改变。

运行格式化的代码摘录如下：

Dim rng as Range
    set rng= oWS.Range("AD:AD")
        rng.TextToColumns Destination:=rng, DataType:=xlFixedWidth,FieldInfo:=Array(0, xlGeneralFormat)

有什么建议吗？谢谢。

【问题讨论】：

标签： excel vba

【解决方案1】：

嗨 mccoydo：我不确定最有效的方法是什么，但是通过添加语句 rng.NumberFormat = "mm/dd/yyyy" 我能够更改范围的格式。

在您的代码中，参数 xlGeneralFormat 看起来很可疑，并且可能有另一种方法可以一举获得您想要的结果。

【讨论】：