If you want to concatenate non blank cells in a range . Snapshot below-
Function concatenate_nonblanks(x As Range, spl As String)
Dim cell As Range
Dim rsl As String
For Each cell In x
If cell <> vbNullString Then
rsl = rsl & spl & cell
concatenate_nonblanks = Right(rsl, Len(rsl) - 1)
Macro to import data from SQL using ADO connection string: Sub Import_data_from_SQL() ' Tools -> References -> Microsoft Active...
If you want to add a new menu on mouse right click "Workbook Navigation showing you the list of all open workbooks and worksheets in ea...
Please make sure that you have the latest Version Tool Last Updated on 17 Feb, 2012 Version 1.6 English Version For Excel 2007 &...