但另存為xls格式後,修改xls格式的內容-保存-關閉-重新打開後,格式會發生變化(有時保存後會關閉,重新打開時不會發生變化,但有時保存後會出錯):重新打開後,表格行沒了,日期變成數字格式,公式等等,保存時不會提示錯誤。
建議使用此代碼刪除單元格格式中的壹些格式(如附件):
子測試()
Dim mystyle As Style
對於ActiveWorkbook中的每個mystyle。風格
如果我的風格。BuiltIn = False Then mystyle。刪除
然後
末端接頭