MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.
Add your voice to the tech community where 5M+ people, just like you, are talking about what matters.
and the function to enter into the spreadsheet is here:
Function strcat(rng As Range, Optional dlm As String = ",", Optional bUseFormat As Boolean = True) Dim cel As Range For Each cel In rng If cel.Value <> "" Then strcat = strcat & dlm & IIf(bUseFormat, cel.Text, cel.Value) Next cel strcat = Mid$(strcat, Len(dlm)) End Function
Something I noticed just recently that I had not noticed previously is that when using this code, a delimiter is inserted prior to the first cell's contents. For example, if the contents of five cells to be concatenated are:
|Finding cells in Excel 2016 that are either RED or YELLOW and returning a msg box with the cell references||3||31|
|Excel 201 rounding creating a problem with my macro||11||35|
|Random times with 12/24 hour switching||9||28|
|Word Personalized Watermarks||5||34|