Excel VBA日期格式isse(需要应用过滤器或作为最终结果使用pivot)

时间:2013-09-22 09:28:51

标签: excel-vba vba excel

大家好,问题解决了。

我发现了错误,我正在以值格式选择日期。 并且表格的格式为MM / DD / YYYY格式,因此整个o / p都搞乱了 谢谢你的帮助。


嗨朋友即时面对日期类型的问题。

我编写了一个宏来从工作簿中的各种工作表中获取日期值,然后将其粘贴到另一个工作簿之下。这非常合适。(我还会选择其他各种列以及日期值)

现在将所有数据堆叠在一张纸上,然后将其叠加在另一张纸上。 我想以DD-MM-YY格式格式化日期。 我在下面写了宏。

 Sheets("Overall").Select
    Range("N2").Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.NumberFormat = "0.00"
      Columns("N:N").Select
    Selection.NumberFormat = "dd-mm-yy"

    Selection.TextToColumns Destination:=Range("N1"), DataType:=xlDelimited, _
    TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
    Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
    :=Array(1, 4), TrailingMinusNumbers:=True

现在问题是当我尝试对此数据采用透视或应用过滤器时。 过滤器以MM-DD-YY格式显示日期。 这是错的。 由于这个原因,我无法对这些数据进行调整(因为我必须准备一个显示日间销售的支点)。

我已将系统默认日期格式更改为DD-MM-YY。

但仍然没有运气。 有人能帮我一下吗。 如果需要,我会附上o / p。

寻找解决方案。

提前致谢。

1 个答案:

答案 0 :(得分:0)

Selection.NumberFormat = "dd/mm/yyyy;@"