En VBA Tenemos siempre la posibiliodad de llamar a otro procedimiento
para pasarle datos o variables.
Por ejemplo
-----------
En este sencilo ejemplo se ve claramente como pasar un dato a otro procediento
'solo debes pegar el codigo en modulo
'y correrlo
Sub pasando_un_dato()
Dim celda As Range
Set celda = Range("A1") 'asignamos la refrencia la celda A1
celda.Value = 399 * 2 'colocamos un valor a la celda
'invocamos al procedimiento:
'calculador_datos(y le pasamos
'el valor de la propiedad value de la celda)
calculador_datos (celda.Value )
End Sub
Sub calculador_datos(valor)
'el procedimiento recibe el valor de celda.value
Dim total As Integer
total = 12 * valor 'la variable total ahora sera igual a 12* valor(celda.value)
MsgBox "el total es..." & total 'mostramos el resultado
End Sub