標題: [發問] 請教 陣列/數組 如何每5個一行顯示 出來?? [打印本頁]

---

作者: adrian_9832    時間: 2020-7-10 22:15     標題: 請教 陣列/數組 如何每5個一行顯示 出來??

請教

問題1 如何可以每5個一行  MSGBOX 顯示出來
問題2 如何知道數組 的 總個數??

現在只能一次過顯示

謝謝各位

---

作者: adrian_9832    時間: 2020-7-10 23:37

不好意思 更正 每五個一列 顯示

---

作者: quickfixer    時間: 2020-7-11 01:47

回復 2# adrian_9832


Sub test()
    lastrow = Range("A1").CurrentRegion.Rows.Count
    For i = 1 To lastrow
        s = s & Cells(i, 1) & IIf(i Mod 5 = 0, vbNewLine, IIf(i = lastrow, "", ","))
    Next i
    MsgBox s
End Sub

---

作者: adrian_9832    時間: 2020-7-11 14:02

回復 3# quickfixer

謝謝你的幫助啊!!!

但能解說一下 沒用過IIF 這方式

---

作者: hcm19522    時間: 2020-7-11 15:44

https://blog.xuite.net/hcm19522/twblog/589224129

---

作者: adrian_9832    時間: 2020-7-11 16:37

謝謝教學!!!!!!!!!!!!!!!!!!!!!!

---

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