
文字列から英数字のみを抽出する関数を教えていただきたいです。
セルの文字列にはひらがな、カタカナ、数字、アルファベット、記号等を含みます。
色々調べてはみたのですが、数字のみを抽出する関数の説明はたくさんありますが、
アルファベットも含むとなると見つかりませんでした。
数字0~9とアルファベット27個の計37個の文字なので、どうにか関数でできると思うのですが。
具体的には下記のようにしたいのです。
●A列
今日iPhone5をauで購入
最新のNEWSを15時~PCで見る
Moonshotを生み出す「Google X」
●B列にこう表示したいのです。
iPhone5au
NEWS15PC
MoonshotGoogleX
スペースは残ったままでも結構です。
詳しい方、どうかよろしくお願いいたします。
No.2ベストアンサー
- 回答日時:
>数字のみを抽出する関数の説明はたくさんありますが
文字列の中に数字が「一塊だけ」ある場合の説明は多分沢山ありますが、(今回のご質問のように)「文字数字文字数字文字数字」と不定数入り混じってる場合の数式は、全く見つからなかったと思いますよ。
たとえば「英数字が最大限3カタマリまで」といった制約を付けて無理矢理関数をくっつける事は出来なくはありませんが、正直不細工ですし、そもそもあんまり現実的じゃありません。
手順:
ALT+F11を押す
現れた画面で挿入メニューから標準モジュールを挿入する
現れたシートに下記をコピー貼り付ける
public function myf(a) as string
dim i as long
for i = 1 to len(a)
if mid(a,i,1) like "[0-9a-zA-Z ]" then
myf = myf & mid(a,i,1)
end if
next i
end function
ファイルメニューから終了してエクセルに戻る
任意のセルに元の言葉を記入し、
=myf(A1)
のように計算する。
やはり、関数では厳しいようですね。
教えていただいたマクロであっさりと思うようにできました。
心から感謝いたします。
ありがとうございました。
No.4
- 回答日時:
行数分-3文字までなら対応可能です。
C列は空白セル
D1セルに
=IF(ISNUMBER(SEARCH(MID($A1,COLUMN(A1),1),"abcdefghijklmnopqrstuvwxyz0123456789")),C1&MID($A1,COLUMN(A1),1),C1&"")
右へオートフィル (80文字までとしてCE1セルまで)
そのまま 下へオートフィル
B1セルに =CE1
フィルハンドルダブルクリック
No.3
- 回答日時:
添付図参照
1.セル C1 に次式を入力して、此れを右方に(A列の最多文字数分だけの列数だけ。此処ではZ列までとした)ズズーッとドラッグ&ペースト(Fig-2)
=IF(COLUMN(A1)>LEN($A1),"",IF(OR(AND(CODE(MID($A1,COLUMN(A1),1))>47,CODE(MID($A1,COLUMN(A1),1))<58),AND(CODE(MID($A1,COLUMN(A1),1))>64,CODE(MID($A1,COLUMN(A1),1))<91),AND(CODE(MID($A1,COLUMN(A1),1))>96,CODE(MID($A1,COLUMN(A1),1))<123)),MID($A1,COLUMN(A1),1),""))
2.セル B1 に次式を入力
=C1&D1&E1&F1&G1&H1&I1&J1&K1&L1&M1&N1&O1&P1&Q1&R1&S1&T1&U1&V1&W1&X1&Y1&Z1
3.範囲 B1:Z1 を下方にズズーッとドラッグ&ペースト

この回答への補足
ご回答ありがとうございました。
A列は60文字程あるので、今回はマクロでやることにしました。
考えていただいて本当にありがとうございました。
No.1
- 回答日時:
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
先着1,000名様に1,000円分もらえる!
教えて!gooから感謝をこめて電子書籍1,000円分プレゼント
-
エクセルでアルファベットか数値の判定をしたいのですが
Excel(エクセル)
-
数値とアルファベットに分ける(エクセル)
Excel(エクセル)
-
文字列からアルファベットを抽出
その他(Microsoft Office)
-
4
Excel 文字列の中から数字だけを削除したい
その他(Microsoft Office)
-
5
エクセル 数値だけ抽出するには?
Excel(エクセル)
-
6
Excel2007でカタカナの文字のみを抽出、表示するには?
その他(Microsoft Office)
-
7
全角・半角混在の文字列から半角文字のみ取り出す
Excel(エクセル)
-
8
エクセルの削除
Excel(エクセル)
-
9
エクセルで、半角文字列を抽出するには
Excel(エクセル)
-
10
エクセルでセルの中身が漢字かどうか識別する方法は?
Excel(エクセル)
-
11
Excel セル内の文字と数字をわけるには??
Excel(エクセル)
-
12
エクセルの関数で、記号などを抽出もしくは削除したい
Excel(エクセル)
-
13
エクセル 数字のみ残したい
Excel(エクセル)
-
14
セル内の文字列が日本語か英語かを厳密に識別したい
Visual Basic(VBA)
-
15
エクセルマクロで日本語を抽出して転記する方法
その他(Microsoft Office)
-
16
エクセルで条件に一致したセルの隣のセルを取得したい
その他(Microsoft Office)
-
17
エクセルでアルファベットと日本語の文字列を分割する方法
Excel(エクセル)
-
18
Excel VBA 半角英数の抽出もしくは全角文字の削除
Excel(エクセル)
-
19
【Access2003】のクエリにて、半角数字のみを取得したいのですが
Excel(エクセル)
-
20
Excel 書式を関数で判断。
Excel(エクセル)
関連するQ&A
- 1 文字列と数字を含むセルから数値のみをとりだす関数と、文字列のみを取り出す関数があれば両方教えてください!
- 2 Excel カタカナと英数字の混在セルでカタカナのみ全角にする
- 3 【関数?】セル中から指定文字列を抽出して別セルに返す
- 4 Excelでカタカナ文字列をひらがな文字列に変換したい。
- 5 エクセルでひらがな・漢字はそのままでカタカナを全角・英数字を半角にする方法
- 6 セル内文章から、英数字のみ取り出す関数を教えてください
- 7 EXCEL セル内の特定の数値のみを抽出したい (関数だけで)
- 8 エクセル、関数でセル内の半角カタカナ漢字、を分けて他のセルへ表示する方法
- 9 特定の列の値を、ひらがな・漢字はそのままで、 カタカナを全角、英数字を半角に変換する
- 10 EXCEL関数 セル内の文字列を検索し、その1つ右の文字列を表示する関数
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
人気Q&Aランキング
-
4
エクセルで、指定の値よりも大...
-
5
別々のシートで&関数を使って文...
-
6
C#のwindowsフォームアプリケー...
-
7
エクセルに入力後、別シートの...
-
8
エクセルで年月日から月日のみへ
-
9
EXCELのcountif関数での大文字...
-
10
【Excel】4つとばしで合計する方法
-
11
自分の左隣のセル
-
12
とびとびのセルの足し算をしたい
-
13
エクセル1行おきのセルを隣の...
-
14
エクセルで年、月をカウントする
-
15
VBA セルをダブルクリック→違...
-
16
エクセルで、A2のセルにA3...
-
17
エクセルで特定のセル内にだけ...
-
18
エクセル2000で常に1つ上のセル...
-
19
セルを結合した時のエクセル集...
-
20
エクセルでエンターを押すと任...
おすすめ情報