素人がExcelVBAによる「一人働き方改革」に挑むブログ

不正なファイル名を検出するFunction 作ってみた。 コード コードは次の通り。 リスト１ 標準モジュール Public Function hasProhibitedCharacter( _ ByVal fileName As String) As Boolean '……(1)' hasProhibitedCharacter = True '……(2)' Dim ar As Variant ar = Array("\", "/", ":", "*", "?", "<", ">", "|") '……(3)'…