.DropDownLines = 20哪里不对，vba运行报错

这个问题的具体原因需要根据你的代码和错误信息来确定。但是，一般来说，如果你在VBA中将.DropDownLines属性设置为20，如果这个下拉框中的选项不足20个，那么就会报错。你可以尝试以下两种方法避免这个问题：

1. 在设置.DropDownLines之前，先计算下拉列表中的选项数量，然后根据实际选项数量设置.DropDownLines。例如：

Dim itemCount As Long
itemCount = ComboBox1.ListCount
If itemCount < 20 Then
    ComboBox1.DropDownLines = itemCount
Else
    ComboBox1.DropDownLines = 20
End If

2. 使用错误处理机制来避免错误。例如：

On Error Resume Next
ComboBox1.DropDownLines = 20
If Err.Number <> 0 Then
    ComboBox1.DropDownLines = ComboBox1.ListCount
    Err.Clear
End If
On Error GoTo 0

这种方法会先尝试设置.DropDownLines为20，如果出现错误，则将.DropDownLines设置为下拉列表中的选项数量。