|
▼かんきち さん:
>セルA1に入力した文字列を","で分割したいと思い下記のように書きました。
>これを実行すると「型が一致しません」と出てしまいます。
>本ではSplitとメソッドの一番目の文字が大文字になっていることからこれが
>原因かと思いましたがSplitと書いても自動的にsplitに変換されてしまいます。
>このことが原因なのでしょうか?
まず、Split関数がExcel2000以降で有効と言う事はよろしいですか?
↑は、OKだとして・・・、
>
>Function split_value()
Dim myarray() As String
myarray() = Split(Cells(1, 2).Value, ",")
splited_value = myarray()
>End Function
として下さい。
呼び出し側は、一例ですが、
Sub main()
Dim ans() As String
ans() = splited_value
For idx = LBound(ans) To UBound(ans)
MsgBox ans(idx)
Next
End Sub
|
|