3

. Windows 7 では表示されない Unicode 制御文字を含む文字列を含む Excel スプレッドシートがあります。したがって、制御文字が存在するかどうかを確認して、列の各セルを反復処理するマクロを作成したいと思います。制御文字が見つかった場合は、次の列の隣接するセルに文字名と文字列内にあるインデックスを入力したいと思います。

これは私がこれまでに持っているものです:

Sub control_chr()
'
' control_chr Macro
'

'
    Dim control_characters(Chr(28), Chr(29), Chr(30), Chr(31), Chr(32))
    Dim r As Range, cell As Range

    Set r = Range("F4:F1029")

    For Each cell In r
        For Each Character In control_characters

次のステップは、各文字のセルを検索し、隣接するセルに結果を入力することです。最初に考えたのは、文字が見つかった場所のインデックスを返す SEARCH() 関数を使用することでした。Visual Basic を使用するのはこれが初めてで、どのように進めればよいかわかりません

4

2 に答える 2