¿Cómo identificar dos archivos con distinta información?

Busco como identificar dos archivos que estos se llaman igual los cuales busco en un directorio codifique esto

El for fusca en 70 direcciones distintas hasta hallar la coincidencia

For j = 1 To 70
If ruta(j) <> "" Then
sDir = Dir$(ruta(j) & "*" & ensamble & "*" & ".csv")
End If
If LenB(sDir) <> 0 Then Exit For
Next j

El detalle es que el ensamble puede ser Gnegocios-arribo. Csv, y el otro Gnegocios-arribo-sub. Csv y cuando lanzo la búsqueda solo coloco Gnegocios que es mi variable ensamble ambos con distinta información, aquí mi pregunta

Como puedo extraer Gnegocios-arribo. Csv pero que este o la variable no busque el complemento que colo que extraiga el Gnegocios-arribo-sub. ¿Csv?