一 在指定單元格輸出計算機用戶名
Sub 當前單元錄入計算機用戶名()
Selection = Environ("Username")
'Selection = Workbooks("臨時表").Sheets("表2").Range("A1") 調用指定地址内容
End Sub
二、在指定單元格輸出計算機名和用戶名
Sub 當前單元錄入計算機名()
Selection = Environ("COMPUTERNAME")
'Selection = Workbooks("臨時表").Sheets("表2").Range("A1") 調用指定地址内容
End Sub
,
更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!