Excel中怎么实现A1中输入5 ,A8开始自动插入5行
在Excel表中,我需要在车数单元格中输入5,代表5车货物,然后在下面指定的单元格中插入5行。实现A1中输入5 ,A8开始自动插入5行
Private Sub worksheet_change(ByVal target As Range)
Application.EnableEvents = False
rm = Cells(1, 1)
If rm > 0 Then
Rows("8:" & 7 rm).Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
End If
Application.EnableEvents = True
End Sub
If rm > 0 Then应该改为
If rm = 5 Then
或改为
If Target = 5 Then 把 rm = Cells(1, 1)也去掉
如果当实现A1中输入3,A8开始自动插入3行,就使用If Target >0 Then 。
Private Sub worksheet_change(ByVal Target As Range)
Application。EnableEvents = False
If Target。
value > 0 and Target。row=1 and Target。column=1 Then
Rows("8:" & 7 rm)。Select
Selection。Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
End If
Application。
EnableEvents = True
End Sub
Rows("8:" & 7 rm)。Select也改为Rows("8:" & 7 Target)。Select。
答:在Word中先输入错误的汉字,用“拼音指南”功能加上拼音,接着右击该汉字,在弹出的快捷菜单中选择切换域代码,更改代码中的汉字后,再切换域代码,就完成在汉字上添加...详情>>
问:怎样用Camtasia Studio v2.0.3来制作媒体
答:这个软件有使用向导的,你新建一个文件,然后照着他的说明一步一步的走下去,就知道怎么用了,这个软件太小了,网上跟本找不到教程的,如果你确实还是不会的话,找个懂电脑...详情>>