Visual Basic.NET - Error al cargar una matriz

Tengo este código.

Private Sub cargaMatriz()
Try
Dim fil As Int16 = 0, col As Int16 = 0, f As Int16 = 0, c As Int16 = 0
fil = objEtiqueta.CuentaLineas() 'función que retorna el número de lineas del datagridview
col = objEtiqueta.CuentaCeldas() - 1 'funcion que retorna el número de celdas por linea del datagridview
For f = 1 To fil
For c = 0 To col
If fil < 1 Then
MessageBox.Show("no hay datos de etiquetas", "Advertencia", MessageBoxButtons.OK, MessageBoxIcon.Error)
Exit Sub
Else
matriz(f, c) = Convert.ToString(dgv.Rows(f).Cells(c).Value)
End If
c += 1
Next c
f += 1
Next f
Catch ex As Exception
MessageBox.Show(ex.Message, "Advertencia", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

Debo tener algo mal pero no entender porque pues me parece razonable el código que tengo. Pueden ayudarme a ver mi error.

Adjunto error

Gracias