Refresh dati

Hai un problema con Excel?

Nuova discussione

Refresh dati
di pizzo88 data: 13/04/2015 00:15:33
Ho un form iniziale con una combobox legato ad una lista excel e se provi ad inserire un dato diverso da quello nella lista butta fuori un errore che dice di cliccare su "nuovo inserimento". Ma al momento che faccio il nuovo inserimento e mi torna indietro sul form iniziale, nella combobox non vedo il nuovo inserimento e mi trovo costretto a chiudere e riaprire il form per vederlo. Ho visto un po' in giro che c'è la funzione Refresh e Requery ma non riesco ad usarle correttamente. Come posso ovviare a questo problema? Grazie
di alfrimpa data: 13/04/2015 10:50:35
Ciao Pizzo88

Direi che la prima cosa che dovresti fare è allegare un file di esempio (senza dati sensibili) che sia strutturalmente uguale al tuo in modo che, chiunque voglia provare ad aiutarti, abbia qualcosa di concreto su cui fare delle prove o test.

Alfredo
di pizzo88 data: 13/04/2015 18:36:02
Ho caricato un file di esempio. Spero possa aiutare. Grazie

di alfrimpa data: 13/04/2015 20:26:24
Ciao Pizzo.

Ti riallego il file al quale ho apportato due piccole modifiche.

1) Alla macro sotto riportata ho aggiunto la riga che vedi indicata dalla freccia che serve ad aggiornare la proprietà "RowSource" (Origine dati) della combo XCMBCF;

2) Ho reso dinamico (nel senso che si adegua all'inserimento di nuovi nomi) il nome di zona "CF" con questa formula inserita in Gestione Nomi

=SCARTO(PAZIENTI!$A$2;0;0;CONTA.VALORI(PAZIENTI!$A$1:$A$1000);1)

Alfredo

Private Sub Enter_Click()
    Dim lRiga As Long
    With sh1
        lRiga = .Range("A" & .Rows.Count).End(xlUp).Row + 1
        .Range("A" & lRiga).Value = Me.TBCF.Text
        .Range("B" & lRiga).Value = Me.TBNome.Text
        .Range("C" & lRiga).Value = Me.TBCognome.Text
    End With
Unload Me
Start.CMBCF.RowSource = "CF"  <----- Riga aggiunta da me
End Sub

di pizzo88 data: 13/04/2015 22:45:08
Ottimo, funziona tutto a meraviglia.
Grazie mille.

Vuoi Approfondire?