0

私の目標は、特別にフォーマットされた日付を長い文字列の一部として含めることです。

基本フォーマット:yyyy.mm.dd。

目標の形式:yyyy / mm / dd

だから私はグーグルで検索し、このサイトに行き、この答えを見つけました:

String = Format(Date, "yyyy/mm/dd")

ただし、機能していません。まだ「yyyy.mm.dd」が表示されます。フォーマット。

正規表現を使用して文字を切り替えるソリューション(Linux OSのストリームエディターで行う方法など)も見つけましたが、余分な機能を使用せずにソリューションを見つけたいと思います。

これまでのところ、私はあまりエレガントではない解決策を考え出しました。

CurYear = Year(Date)
CurMonth = Month(Date)
    If CurMonth < 10 Then
        CurMonth = "0" & CurMonth
    End If
CurDay = Day(Date)
     If CurDay < 10 Then
        CurDay = "0" & CurDay
    End If

Today = CurYear & "/" & CurMonth & "/" & CurDay
4

2 に答える 2

0

「.」を置き換えるだけでよいことは理解しています。と '/'。したがってReplace、機能が最適です:

myString = Replace(Date, ".", "/")

コメント後に編集:

データ文字列の固定長がある場合は、次のようにできます。

myString = Left(Replace(Date, ".", "/"), 10)

その結果、最後のシンボルがカットされます。

于 2013-03-19T12:21:12.050 に答える
0

変更を強制するセル式は次のようになります。

=TEXT(A1,"yyyy/mm/dd")

vba の使用:

サブ DateFix()

Dim dtStart As Date
Dim strFinish As String

    dtStart = ActiveCell.Value

    strFinish = Format(dtStart, "yyyy/mm/dd")

    MsgBox strFinish

サブ終了

于 2013-03-19T12:31:32.013 に答える