Excelで知恵をお貸しいただければ幸いです。


今、あるセルに文字列が入力されています。
この文字列は、前半は全角文字、後半は半角英数字で構成されています。

例えば、「東京123」「埼玉056A」「なんばB3」「神奈川」「9S87」のような感じです。
※前半部、後半部が0文字の場合もあります。

このような特性の文字列を、前半部と後半部で2つのセルへ分断したいです。

関数の利用でもVBAの利用でも構いません。
自力では解決策が思いつかず、相談致します。
どうぞよろしくお願い致します。

回答の条件
  • 1人1回まで
  • 13歳以上
  • 登録:2010/11/21 15:15:24
  • 終了:2010/11/21 16:16:00

ベストアンサー

id:jccrh1 No.1

jccrh1回答回数111ベストアンサー獲得回数192010/11/21 16:02:27

ポイント60pt

下記のユーザ関数で対応できるかと思います。

文字分割(文字列,文字種) ※文字種 1:半角、2:全角

例) A1:東京123
   B1:=文字分割(A1,2)
   C1:=文字分割(A1,1)
Function 文字分割(文字列 As String, 文字種 As Integer)
 Dim I As Integer
 For I = 1 To Len(文字列)
   If LenB(StrConv(Mid(文字列, I, 1), vbFromUnicode)) = 文字種 Then
     文字分割 = 文字分割 & Mid(文字列, I, 1)
   End If
 Next I
End Function
id:miku1973

な、なんという神設定!

前回につづきありがとうございます!!

2010/11/21 16:15:52

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません