excel - Excel - 文字列を URL フレンドリーに変換する

Question

文字列を変換しようとしています 例: All the world's a stage

all-the-worlds-a-stage など、より URL フレンドリーなものに

これまでのところ、小文字を使用してスペースをダッシュ​​に置き換えることができることはわかっていますが、句読点/URLに適していない文字を削除するためのより適切な方法はありますか

Answer 1

Excelで英数字以外の文字を削除する方法

Option Explicit
Function Alpha(rg As Range) As String
Dim i As Integer
If rg.Count <> 1 Then
MsgBox ("Only a single cell allowed as argument")
Exit Function
End If
For i = 1 To Len(rg.Text)
Select Case Asc(Mid(rg.Text, i, 1))
Case 48 To 57, 65 To 90, 97 To 122
Alpha = Alpha & Mid(rg.Text, i, 1)
End Select
Next i
End Function