在Excel中用快捷鍵輸入“HH:MM:SS”格式的當(dāng)前時(shí)間
我們知道在Excel單元格中輸入當(dāng)前時(shí)間的快捷鍵是“Ctrl+Shift+;”，但是這種輸入方法只能顯示小時(shí)和分鐘，即HH:MM格式的時(shí)間。用下面的VBA代碼可以實(shí)現(xiàn)用上述快捷鍵輸入當(dāng)前時(shí)間時(shí)，在單元格中顯示的是包含秒的“HH:MM:SS”格式。方法如下：
按Alt+F11，打開VBA器，單擊菜單“插入→模塊”，將下列代碼輸入到代碼窗口中：
Sub setKey()Application.onKey "+^:", "EnterTime"End SubSub resetKey()Application.onKey "+^:"End SubSub EnterTime()With ActiveCell.Value = Time().NumberFormat = "hh:mm:ss"End WithEnd Sub
運(yùn)行setkey()，在工作表中選擇一個(gè)單元格，按快捷鍵“Ctrl+Shift+;”，將顯示HH:MM:SS格式的當(dāng)前時(shí)間，如“20:25:09”。要還原默認(rèn)的輸入方式，運(yùn)行resetkey()即可。
