Исправте программу в VBA

dim ii%, jj%
S = a(1,1)+1
For i = 1 To M
For j = 1 To N
if s>a(i,j) then
s=a(i,j)
ii=i
jj=j
end if

+1 - для того, чтобы определялись координаты, если a(1,1) минимальное