¿Cómo insertar la misma imagen en excel al mismo tiempo en diferentes celdas desde VB?

Soy nuevo en el foro pero me gustaría me ayudaran con una inquietud que tengo, quiero generar credenciales desde VB, para ello tengo que poner los datos de los usuarios obtenidos de un ListView (1000), Con eso no hay ningún problema, eso ya lo he podido realizar, pero también debo insertar una imagen, en eso tampoco hay problema, ya puedo hacerlo la inquietud es que quiero hacerlo de una forma más eficiente, la forma en que inserto imágenes es hasta cierto punto, muy lenta, quisiera hacerlo de forma rápida y se me ocurre que podría ser guardándolas en un arreglo y después insertarlas todas al mismo tiempo y no de una por una. El código que uso para insertar las imágenes es el siguiente...

Dim oExcel As Object = CreateObject("Excel.Application")

'oExcel.Visible = True
Dim oBooks As Object = oExcel.Workbooks
Dim oBook As Object = oBooks.Open(Ruta_Archivo)
Dim oSheets As Object = oBook.Worksheets
Dim oSheet As Object = oSheets(1)

For Each item As ListViewItem In ListView1.Items
If j > 8 Then
i = i + 6
j = 1
End If

oSheet.cells(i, j).select()
oSheet.Pictures.Insert(datosfila(0))
j = j + 3
Next