(鍏跺疄鎴戜笉鏄綉绠★紝璇︽儏璇风湅……) 鍏充簬缃戠涔嬭矾鐨勮鏄
銆愬垎浜慐xcel鏍峰紡涔辩爜淇鏂规硶锛堟壒閲忓垹闄xcel鏍峰紡锛
浣滆:smoile 鏃ユ湡:2015-09-30 14:32:57
涓鑺傝繃鑺傜殑鏃跺欓亣鍒颁竴涓眰鏁戯紝涓涓緢灏忕殑闂锛屼絾鏄嵈璁╁鏈嶈寰楁槸澶╁ぇ鐨勪簨鎯咃紝鏈潃鍔╀汉涓轰箰鐨勬兂娉曪紝鎴戣繕鏄寜鐓х害瀹氱殑鏃堕棿鍓嶅線锛岀旱鐒舵垜瑕佸仛濂剁埜锛岀旱鐒惰佸ぉ涓嶇粰鍔涗笅璧蜂簡闆ㄣ
鐥囩姸锛氫竴涓寘鍚玁澶氫釜宸ヤ綔绨縉澶氭潯鏁版嵁鐨凟xcel绐佺劧闂存牱寮忓叏閮ㄤ贡鐮佷簡锛绫讳技杩欎釜锛夛紝瀵艰嚧涔嬪墠鐨勪竴浜涙牸寮忚捣涓嶄簡浣滅敤锛堜富瑕佹槸鏃堕棿锛屽彉鎴愪簡鏁板瓧锛夛紝铏界劧涔嬪墠鎴戣瀹㈡埛閫氳繃閫夋嫨鎬х矘璐寸殑鏂规硶瑙e喅锛屽綋鏃跺綋鏁版嵁鎹㈠埌鍏朵粬鐢佃剳鐨勬椂鍊欒繕鏄笉琛岋紝浜庢槸鎵句簡涓涓嬫柟娉曪紝杩樼湡鏈夈

鏂规硶锛1.鎸堿lt+F11鎵撳紑VBA缂栬緫鍣紝鍦ㄤ唬鐮佺獥鍙d腑杈撳叆涓嬪垪浠g爜锛
绋嬪簭浠g爜
2.鍏抽棴VBA缂栬緫鍣紝杩斿洖Excel鐣岄潰銆傛寜Alt+F8锛屾墦寮鈥滃畯鈥濆璇濇锛屾墽琛屸淒elCustomStyles鈥濆畯鍗冲彲涓娆″垹闄ゆ墍鏈夎嚜瀹氫箟鍗曞厓鏍兼牱寮忥紝鑰屽唴缃殑鍗曞厓鏍兼牱寮忎細淇濈暀銆
灏辫繖涔堢畝鍗曪紝鎴戣繍琛屼簡涓涓嬶紝鍒犻櫎浜嗗皢杩戜笂鍗冧釜鏍峰紡锛屼及璁℃槸琛ㄦ牸鍦ㄨ浆鎹㈢殑杩囩▼涓嚭浜嗛棶棰樸
鐥囩姸锛氫竴涓寘鍚玁澶氫釜宸ヤ綔绨縉澶氭潯鏁版嵁鐨凟xcel绐佺劧闂存牱寮忓叏閮ㄤ贡鐮佷簡锛绫讳技杩欎釜锛夛紝瀵艰嚧涔嬪墠鐨勪竴浜涙牸寮忚捣涓嶄簡浣滅敤锛堜富瑕佹槸鏃堕棿锛屽彉鎴愪簡鏁板瓧锛夛紝铏界劧涔嬪墠鎴戣瀹㈡埛閫氳繃閫夋嫨鎬х矘璐寸殑鏂规硶瑙e喅锛屽綋鏃跺綋鏁版嵁鎹㈠埌鍏朵粬鐢佃剳鐨勬椂鍊欒繕鏄笉琛岋紝浜庢槸鎵句簡涓涓嬫柟娉曪紝杩樼湡鏈夈

鏂规硶锛1.鎸堿lt+F11鎵撳紑VBA缂栬緫鍣紝鍦ㄤ唬鐮佺獥鍙d腑杈撳叆涓嬪垪浠g爜锛

