¿Cómo agregar datos de columnas no continuas a una columna específica de un ListBox?

Tengo dos ListBox de 2 columnas cada uno. Quiero insertar los datos de la columna B de la Hoja1 a la primera columna del ListBox1 y la columna G de esta misma Hoja1

A la segunda columna del ListBox1.

Al poder seleccionar de forma múltiple y poder intercambiar los valores de cada ListBox entre sí, por medio de botones ActiveX (botones a la derecha e izquierda). No se puede usar la opción RowSource ya que no se podrá programar el VBA con la opción .AddItem para mover del ListBox 1 al ListBox2 y al revés.

¿Cómo podría programar esto? Y ¿Cómo adjunto mi archivo Excel para más detalle de mi pregunta?

PD. En esta imagen, solo se muestra los datos de la columna G de la Hoja 1 en el ListBox1