掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
シート内の漢字、ひらがな、カタカナを一気に削除したい (ID:12162)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
まったく素人で英語(アルファベット)を判断する関数を外してもらいますか? Microsoft visual basic 上で対象のセル範囲を選択して、文字列、数値(数字)の混在したデータから、数値だけを取り出すソースは Sub test03() Dim c As Range, i As Integer For Each c In Selection For i = 1 To Len(c.Value) If IsNumeric(Mid(c.Value, i, 1)) Then c.Offset(, 1).Value = c.Offset(, 1).Value & Mid(c.Value, i, 1) End If Next Next c End Sub
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.