締切済み

エクセルの枠に一つ一つ入力

2020/08/04 14:49

お世話になります。エクセルにてある一つの枠に「チョコレート、あめ、バナナ、ケーキ゛‥」入力されている文字を枠にそれぞれ一つずつ「チョコレート」「あめ」「バナナ」「ケーキ」と分けて入力していきたいのですが可能でしょうか。もし方法がありましたらお伺いできますでしょうか。よろしくお願いいたします。

okokokinawa
お礼率0% (0/6)

Excel（エクセル）
回答数6
ありがとう数3

みんなの回答 （6）
専門家の回答

みんなの回答

Chiquilin
ベストアンサー率30% (94/306)

2020/08/06 16:22 回答No.6

hiro_1116さんが回答している通りデータの区切り位置でやるのが簡単だろうと思います。返事がないのでそれで支障があるのかどうか分かりませんけど。数式でやる場合バージョン次第です。 A1にデータがあるとして Office365なら =TRANSPOSE(FILTERXML("<a><b>"&SUBSTITUTE(A1,"、","</b><b>")&"</b></a>","//b")) でいいです。古いバージョンの場合 =TRIM(MID(SUBSTITUTE($A1,"、",REPT(" ",999)),COLUMN(A1)*999-998,999)) 右にコピー

imogasi
ベストアンサー率27% (4737/17069)

2020/08/06 12:21 回答No.5

#4ほかです。＃４で紹介したＷＥＢ記事の、関数の解説をしてみます。関心が興ったのでメモしてみました。　初めての人に文章で説明すると、ずいぶん長くなり、ＷＥＢ記事でも詳細説明は省略したのだろうと思います。下記も読んでもわからないと思うが、関数経験者で判る人も居ると思ってあげます。＝＝＝＝＝＝＝ (1)事前準備作業　　'何でも初めと終わりは、繰り返し処理では、状況を乱します。中間での処理と違う点が出ます。これを同じパターンにするために、文字列の最初と終りの２か所に、区切る文字（以下Ｘという）を強制的に付加します。この巧妙さが分かるかな。（２）ＷＥＢの説明サンプルのＤ５セルでは、左から数えて１．Ｄ５セルでは、区切り文字の第1と第２２．Ｅ５セルでは、区切り文字の第２と第３３．Ｆ５セルでは、区切り文字の第３と第４以下同じについて、その回だけ区切り文字（Ｘというとする）を、別の「出現があり得ない文字」（Ｙというとする）に置き換える。そして置換後で、初めて見つかるＹ文字と、すぐ次に続いて見つかるＹの文字の間の文字列を、ＭＩＤ関数で切り出し、分離後の項目データ（各列に納まるデータ）とする（２）がエクセル関数でできる理由として、ＳＵＢＳＴＩＴＵＴＥ関数には、何番目に出現するかの文字列を狙って、他の文字列に置換できる、第3引数が設けられている、ことからこれが可能です。　一般には、第3引数の利用されるケースは多くないだろうが。一時的に（たとえば３番目に出現するＸだけを、Ｙに置き換える機能がある。これで第2のＸと第３のＸをＹに置き換えられる。（３）そして最初の関数式を入れるＤ５セルでは、置換後の文字列で、１番目のＹと２番目のＹの間をＭＩＤ関数で切り出すのである。ＭＩＤ関数で、望みの文字を切出せるのは、元の文字列スタートの文字番号切出す文字数を指定できるからですーーこの文字Ｙのあり場所（何文字目か）を求めるのは、ＦＩＮＤ関数を使う。しかしＦＩＮＤ関数は３番目に出現する文字位置を捉えたりできない。残念である。ＦＩＮＤ関数は、探索'開始（文字）位置は指定できるが、次列のセルの式に引き渡せない。これを解決すれば、別解法が生まれるかも。（４）第何番目と第何番目＋１の２つのＸ間の文字列かを、列の場所で決めないとならないが、ＷＥＢの説明サンプルでは、Ｄ４，Ｅ４，Ｆ４セル・・に手動か関数で連続整数を入れるやり方になっている別のやり方では、Ｄ５セルの式の中で、D$4やE$4などをつかっている場所は、Ｃｏｌuｍｎ（）－３を使う手もあると思う式の最初のISERROR関数は、該当が割り出せない場合には空白””を返させるための対策である。

imogasi
ベストアンサー率27% (4737/17069)

2020/08/05 15:23 回答No.4

エクセル関数だけでできないか考えて、調べたところ https://blog-tips.sekenkodqx.jp/2019/08/23/excel-split-function00001/ Excel CSVなどの文字列の分割を関数で行う方法がありました。　しかしこの式を創出したり、理解できるのは、並みのエクセル関数経験者でも無理と思う。やってみるならば、この記事の例のD5セルの式は =IFERROR(MID($C5,FIND($C$2,SUBSTITUTE($C5,$B$2,$C$2,D$4))+LEN($B$2),FIND($C$2,SUBSTITUTE($C5,$B$2,$C$2,D$4+1))-(FIND($C$2,SUBSTITUTE($C5,$B$2,$C$2,D$4))+LEN($B$2))),"") ですから、使ってください。ダウンロードすればこの式が出てくるようだが。写真の式では、使えないので。 C5の式は　=$B$2&B5&$B$2です。＝＝＝追記小生が、前のVBAの回答する前に、その前に、データー区切り位置以下のエクセル操作でのやり方を、述べるのを忘れましたが、普通はこの操作で、目標を達するものと思う。

imogasi
ベストアンサー率27% (4737/17069)

2020/08/04 22:03 回答No.3

こういうのはVBAにSplit関数というのがあり、それの利用向けだ。 CSVデータをシートに読み込むようなとき便利で使われる。例データ A1:A3 チョコレート、あめ、バナナ、ケーキ゛犬、猫、虎、ウサギ京都、奈良、滋賀、石川標準モジュールに Sub test01() Dim w As Variant For i = 1 To Range("A1000").End(xlUp).Row w = Split(Cells(i, 1), "、") For j = 0 To UBound(w) Cells(i, j + 2) = w(j) Next j Next i End Sub 実行後　B1:E3 チョコレートあめバナナケーキ゛犬猫虎ウサギ京都奈良滋賀石川項目数は、行によって、可変でもよい＝＝質問文章の中のことだが、エクセルをやるなら、「枠」でなく「セル」と言ってほしいよ。

msMike
ベストアンサー率20% (364/1804)

2020/08/04 17:17 回答No.2

添附圖參照(Excel 2019) Sheet2に於いて、１．A列は空白の儘の放置プレー２．次式を入力したセル B1 を右方及び下方にオートフイル￣￣ =IFERROR(FIND("、",Sheet1!$A1,A1+1),999) Sheet1に於いて、３．次式を入力したセル B1 を右方及び下方にオートフイル￣￣ =IFERROR(MID($A1,Sheet2!A1+1,Sheet2!B1-Sheet2!A1-1),"")