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 回答