|
▼うまくいかん さん:
>こんにちは。EXCEL VBA初心者です。
>現在、1つのデータからTree状にデータを細かく振り分けていくマクロを作っていますが、どうもうまくいきません。
>
>例としては:
>aがb と c 2つにまず分かれます.bが以下のように分かれます
>
> b 1 d g 0
>a→ → 2 → e →h → 0
> 3 f i 1 'もしiが存在した場合、1
>
>cが以下のように分かれます
> 1 d g 0
> c → 2 →e →h → 0
>
>この状態で、aの存在する数だけ、Loopされるようにしたいのですが、うまくいきません。
>
>それぞれ、ファンクションにして値を抽出しているのですが、うまく連携しません。
>
>まず第一に、aから条件なしでbとcに分ける方法はなんでしょうか?
>条件があれば、いくらでもifなどを使用できるのですが、有無を言わさず、bとcに分けたいのです。
なにも条件がなくて分けるのは、出来ないと思います。
また、その条件は、上の説明では理解できませんでした。
休日は、回答者が少なく、私のようなもので申し訳ないのですが、
とんちんかんの回答なら無視してください。
データの中身がどんなものかわからないので・・・・
以下は、
データAの中の"d"を見つけ、その前後でデータをデータB、データCに分けるものです。
Sub test()
detaA = "abcdefg"
i = InStr(detaA, "d")
If i > 0 Then
detaB = Mid(detaA, 1, i)
detaC = Mid(detaA, i + 1, Len(detaA) - i)
MsgBox detaB
MsgBox detaC
End If
End Sub
|
|