I tried converting the notebook to a CDF document, but that failed.
What specifically did fail? Did you try the Option SaveDefinitions -> True
, e.g.:
Manipulate[
Plot3D[Sin[a x] Cos[b y], {x, -6, 6}, {y, -6, 6},
PerformanceGoal -> "Quality"], {a, -3, 3}, {b, 1, 5},
SaveDefinitions -> True]