替自定義函數設置參數

替自定義函數設置參數

本文為《別怕，Excel VBA其實很簡單（第3版）》隨書問題參-

可以使用下面的自定義函數來解決這一問題：

Function JoinText() Dim c As Range For Each c In Range("A2:B8") JoinText = JoinText & c.Text Next cEnd Function

說明：

在下面的這行代碼中：

JoinText = JoinText & c.Text

Text屬性返回的是單元格中數據的顯示信息，即眼睛看到的數據樣子。所以，使用這行代碼，合并的只是數據的顯示內容，不一定是實在存儲的數據本身。如果想合并存儲的數據本身，可以將代碼改為：

JoinText = JoinText & c.Value

即：將Text屬性屬性為Value屬性。

版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。

版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。