Il problema non è ancora chiaro ... professionista o dilettante, se non ti spieghi bene, nessuno potrà darti una risposta.

Comunque, cerco di rispondere meglio che si può ....
Se imposti una funzione con un argomento di tipo ListBox, potrai richiamarla passando, a seconda dei casi, l'oggetto vero e proprio ...

Ad esempio

codice:
Private Sub TuaSub(lst As ListBox, dato As String)
    lst.AddItem dato
End Sub
che puoi richiamare con

codice:
    TuaSub List1, "Stringa1"
o

codice:
   TuaSub List2, "Stringa2"