發布時間:2021-11-24 文章來源:xp下載站 瀏覽:
Windows XP是美國微軟公司研發的基于X86、X64架構的PC和平板電腦使用的操作系統,于2001年8月24日發布RTM版本,并于2001年10月25日開始零售。其名字中“XP”的意思來自英文中的“體驗(Experience)”。該系統是繼Windows 2000及Windows ME之后的下一代Windows操作系統,也是微軟首個面向消費者且使用Windows NT5.1架構的操作系統。 在一個列數很多的Excel表格中輸入數據時,來回拉動滾動條,既麻煩又容易錯行,非常不方便。那如何在Excel中快速錄入數據呢?其實,在Excel中錄入數據有很多的技巧,合理地運用它們可以提高我們的工作效率。本文另辟蹊徑,向大家介紹一下如何利用VBA代碼實現數據的快速錄入。請看下面的例子。 假設在填寫的某列數據中,員工所屬的部門有“一車間”、“二車間”、“銷售部”等等,如果我們能用數字代替這些文字內容輸入的話(如圖),必將大大提高我們錄入的效率。 根據這個思路,我們在該工作表的Change事件中輸入了如下的代碼: Private Sub Workheet_Change(ByVal Target As Range) If Target.Column = 2 Then ’只在第二列實現該功能 If Target.Value = 1 Then Target.Value = "一車間" Else If Target.Value = 2 Then Target.Value = "二車間" Else If Target.Value = 3 Then Target.Value = "銷售部" End If End If End If End If End Sub 返回到Excel窗口,這時輸入相應的數字就可以被替換成指定的文本內容了。可能有的朋友會想,先輸入這些數據,然后用查找替換的方法不也行嗎。然而我們會發現,用查找替換操作容易將其他列中的這些數據錯誤地替換掉,如果每個數字經確認后再替換就顯得比較煩瑣了,而用代碼就不會出現這些問題,加載之后就可以一勞永逸了。 提示:代碼中“Target.Column = 2”用于指定只能在第二列輸入這些數據時才有效(如果不指定對整個工作表都有效),這樣才能保證在其他列輸入這些數據時不會受到影響。類似地,我們還可以用代碼來控制在其他列中快速地錄入文本。該技巧適合事先加載到表格中或編制成程序讓不熟悉Excel的人員使用,這樣我們將員工填寫的表格(在相應的編號內容中打勾或直接填寫指定內容的編號)收上來之后就可以快速地采集數據了。 Windows XP服役時間長達13年,產生的經濟價值也較高。2014年4月8日,微軟終止對該系統的技術支持,但在此之后仍在一些重大計算機安全事件中對該系統發布了補丁。 |
上一篇:小小招式讓你給文字添加上劃線