2022-07-09から1日間の記事一覧
問題 アルファベットと数字で構成された文字列がある。文字列に含まれる数字の和を返す関数 Function SumNumFromStr(tgt As String) As Longを作れ。(例)SumNumFromStr("aaa123") → 6SumNumFromStr("a1b3c5") → 9SumNumFromStr("ssss") → 0SumNumFromStr("") …
セルに記入されたフルパスからファイル名のみを取得したい場合がある。 よくあるやり方は、InStrRev()とMid()を使う方法だ。 Function GetFileName(tgtPath As String) As String Dim pos As Long pos = InStrRev(tgtPath, "\") GetFileName = Mid(tgtPath, …