質問: excel 文字列から6桁の数値の抽出 excelで文字列のセルから6桁の番号のみを違うセルに抽出する方法を教えてほしいです。 例 太郎様 123456 抽出→123456 23-456789 太郎様 抽出→456789 45担当分 45-567891 抽出→567891 678912 23太郎様 抽出→678912 文字列の書き方は共通性がなく、いくつか関数を試したのですが、関数が適応できません。(マクロはやったことがなく、試していません) 何卒よろしくお願いいたします。
回答: こんばんは! 万一6桁以上数字が続いていても6桁でやめても良いのですね? vbaになりますが、一例です。 元データはa列の1行目からあり、b列に表示するとします。 sub sample1() dim i as long, k as long dim mystr as string for i = 1 to cells(rows.count, "a").end(xlup).row for k = 1 to len(cells(i, "a")) - 5 if mid(strconv(cells(i, "a"), vbnarrow), k, 1) like "[0-9]" then mystr = mid(strconv(cells(i, "a"), vbnarrow), k, 6) if isnumeric(mystr) then cells(i, "b") = mystr exit for end if end if next k next i end sub こんな感じではどうでしょうか?m(_ _)m