This post should not be in Macros - rather Forms. Anyway .....
If CustomerID is an Integer number then:
Docmd.OpenForm "Your Form",,,"[CustomerID] = " & CustomerID.value
If CustomerID is Text then:
Docmd.OpenForm "Your Form",,,"[CustomerID] = " & CustomerID.value & ""
If CustomerID is...