0

大家好，问题解决了。

我发现了错误，我从中选择了值格式的日期。并且工作表的格式为 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。

寻找解决方案。

提前致谢。

4

1 回答 1

0 
Selection.NumberFormat = "dd/mm/yyyy;@"
于 2013-09-22T16:04:56.950 回答