Above your first sub declare variables:
Public foo As Variant Sub bar() foo = 2 End Sub Sub test() cell.value = (foo*2) ' This isn't a real line, but it's the concept that matters End Sub
I generally do this when I have variables that I want global and functions that will update the variable if it changes and I call the function in each sub.