Question

excel vba 怎么把当前日期复制给某个单元格的值 比如Sheet1.Range("A1").VALUE= 请指导

Answer 1

Sheet1.Range("A1").NumberFormatLocal = "yyyy-mm-dd"
Sheet1.Range("A1").Value = Now()

Answer 2

Sheet1.Range("A1").Value = Format(Now(), "yyyy-mm-dd")

追问

应用程序定义或对象定义错误

追答

office2003测试通过
你写成这样试一下：
Sheets("sheet1").Range("A1").Value = Now ‘sheet1是你要输入日期的工作表名，检查一下。
或
Sheets("sheet1").Range("A1").Value = Format(Now(), "yyyy-mm-dd")