求一个功能
excel吧
全部回复
仅看楼主
level 10
封羽明月 楼主
单元格A1内输入数据后，设置好的整个页面自己就能打印，不用人工按打印，然后输入的数据被清空。路过的大佬帮忙看看这个功能要怎么实现？
2025年10月23日 00点10分 1
level 12
yky洋洋
离谱
2025年10月23日 00点10分 2
吧务
level 15
zipall
右击工作表标签>查看代码>粘贴下面的代码即可.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
If Target.Value = "" Then Exit Sub
ActiveSheet.PrintOut
Range("a1").ClearContents
End Sub
2025年10月23日 00点10分 3
zipall
btw: 如果是套打,楼主可以搜下 word 邮件合并
2025年10月23日 01点10分
封羽明月
大佬牛逼
2025年10月23日 01点10分
封羽明月
吧主，还有个问题请教，怎么让操作过后选中单元格一直是A1
2025年10月23日 02点10分
zipall
@封羽明月 在end sub上面再加一句 range("a1").select
2025年10月23日 02点10分
1