Hi
I'm trying (without much success) to get a command button to save my current workbook with the file name "Status sheet" but also with the time (which will either be 0500 or 1530) and the current date, so the filename should be "Status Sheet 0500 15/02/2016"
I've got this to partly do what I need but am struggling to get it to recognize whats in cell B1 and I don't know how to add the "Status Sheet" part of the filename?

Can anyone offer me any advice?

Private Sub CommandButton1_Click()
ActiveWorkbook.SaveAs Filename:="\\defthw9000osto.ww002.net\WTS-redirect$\FlexSm\.WW002\Desktop\Daily Work\" & Sheets("Sheet1").Range("A1").Value & ("B1") & ".xlsm"
End Sub

Thanks Peeps