用VBA代码在指定单元格中填充项目名称： 项目编号： 开标地点： 开标时间： 招标最高限价： 招标人： 招标代理机构：

Sub FillProjectInfo() '指定单元格 Range("A1").Value = "项目名称" Range("B1").Value = "项目编号：" Range("B2").Value = "开标地点：" Range("B3").Value = "开标时间：" Range("B4").Value = "招标最高限价：" Range("B5").Value = "招标人：" Range("B6").Value = "招标代理机构：" End Sub