Sub ou Function não definida?

Na tabela abaixo quero multiplicar os algarismos da coluna A pelos da coluna B e listar os resultados na msgbox:

A      B
1 2
5 6

O código:

Código:

 Sub Mulplicação()
Dim i As Long, j As Long, k As Long
   For k = 1 To 2
      For m = 1 To 2
         For i = 1 To 2
            For j = 1 To 2
              Result(k, m) = Cells(i, j) * Cells(i, j)
            Next j
         Next i
      Next m
   Next k
    MsgBox Result(k, m)
End Sub


Só que acusa Sub ou Function não definida. O que tá faltando?

Bom dia...seja bem vindo ao fórum !

Rafael, nosso fórum é de Access e não de Excel.

Vamos deixar tua duvida aqui, para ver se algum de nossos colegas podem lhe ajudar.  Mas minha sugestão é você encontrar algum fórum de Excel como  esse aqui,

Abraços.

Ok, desculpe o engano.