如何实现单击单元格后,右侧相邻的单元格自动填充当日日期并在日期单元格的右侧自动填充两位数的任意字母

显示全部楼层 · 2010-10-24 11:21:27

比如, 点击A1时, B1自动填充当日日期,C1中自动填充两个字母(任意组合的,比如AB)
请问如何运行你写的程序呢? 我是超级菜鸟.另外的问题是如果使用完您写的程序,如何将其删除,以便对工作表进行别的编辑呢? 谢谢你的帮助

千问 · 2010-10-24 11:21:27

c1的要求不明确。是否允许重复？还是按ASCII码的顺序排列的好。Private Sub Worksheet_Change(ByVal Target As Range)If Target.Column = 1 And Len(Target.Value) > 0 ThenCells(Target.Row, 2).Value = DateCells(Target.Row, 3).Value = "??"End IfEnd Sub

千问 · 2010-10-24 11:21:27

那要用VBA来解决。