国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁(yè) > 辦公 > Excel > 正文

Excel樣式亂碼修復(fù)方法(批量刪除excel樣式)

2019-12-13 12:09:32
字體:
供稿:網(wǎng)友
過節(jié)的時(shí)候遇到一個(gè)求救,一個(gè)很小的問題,但是卻讓客服覺得是天大的事情,本著助人為樂的想法,我還是按照約定的時(shí)間前往,縱然我要做奶爸,縱然老天不給力下起了雨。
癥狀:一個(gè)包含N多個(gè)工作簿N多條數(shù)據(jù)的Excel突然間樣式全部亂碼了(類似這個(gè)),導(dǎo)致之前的一些格式起不了作用(主要是時(shí)間,變成了數(shù)字),雖然之前我讓客戶通過選擇性粘貼的方法解決,當(dāng)時(shí)當(dāng)數(shù)據(jù)換到其他電腦的時(shí)候還是不行,于是找了一下方法,還真有。



方法:1.按Alt+F11打開VBA編輯器,在代碼窗口中輸入下列代碼:

ASP/Visual Basic Code復(fù)制內(nèi)容到剪貼板
  1. Sub DelCustomStyles()   
  2.    Dim st As Style   
  3.    For Each st In ActiveWorkbook.Styles   
  4.      If Not st.BuiltIn Then st.Delete   
  5.    Next  
  6.    End Sub  
2.關(guān)閉VBA編輯器,返回Excel界面。按Alt+F8,打開“宏”對(duì)話框,執(zhí)行“DelCustomStyles”宏即可一次刪除所有自定義單元格樣式,而內(nèi)置的單元格樣式會(huì)保留。
就這么簡(jiǎn)單,我運(yùn)行了一下,刪除了將近上千個(gè)樣式,估計(jì)是表格在轉(zhuǎn)換的過程中出了問題。
發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板: 泰兴市| 东光县| 绥江县| 前郭尔| 广汉市| 黄骅市| 深圳市| 合作市| 宁晋县| 固阳县| 崇阳县| 高阳县| 金坛市| 明水县| 大庆市| 开平市| 沭阳县| 个旧市| 东山县| 大兴区| 五原县| 治县。| 唐海县| 吴川市| 汝南县| 略阳县| 奉贤区| 广州市| 惠来县| 江津市| 江城| 博野县| 故城县| 临漳县| 迭部县| 开封市| 吴堡县| 舟山市| 双峰县| 康乐县| 临夏市|