標題: [發問] 如何自動判斷一列中空白格欄位後隱藏此欄? [打印本頁]

---

作者: starry1314    時間: 2016-2-13 13:48     標題: 如何自動判斷一列中空白格欄位後隱藏此欄?

因使用樞紐表製作表單,但有時參照資料的變動 導致樞紐表有時多或少欄位,

將會導致表格中間出現空白欄,能否以如第9列的AN:AR欄開始自動判斷 有空格則自動隱藏欄?

---

作者: starry1314    時間: 2016-2-13 14:09

回復 1# starry1314

已解決....第9列出現空白 則自動隱藏所再欄

1. Sub 自動隱藏()
   
2. '
   
3. ' 自動隱藏 巨集
   
4. 
   
5. For I = 42 To 70
   
6. 
   
7. If Cells(9, I) = "" Then
   
8. 
   
9. Columns(I).EntireColumn.Hidden = True
   
10. 
    
11. End If
    
12. Next
    
13. 
    
14. 
    
15. End Sub

複製代碼

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)