Sub DelCustomStyles()
Dim st As Style
For Each st In ActiveWorkbook.Styles
If Not st.BuiltIn Then st.Delete
Next
End Sub
Dim st As Style
For Each st In ActiveWorkbook.Styles
If Not st.BuiltIn Then st.Delete
Next
End Sub
2.鍏抽棴VBA缂栬緫鍣紝杩斿洖Excel鐣岄潰銆傛寜Alt+F8锛屾墦寮鈥滃畯鈥濆璇濇锛屾墽琛屸淒elCustomStyles鈥濆畯鍗冲彲涓娆″垹闄ゆ墍鏈夎嚜瀹氫箟鍗曞厓鏍兼牱寮忥紝鑰屽唴缃殑鍗曞厓鏍兼牱寮忎細淇濈暀銆
灏辫繖涔堢畝鍗曪紝鎴戣繍琛屼簡涓涓嬶紝鍒犻櫎浜嗗皢杩戜笂鍗冧釜鏍峰紡锛屼及璁℃槸琛ㄦ牸鍦ㄨ浆鎹㈢殑杩囩▼涓嚭浜嗛棶棰樸




鈶 鏈珯鍙戣〃鐨勬棩蹇椾粎灞炰釜浜鸿鐐癸紱
鈶 鏃ュ織涓湭娉ㄦ槑"绂佹杞浇"瀛楁牱鐨勬枃绔狅紝濡傞渶杞浇锛岃娉ㄦ槑鍑哄锛屽苟涓斾繚鐣欐鏃ュ織鐨勯摼鎺ワ紱
鈶 绂佹鐩楅摼鏈珯鎵鏈夊浘鐗囥佽蒋浠躲佸奖闊虫枃浠跺湴鍧锛
鈶 鏈珯鎻愪緵涓嬭浇鐨勮祫婧愶紝浠呬緵鍙傝冩垨娴嬭瘯,涓嬭浇璇疯嚜琛屾潃姣掋傚閫犳垚浠讳綍涓嶈壇鍚庢灉锛屾涓嶈礋璐o紱
鈶 濡傛湁浠讳綍鐤戦棶锛岃闅忔椂涓庣珯闀胯仈绯伙細webmaster#smoile.com | smoile's缃戠涔嬭矾 銆
鈶 JPG鏍煎紡璇蜂娇鐢ACDSee宸ュ叿闃呰锛孭DF鏍煎紡璇蜂娇鐢Adobe Reader闃呰锛孌OC鏍煎紡璇蜂娇鐢∣ffice Word闃呰锛孯AR鏍煎紡璇风敤WINRAR闃呰銆

銆銆姝ら〉闈㈡彁渚涚殑鏂囦欢鍧囬氳繃NOD32鏉姣掕蒋浠舵壂鎻忔棤姣

銆銆鏈珯鎵鍒婅浇鍐呭鍧囦负涓汉鎾板啓鎴栦粠缃戠粶涓婃敹闆嗘暣鐞嗭紝骞朵笖浠ヨ绠楁満鎶鏈爺绌朵氦娴佷负鐩殑锛屼粎渚涘ぇ瀹跺弬鑰冿紝涓嶅瓨鍦ㄤ换浣曞晢涓氱敤閫斻備笉寤鸿鎮ㄥ皢鍏跺綋浣滄妧鏈缓璁垨鎿嶄綔寮曞鑰屾牴鎹叾鐩存帴琛屼簨銆傝嫢鎮ㄩ渶瑕佹妧鏈湇鍔★紝鎮ㄥ簲褰撴寮忓鎵樹笓涓氬叕鍙镐互淇濋殰鎮ㄧ殑鍚堟硶鏉冪泭銆傝繖浜涗俊鎭湁鍙兘涓嶆槸鏈鏂扮殑銆佸畼鏂圭殑淇℃伅锛屼篃鍙兘鏄负浜嗙爺绌舵煇涓鎶鏈棶棰樿屾彺寮曡嚜浠栧锛屽彲浠ヤ笉缁忛氱煡鑰屾洿鏀广傚鏋滄湰缃戠珯鍐呭涓嶆厧渚电姱浜嗘偍鐨勭増鏉冿紝璇蜂笌鎴戣仈绯伙紝鎴戝皢鍙婃椂澶勭悊锛屾挙涓嬬浉鍏冲唴瀹癸紒
璇勮: 0 | 寮曠敤: 0 | 鏌ョ湅娆℃暟: 1645
灏忔彁绀猴細鏂囦欢涓嬭浇涓嶄簡锛熶负浜嗛槻姝㈢洍閾炬帴锛屾湰绔欏仛浜嗘妧鏈鐞嗭紝闇瑕佷笅杞界殑缃戝弸璇烽槄璇杩欓噷锛岃幏鍙栭閫熶笅杞藉湴鍧銆
鍙戣〃璇勮涓洪槻姝㈡敞鍐屾満鐨勪娇鐢,鏈郴缁熷凡绂佹UBB浠g爜锛
璇峰湪鐣欒█涓嬁浣跨敤杩欎簺鍏抽敭瀛