如题所述
ç®åè¯æ³
å¦ä½å¤æä¸å¼ sheetæ没æèµæ
IsSheetEmpty = IsEmpty(ActiveSheet.UsedRange)
Excel
VBAä¸ï¼IsEmptyå½æ°æ¯å¤æåå æ ¼æ¯å¦ä¸ºç©ºçæ好çæ¹æ³ï¼ä½¿ç¨æ¹æ³ä¸ºIsEmptyï¼Cells(Row,Col)ï¼ï¼å½åå æ ¼ä¸ºç©ºæ¶ï¼è¿åTrueï¼å¦åè¿åFalseãå¦æ使ç¨Cells(Row,Col)=""ï¼å¯¹äºè®¡ç®ä¸ºé¶é¿åº¦å符串çå ¬å¼ï¼å¤æç»æ为Trueã
å¦ä½å¤æä¸å¼ sheetæ没æèµæ
IsSheetEmpty = IsEmpty(ActiveSheet.UsedRange)
Excel
VBAä¸ï¼IsEmptyå½æ°æ¯å¤æåå æ ¼æ¯å¦ä¸ºç©ºçæ好çæ¹æ³ï¼ä½¿ç¨æ¹æ³ä¸ºIsEmptyï¼Cells(Row,Col)ï¼ï¼å½åå æ ¼ä¸ºç©ºæ¶ï¼è¿åTrueï¼å¦åè¿åFalseãå¦æ使ç¨Cells(Row,Col)=""ï¼å¯¹äºè®¡ç®ä¸ºé¶é¿åº¦å符串çå ¬å¼ï¼å¤æç»æ为Trueã
温馨提示:答案为网友推荐,仅供参考
第1个回答 2017-07-03
工具-选项-显示,工作表标签前面打钩