標題: [發問] 儲存格自動變換列高問題請教 [打印本頁]

---

作者: rouber590324    時間: 2017-11-17 15:32     標題: 儲存格自動變換列高問題請教

DEAR ALL 大大
1.儲存格自動變換列高問題請教
1.1 SHEET1.RANGE("A1") 內書寫涵數 = SHEET2.RANGE("B1")
      因  SHEET2.RANGE("B1")內之字元數目不一定.所以於SHEET1.RANGE("A1") 內
    有設定儲存格自動換列.但當 SHEET2.RANGE("B1")字元過多時SHEET1.RANGE("A1")
     並無自動變換列高以符合秀出ALL文字
2.請教如何寫SHEET1.RANGE("A1") 之VBA讓其依內容字元數自動變換秀出ALL字元之列高.
  煩不吝賜教  THANKS*10000

---

作者: ikboy    時間: 2017-11-18 19:01

回復 1# rouber590324

1. Sub zz()
   
2. With sheet1
   
3.     .Rows(1).WrapText = True
   
4.     .Rows(1).AutoFit
   
5. End With
   
6. End Sub

複製代碼

---

作者: rouber590324    時間: 2017-11-20 10:00

DEAR ikboy 大大
1.您之內容用於一般OK
  但我試還是不行
  此除存格使用 儲存格自動換列 已無法自動換列 THANKS

---

作者: naruto018    時間: 2017-11-21 17:00

回復 3# rouber590324


    A1那格是不是有合併多個儲存格？

---

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