Controllare combobox proprietà e contenuto



  • Controllare combobox proprietà e contenuto
    di 3alffredo3 (utente non iscritto) data: 02/04/2014 15:44:29

    E' possibile controllare su una combobox la proprietà .Visibile e se ha un contenuto?

    Mi spiego: Ho una User con combobox e pulsante che avvia macro.
    All'avvio della user, la combobox3 puo essere visibile o non visibile. Quando faccio partire la macro con il pulsante devo verificare la propietà della combobox3, se essa è visibile devo verificare che sia stato scelto il cliente, se no è stato scelto mi deve avvisare e far restare sulla User per effettuare la scelta. Avevo pensato ad "If Then Else" ma non so come fare. Potete aiutarmi? Grazie
    Alfredo



    End If
     
    Es.:
    'Se la combobox3 è visibile .... ' ? come si fa
    If Combobox3.Value = "" Then ' Controllo se è vuota
    'Se è vuota, Avviso: Non hai selez. Cliente!
    ' Ti blocco e ti lascio sulla User per effettuare la scelta
    Else
    ' Prosegui
    
    End If 



  • di Grograman (utente non iscritto) data: 02/04/2014 16:17:33

    Traducendo quello chehai già scritto ^_^


     
    'Se la combobox3 è visibile .... ' ? come si fa
    if me.combobox3.visible = true
    If Combobox3.Value = "" Then ' Controllo se è vuota
    'Se è vuota, Avviso: Non hai selez. Cliente!
    ' Ti blocco e ti lascio sulla User per effettuare la scelta
    Else
    endif
    ' Prosegui
    
    End If 



  • di 3alfredo3 (utente non iscritto) data: 02/04/2014 18:11:15

    Grazie Grogaman ... hai aggiunto quella informazione che, dato la mia ignoranza, mi mancava: "If Me." Bene, ho scritto il codice cosi, vedi sotto e funziona alla grande!

    Di nuovo grazie e alla prossima!
     
      'Controllo se ho scelto cli e/o Art.
    If Me.ComboBox3.Visible = True Then 'Se la combobox3 è visibile ....
        If ComboBox3.Value = "" Then ' Controllo se è vuota. Se si
         MsgBox "Inserisci Articolo" 'Ti avviso
          Exit Sub 'Ti faccio Uscire
        Else
     'Se non è vuota prosegui
    End If
    End If
    



  • di Grograman (utente non iscritto) data: 02/04/2014 19:29:52

    A sto punto visto che era la paternità che ti mancava, mettiamola dappertutto, e non avendo visto cosa fare se la cbo è piena, togliamo l'else ;)
     
    With Me.ComboBox3
      'Controllo se ho scelto cli e/o Art.
      If .Visible = True Then 'Se la combobox3 è visibile ....
        If .Value = "" Then ' Controllo se è vuota. Se si
          MsgBox "Inserisci Articolo" 'Ti avviso
          .SetFocus 'la seleziono
          Exit Sub 'Ti faccio Uscire
        End If
      End If
    End With



  • di 3alfredo3 (utente non iscritto) data: 03/04/2014 09:12:29

    Grograman ... hai reso il codice precisissimo, una poesia! Quando la Cbo è piena, non deve far nulla, solo proseguire l'esecuzione macro. In effetti è un controllo e funge così: se mi son dimenticato di scegliere l'articolo, avvisami; se invece lo ho scelto, fammi andare avanti! Deve controllare prima se è visibile la cbo, perchè è possibile che essa non sia visibile, quindi da non prendere in considerazione. Tutto qua! Adesso è perfetto.
    Grazie
    Alfredo