VBA - 通过Commandbutton隐藏/恢复后禁用Combobox

时间:2017-01-07 14:50:57

标签: excel vba combobox hide

我正在尝试收缩包含几个Comboboxes的excel表的部分内容。这些组合框已经填满。

如果我隐藏它们并将它们带回来,它们就不再可以选择了。它们出现了,但我无法点击它们或下拉。他们在某种程度上被禁用。我尝试了各种不同的命令,如.enable,.activate等,但似乎没什么用。

这是我目前的一段代码:

Dim Bereich
Dim shpShape As Shape
Dim j As Integer

Set Bereich = Worksheets("Sanierungskosten").Rows("69:171")
Bereich.Hidden = True = Not (Bereich.Hidden)

For Each shpShape In ActiveSheet.Shapes
    If shpShape.TopLeftCell.Row >= 69 And shpShape.TopLeftCell.Row <= 171 Then
        If Rows("69:171").Hidden Then
            shpShape.Visible = False
        Else
            shpShape.Visible = True
       End If
    End If

Next shpShape

这是我工作的一部分,我对这个错误感到疯狂!

0 个答案:

没有答案