Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


433 / 13645 ツリー ←次へ | 前へ→

【80314】1つのセルの内容を分解して別のセルに個別に展開したい 煮っまった 19/1/24(木) 10:41 質問[未読]
【80317】Re:1つのセルの内容を分解して別のセルに... chaco 19/1/24(木) 13:56 回答[未読]
【80319】Re:1つのセルの内容を分解して別のセルに... 煮っまった 19/1/24(木) 14:22 お礼[未読]
【80326】Re:1つのセルの内容を分解して別のセルに... マナ 19/1/24(木) 19:35 発言[未読]
【80327】Re:1つのセルの内容を分解して別のセルに... マナ 19/1/24(木) 21:12 発言[未読]
【80347】Re:1つのセルの内容を分解して別のセルに... 煮詰まった 19/1/28(月) 9:29 お礼[未読]

【80314】1つのセルの内容を分解して別のセルに個...
質問  煮っまった  - 19/1/24(木) 10:41 -

引用なし
パスワード
   色々考えましたがお手上げなのでどなたか助けてもらえませんか?

1つの注文番号で納期回答を仕入先よりもらっていますが
どうしてもセルの中に複数の回答を入れてくるところがあります。

セルには、数量-納期が記載されており
数量と納期の間には-が入っています。


1.数量はk単位で記載されており、kは千個単位(少数以下の記載あり)
2.日付は 月/日です

このようなデータを分解して

セルA1は

B1 数量
C1 納期
D1 数量
E1 納期

セルA2は

B2 数量
C2 納期
D2 数量
E2 納期

などに更新できますか?

セルA1の中に以下
7.2k-2/14
4.8k-2/20

セルA2の中に以下

2.5k-2/14
3k-2/20
3k-3/20


まれにしたのようなデータもきます。

49.7k-3/5
170.1k-3/12
182k-3/19
260.4k確認中


セルの中には最大で6個ほど記載される場合があります。


すいませんがアドバイスお願いします。

【80317】Re:1つのセルの内容を分解して別のセル...
回答  chaco  - 19/1/24(木) 13:56 -

引用なし
パスワード
   こんにちは。Resつきませんね。

携帯からなのであまり詳しく書けないのですが、
VBAのSplit関数をネストすればできなくはないと思います。
Split関数の詳細はヘルプを参照していただくとして、delimiterにあたる引数を
vbCr
で区切った後、その配列のひとつの要素をさらにSplitし、次は - ハイフン で分ける。

それらをセルの納めたいところに納めていく感じでどうでしょう?
ネストせずとも、一度vbCrで分けたものを別セルに書き出してからさらにSplitでもいいかもしれませんね。

vbの通常の改行コードはvbCrLfですが、セルのなかでの改行はvbCrだけなところがポイントかと思います。

【80319】Re:1つのセルの内容を分解して別のセル...
お礼  煮っまった  - 19/1/24(木) 14:22 -

引用なし
パスワード
   連絡ありがとうございました。
セルの中の改行コードとsplit関数でちょとやってみます。

【80326】Re:1つのセルの内容を分解して別のセル...
発言  マナ  - 19/1/24(木) 19:35 -

引用なし
パスワード
   ▼煮っまった さん:

手作業でも簡単

1)A列を選択
2)改行を"-"に置換
ht tps://hamachan.info/win7/Excel/cell_j.html
3)区切り位置で分割

と思いましたが、

>260.4k確認中

ここだけ、ハイフンがないので
区切り位置で分割できませんでした。

【80327】Re:1つのセルの内容を分解して別のセル...
発言  マナ  - 19/1/24(木) 21:12 -

引用なし
パスワード
   ▼煮っまった さん:

>>260.4k確認中
>
>ここだけ、ハイフンがないので
>区切り位置で分割できませんでした。


1ステップ増えますが

「確認中」を置換で、「-確認中」とすればよいだけでした。

【80347】Re:1つのセルの内容を分解して別のセル...
お礼  煮詰まった  - 19/1/28(月) 9:29 -

引用なし
パスワード
   色々ありがとうございました。
対応方法が見えてきました

433 / 13645 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free