如何解决循环范围单元格和下拉列表
我想创建一个宏，允许用户通过 inputBox 函数输入单词。这个词将用于填充已经有信息的一系列单元格（D 列）。此外，这个词将放在所有其他提案的开头（D 列，D1 = 标题）。
问题是我无法动态执行此操作，我尝试使用 For Each 循环浏览单元格范围，以便 DropDownList 显示所有已填充的单元格（可能有 n 个），但我不能找出如何管理 For Each 循环！
Sub macro_dropDownList()
Range("D2").Select
Selection.Insert Shift:=xlDown,copyOrigin:=xlFormatFromLeftOrAbove
valeur = InputBox("Entrez le nom du model")
Range("D2").Value = valeur
For Each c In Worksheets("DropDownList").Range("D2:D100").Cells
ActiveWorkbook.Names("Model_vehicules").RefersToR1C1 = _
"=DropDownList!$D$2:$D$100"
Next
end Sub
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。
