ちょっと生きづらさを抱えた人へ、気持ちを楽にするためのお手紙です。

【VBA】ディレクトリのセパレータ付与

Public Function AddPathSeparator(ByVal path As String)
    If Right(path, 1) <> ChrW(92) Then
        path = path & ChrW(92)
    End If
    AddPathSeparator = path
End Function

コメントを残す

メールアドレスが公開されることはありません。