![]() |
|
#23
|
|||
|
|||
|
I'd use:
Code:
Sub M_snb()
sn = Sheet1.Range("H2:H23")
sp = [transpose(ref_sheet!B2:B17)]
For j = 1 To UBound(sn)
c00 = c00 & vbLf & Join(Filter(sp, sn(j, 1)), vbLf)
Next
y = UBound(Filter(Split(c00, vbLf), ".")) + 1
MsgBox Join(Filter(Split(c00, vbLf), "."), vbLf), , y
End Sub
|
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| How to Remove the subtotal columns in a sheet | Marcia | Excel | 3 | 12-01-2023 05:48 AM |
Relating cells in a row in one sheet to cells in columns on another sheet.
|
mbesspiata3 | Excel | 2 | 01-06-2017 05:42 AM |
Create a New Sheet from Existing Sheet with Specific Columns
|
malam | Excel Programming | 1 | 10-17-2014 10:01 PM |
From an XL sheet ,how to keep the group of columns which match with other XL sheet
|
Zubairkhan | Excel | 2 | 03-04-2014 10:57 PM |
| Removing columns within sheet | shabbaranks | Excel | 2 | 09-11-2012 05:03 AM |