VBAでエラーが出ます

質問

セルの値を変数に格納して、それをブック保存時に使いたいのですが上手くいきません。

Sub サンプルブック保存()
Dim myfile As String
myfile = workbooks("サンプル").Worksheets("sheet1").Cells(2, 9)
workbooks.Add
ActiveWorkbook.SaveAs Filename:="\\C:\フォルダ\" & myFile & ".xls"

End Sub

エラーメッセージは、
実行時エラー'1004':
SaveAs'メソッドは失敗しました'_Workbook'オブジェクト
と出ます。

非常に困ってます。
教えてくだされば幸いです。

回答No.1

kool_noah · ベストアンサー

サンプルっていうExcelファイル開くとボタンか何かがあって、それを押すと指定のセルの値をファイル名としてc:\フォルダに保存って動きでいいんでしょうか？

myfile = workbooks("サンプル").Worksheets("sheet1").Cells(2, 9)
　↓
myfile = Worksheets("sheet1").Cells(2, 9)
にしたら動きましたけど

お礼

できました。ありがとうございます！
初心者なのでまだ理解していない部分がたくさんあります。
助かりました。