Valg af synlige txtboxe igennem en cbobox
Når jeg vælge C A som er i den første case så vil den gerne indsætte værdierne i excel. Køre jeg C C vil den ikke indsætte væriderne - hvorfor??Private Sub cboFac_Change()
Select Case Me.cboFac.Text
Case "C A", "Dt", "Sec"
With Me.txtMax
.Visible = False
.Value = Null
End With
With Me.MaxLabel
.Visible = False
End With
Case Else
With Me.txtMax
.Visible = True
.Value = Null
End With
Me.MaxLabel.Visible = True
Select Case Me.cboFac.Text
Case "C C", "C A", "Dt", "FX", "Gar", "LC", "Od", "Sec"
With Me.txtInst
.Visible = False
.Value = Null
End With
With Me.InstLabel
.Visible = False
End With
Case Else
With Me.txtInst
.Visible = True
.Value = Null
End With
Me.InstLabel.Visible = True
End Select
