如何在打开 Excel 工作表时保持第一个单元格始终处于活动状态。
任何人都可以指导我如何做到这一点。
这是我的
代码:
Private Sub Send_Click()
Dim strURL As String
strURL = "http://xxxxxxxxxxxx.com/excelAPI.php?customer_id=1&mobilenumber=" _
& ActiveCell.Value & "&message=" & ActiveCell.Offset(0, 1).Value
Call Sheets("Sheet1").WebBrowser4.Navigate(strURL)
End Sub
我不太确定为什么您希望第一个单元格处于活动状态。如果只是因为您正在使用活性细胞在您的代码中,那么您应该定义一个范围。像这样:
Private Sub Send_Click()
Dim strURL As String
strURL = "http://xxxxxxxxxxxx.com/excelAPI.php?customer_id=1&mobilenumber=" _
& Range("A1").Value & "&message=" & Range("A1").Offset(0, 1).Value
Call Sheets("Sheet1").WebBrowser4.Navigate(strURL)
End Sub
反正。这就是激活第一个单元格 (A1) 的方法你的工作表当工作簿打开时:
Private Sub Workbook_Open()
Worksheets("YourWorksheet").Activate
Range("A1").Activate
End Sub
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)