This is the sequence of commands that I use to create my CDFs.

    testCDF := DynamicModule[... some nice code]
    
    nb = CreateDocument[{testCDF}
    	,Visible -> False
    	,WindowTitle->"Export Test"
    	,WindowMargins->Automatic
    	,WindowSize->Automatic
    	,WindowElements->{"VerticalScrollBar","HorizontalScrollBar"}
    	,ShowCellBracket->False
    	,Deployed->True
    ];
    
    (*options to remove wolfram toolbar*)
    SetOptions[nb, PrivateNotebookOptions -> {"PluginToolbarEnabled" -> False}];
    
    CDFDeploy[NotebookDirectory[] <> "ExportTests2.cdf", 
      nb,
      "Method"->"Standalone",
      "Target"->"PlayerPro"
    ];
    
    NotebookClose[nb];

The command to remove Wolfram bar is commented.