Nuova richiesta di aiuto



  • Nuova richiesta di aiuto
    di Mrt (utente non iscritto) data: 08/03/2011

    Ho una form che contiene una combobox con opzione di selezione. devo far scrivere le righe selezionate nella combo nelle textbox contenute nella stessa form.
    data la mia scarsa conoscenza del vba l'unico sistema che ho escogitato trasferisce le selezioni in un foglio, saltando ovviamente le righe ove la combo non è selezionata, da lì poi, dopo aver filtrato non vuote nel suddetto foglio , trasferisco i dati nelle textbox....procedimento assurdo con un mare di if . qualche suggerimento ?? grazie in anticipo.
     
    Private Sub cmdOk_Click()
    
    Dim Ciclo, FineRiga
    
    FineRiga = cmbFattura.ListCount - 1
    
    For Ciclo = 0 To FineRiga
    
    If cmbFattura.Selected(Ciclo) = True And cmbClienti = "Personale" Then
    
    If Ciclo = 0 Then
    Worksheets("Dati2").Cells(2, 2) = cmbFattura.List(Ciclo, 0)
    End If
    
    If Contatore = 1 Then
    Worksheets("Dati2").Cells(3, 2) = cmbFattura.List(Ciclo, 0)
    End If
    
    ecc..


  • Aggiornamento
    di Isy (utente non iscritto) data: 08/03/2011

    Ciao

    puoi allegare l'intero codice del form? invia solo "form".frm così da visualizzare gli oggetti un uso.

    nota: puoi migliorare ancora i tempi svuota griglie se metti i bordi una sola volta nelle celle necessarie evitando le ripetute formattazioni




  • di Mrt (utente non iscritto) data: 08/03/2011

    Grazie isy, gentile come al solito. ho allegato il form come da te richiesto.

    ciao