Tak už mi vše funguje.
Jen mám problém při ukládání.
Používám toto makro:
Private Sub CommandButton3_Click()
jmeno = Range("C17")
ActiveWorkbook.SaveAs Filename:="C:\Excel\" & jmeno
MsgBox "Dokument uložen pod názvem " & jmeno
End Sub
A když se mi to uloží tak se mi resetuje celý excel, že se vyskytla nějaká chyba.Nevíte co na tom je špatně že ta chyba pokaždé vyběhne? A neukládá se mi to pod tím názvem co mám v buňce C17.