Questo codice è per VBA all'interno di Excel, non per Visual Basic 6.5. in vostra domanda avete chiesto VBA e non VB, ci è una differenza.
Chiudere prego questo problema accettando questo commento 33039684 come risponde alla domanda originale inviata e riaprire una nuova domanda che specifica una soluzione di VB 6.5 e non una soluzione di VBA.