Nvm I was able to fix the issue. All that needed to be done is have the information brought down into the other sub (sorry, I have only been coding for 6 days so I don't know the names, just how to do things)

Sub SetFormulaConditions()

AccessLastRow = Range("AccessLastRow")
AmexLastRow = Range("AmexLastRow")
OthersLastRow = Range("OthersLastRow")

Cells(Range("AccessParent").Row, Range("AccessParent").Column).Resize(AccessLastRow, 1)) = "AccessParents"

End Sub
and then it ran through it. I'll leave this up just in case someone has the same problem.