gracias de nuevo, Cacho (y a los demás).
No conocía esta forma de abordar las consultas en Excel.
Para David El Grande:
Gracias por tus correcciones.... me he dado cuenta de que en el primer mensaje habia escrito mal las variables.
Esta subrutina si que me funciona:
Mtotal = 1
For j = 1 To 15
M2total = 1 * Cells(j, 2).Value
Mtotal = Mtotal * M2total
Next
Cells(3, 4).Value = Mtotal
Multiplica los valores de las 15 primeras celdas de la columna 2 y luego lo obtenemos en la celda C4.
s2