0

申し訳ありませんが、MsAccess に関する別の質問です。

私はデータセットを持っています:

Phone Number
444-514-9864
555-722-2273
333-553- 4535
000-000- 0000
550-322-6888
444-896-5371
322-533-1448
222.449.2931
222.314.5208
222.745.6001

(222) 896-5371 のようにする必要があります。Ms Access または MsExcel でどのように行うのですか?

4

3 に答える 3

1

Instr、mid、Left、Right 関数を使用して、これを機能させることができます。私は1つの例を作成しました.msdnを使用すると、残りを理解できるはずです

Dim OldPhoneNumber As String
Dim NewPhoneNumber As String
Dim PreFix As String
Dim PreFix2 As String

' You can replace this line in Access, just make sure the full phone number is stored in "OldPhoneNumber"
OldPhoneNumber = Worksheets(<worksheet name>).Range(<cell name>).Value 


PreFix = Left(OldPhoneNumber, InStr(1, OldPhoneNumber, "-", 1))
PreFix2 = Left(OldPhoneNumber, InStr(1, OldPhoneNumber, "-", 1) - 1)

NewPhoneNumber = Replace(OldPhoneNumber, PreFix, "(" & PreFix2 & ") ")

Debug.Print (NewPhoneNumber)

すべての電話番号が同じようにフォーマットされているわけではないため、フォーマットされた電話番号ごとに異なるルールを作成する必要があります ( 「-」をチェックするルールと「.」をチェックするルールが必要です)。スペースを除外する

于 2013-09-25T06:31:58.660 に答える
0

入力マスクは新しいデータに対してのみ機能します。既存のデータを目的の形式と一致するように更新するには、マクロまたは関数を作成する必要があります。

于 2014-10-21T12:08:00.247 に答える