単一のセルから複数のアイテムを呼び出すことができるかどうか疑問に思っていましたか? 私はスペースが非常に限られているので、すべての情報を 1 つのセルに持つことは大きなメリットになります。たとえば、"Dog,2,5,8" のセルが 1 つある場合、プログラムを実行して、それが何を意味するかを判断し、計算を実行できますか? よろしくお願いいたします。
質問する
113 次
1 に答える
0
@Tim Williamsが言ったように、 Split() はあなたが望むことをします。
Sub splitcell()
Dim TestString As String
TestString = CStr(Range("A3").Value)
Dim TestArray() As String
TestArray() = Split(TestString, ", ")
MsgBox (TestArray(0) & vbNewLine & TestArray(1) & vbNewLine & TestArray(2) & vbNewLine & TestArray(3))
End Sub
マクロは、次のメッセージ ボックスを表示します。
これで、For ループを使用して TestArray() を反復処理し、ロジックを実行できます。
こちらの MSDN ドキュメントを参照してください
そして、ここに別の投稿があります
于 2013-09-24T17:56:33.620 に答える