Aggiornare ListBox



  • Aggiornare ListBox
    di Salvo18 (utente non iscritto) data: 04/11/2015 17:52:04

    Buonasera,
    ho una tabella su excel collegata al db e quando aggiorno questa tabella (con numero di righe fisso) vorrei riportare i dati ottenuti in una ListBox. Riesco ad aggiornare la tabella ma la ListBox non viene aggiornata e riporta i dati della situazione precedente all'aggiornamento. Dove sto sbagliando? Grazie per l'aiuto
    Salvo

     
    Public Sub aggiornamento()
    
    Sheets("ListBox").ListBox1.Clear
    ActiveWorkbook.Connections("ea tblpolicy").Refresh
    Z = Sheets("Tabella").Range("bd" & Rows.Count).End(xlUp).Row
    For k = 1 To Z
    Sheets("ListBox").ListBox1.AddItem Sheets("Tabella").Range("bd" & k).value
    Next
    
    End Sub