2

Excel スプレッドシートに最大 300 個の文字列があります。

それぞれの長さは異なりますが、すべて同じ形式です。

0033",@"0103",@"0133",@"0203",@"0233", nil

各数値の中央にコロンを追加する必要があります。たとえば、上記の例は次のようになります。

00:33",@"01:03",@"01:33",@"02:03",@"02:33", nil

さまざまな VBA 関数を調査しましたが、文字列に文字を追加する関数が見つかりません。おそらく、Excel でこれを行う簡単な方法はありますか?

4

1 に答える 1

6

この関数をモジュールに追加します。

Function InsertColon(ByVal original As String) As String
    Dim re As Object
    Set re = CreateObject("vbscript.regexp")
    re.Pattern = "(\d\d)(\d\d)"
    re.Global = True
    InsertColon = re.Replace(original, "$1:$2")
End Function

これで、式として簡単に使用できます。たとえば、セル A1 に元の文字列が含まれていて、書式設定された値をセル A2 に表示する場合は、セル A2 に次の式を入力します。

=InsertColon(A1)
于 2012-05-17T15:27:40.927 に答える