Juan Carlos González Chavarría respondió:
No sé si entiendo bien la pregunta pero me parece que quieres pasar los datos seleccionados a diferentes hojas. Si es así sería un poco más difícil. Sino, puedes usar esta instrucción: Hoja2.Select Range("A3").Value = ListBox1.ListIndex + 1...