excel vba 怎么编辑程序，实现在指定位置新建工作簿并命名，然后赋值

可以啊，sheet1中C1=A1+B1,sheet2中A1输入=然后点击sheet1中C1字段，自动就把数值带过来了，sheet1中数据变动，sheet2也会变

Sub Macro6()
Workbooks.Add
ActiveWorkbook.SaveAs Filename:= _
"路径\计算结果.xlsx", FileFormat:= _
xlOpenXMLWorkbook, CreateBackup:=False

Sheets("工作表名").Range("A1") = C1
ActiveWorkbook.Save
ActiveWindow.Close
End Sub

Dim wb As Workbook
Dim FileName As String
FileName = “计算结果”
Set wb = Workbooks.Add
ThisWorkbook.Sheets(1).[C1]Copy wb.Worksheets(1).[A1] 'copy值的代码
If FileName = "False" Then Exit Sub
wb.SaveAs FileName, FileFormat:= _
xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
Beep
End If

这个好像得写好几行代码的吧