摘要: '用于将单元格区域中的值用分隔符连接起来Public Function LinkThem(range As range, Optional delimiter As String = ",", Optional quotedChar As String = "") As String Dim resultString As String For Each cell In range.Cells resultString = IIf(resultString = "", "", resultString &a 阅读全文
posted @ 2014-01-22 15:37 步步为赢 阅读(189) 评论(0) 推荐(0)