level 1
Application.Goto Cells(lastRow, 1)
我用这行代码跳到了最后一行第一列的内容,然后想在下面接一行代码直接进入输入状态(即选中该单元格后按F2的状态),但是试了以下这两行代码都不行,请问该咋办呢?
Cells(lastRow, 1).Activate
或
Application.SendKeys "{F2}"
都不行。
2024年09月08日 07点09分
1
level 11
ThisWorkbook.Sheets("sheet1").Select '指定工作表,”sheet1"不一定是sheet(1)
DoEvents '不同软件之间暴力交换数据适当放弃一下控制权
'这里是你的代码
2024年09月08日 11点09分
4
level 3
要切换焦点,大兄弟。
Sub form_show()
UserForm1.Show 0
AppActivate Application.Caption
Application.SendKeys "{F2}"
End Sub
2024年09月09日 01点09分
5