Excel VBA 如何选择至有数据的最后一行

逻辑为需要先定位有数据最后一行的行数,然后再进行想要的操作。重点请注意红色文字处,加上这个参数End(xlDown)表示从头选到最后一个

Dim mixsheet As Worksheet
Set mixsheet = Worksheets("Sheet1")
mixsheet.Select
bEnd = mixsheet.Range("C:C").End(xlDown).Row
mixsheet.Range("c1:c" & bEnd).Copy

windows netsh 实现端口转发

1、添加转发

netsh interface portproxy add v4tov4 listenaddress=【监听地址】 listenport=【监听端口】 connectaddress=【转发地址】 connectport=【转发端口】

2、查看配置的转发项

netsh interface portproxy show

3、重置、删除所有转发项

netsh interface portproxy reset