0

ドロップダウンリスト付きのExcelシートがあります。値はカンマ区切りの値です。例えば

XXS, XS, S, M, L, XL, XXL, XXXL
2/3, 4/5, 6/7, 8/9, 10/11, 12/13
1-2, 2-3, 3-4, 4-5, 5-6, 6-7, 7-8, 8-9, 9-10, 10-11, 11-12, 12-13, 13-14, 14-15, 15-16, 18-24
2XL, 3XL, 4XL, 5XL
1X, 2X, 3X, 4X, 5X

ユーザーがドロップダウンから値を選択すると、選択した値を取得してコンマで分割し、それらの分割値をセルに設定したいと考えています。ユーザーが 2XL、3XL、4XL、5XL を選択した場合、出力は次のようになります。

ここに画像の説明を入力

4

1 に答える 1

2

このようにスプレッドシートを設定します

ここに画像の説明を入力

セルC2は検証リストのドロップダウンです

開発者タブをオンにして、VBE ALT+に移動します。F11

Sheet1オブジェクトモジュールを右クリックして選択View Code

以下のコードをコピーして貼り付けます

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Row = 2 And Target.Column = 3 Then
        Dim arr As Variant
        arr = Split(Target, ",")
        Range("E:E").ClearContents
        Range("E:E").NumberFormat = "@"
        Range("E1:E" & UBound(arr) + 1) = WorksheetFunction.Transpose(arr)
    End If
End Sub

次に、スプ​​レッドシートに戻り、リスト内の任意の項目を選択します。列に区切られた値が必要ですE

ここに画像の説明を入力

于 2013-10-03T08:37:05.740 に答える