<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Re: Multi select (light red|blue|green) doesn't work? in QlikView</title>
    <link>https://community.qlik.com/t5/QlikView/Multi-select-light-red-blue-green-doesn-t-work/m-p/509425#M1132878</link>
    <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Thanx everyone. If you are interested in what I was trying to do. Here is a little more information. We often get Excel workbooks from users with lists that they want to "search" for in QlikView. This is a work around that they can use without loading a table. e.g.&lt;/P&gt;&lt;P&gt;&lt;IMG alt="Excel.png" class="jive-image" src="https://community.qlik.com/legacyfs/online/49766_Excel.png" /&gt;&lt;/P&gt;&lt;P&gt;Here is the code that I put together for Excel. The user selects the first cell and the macro creates the search string and copies it to the clipboard. I pasted the resulting string in the cell but the user would paste in to a QlikView Search area.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Not very elegant but seems to work.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Sub Search_String()&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim rws As Long&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim IDcol As String&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim FirstDataRow As Long&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim FirstPart As String&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim LastPart As String&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim outputText As String&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim strFICSearch As String&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Const Delim = ""&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; On Error GoTo err_handler&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Application.ScreenUpdating = False 'stops the screen from showing the execution of the code&lt;BR /&gt;&amp;nbsp;&amp;nbsp; &lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; IDcol = Split(ActiveCell(1).Address(1, 0), "$")(0) 'Gets the column letter(s)&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; FirstDataRow = ActiveCell.Row&amp;nbsp;&amp;nbsp; 'Gets the 1st row number to be sorted&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; With ActiveSheet 'determines the sheet where the rows to sort are located&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; rws = .Range(IDcol &amp;amp; Rows.Count).End(xlUp).Row - FirstDataRow + 1 'determines the rows to sort - stops at the first blank row&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .Columns(IDcol).Insert 'inserts a new column to the left of the sort columnActiveCell.Columns("A:A").EntireColumn.Select&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Selection.ClearFormats&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; With .Range(IDcol &amp;amp; FirstDataRow).Resize(rws) 'resizes the range to include both columns&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .FormulaR1C1 = "=CONCATENATE(RC[1],""|"")" 'builds the search string in the cell to the left using the concatenation formula"&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .Value = .Value 'converts the formula to a value&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; End With&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .Range(IDcol &amp;amp; FirstDataRow, ActiveSheet.Range(IDcol &amp;amp; FirstDataRow).End(xlDown)).Select 'determines and selects the contiguous range of VINs&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; For Each cell In Selection&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; outputText = outputText &amp;amp; cell.Value &amp;amp; Delim 'basically concatenates each cell's value in a string&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; Next cell&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; With Selection&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .Clear 'clears the cells contents in prepararion for the merging of the cells&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .Cells(1).Value = outputText 'sets the first cells contents to the search string&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; '.Merge 'merges the cells in the range&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; End With&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; Selection.Cells(1).Value = Replace("(" &amp;amp; left(outputText, Len(outputText) - 1) &amp;amp; ")", " ", "?") 'deletes the last | in the string,adds parentheses and replaces spaces with ?'s as a wildcard&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; With New DataObject 'creates a new data object&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .SetText Range(IDcol &amp;amp; FirstDataRow).Text 'sets its text value to the cell's content i.e.the search string&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .PutInClipboard 'put the text onto the Windows clipboard for use later&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; End With&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .Range(IDcol &amp;amp; FirstDataRow).EntireColumn.Delete 'deletes the new column&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; End With&lt;BR /&gt;&amp;nbsp;&amp;nbsp; &lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Application.ScreenUpdating = True ' turns screen updating back on&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; MsgBox ("Search String Created")&lt;/P&gt;&lt;P&gt;err_handler:&lt;BR /&gt;Application.ScreenUpdating = True&lt;BR /&gt;End Sub&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
    <pubDate>Fri, 29 Nov 2013 15:01:14 GMT</pubDate>
    <dc:creator />
    <dc:date>2013-11-29T15:01:14Z</dc:date>
    <item>
      <title>Multi select (light red|blue|green) doesn't work?</title>
      <link>https://community.qlik.com/t5/QlikView/Multi-select-light-red-blue-green-doesn-t-work/m-p/509420#M1132873</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;I have been able to set a multi-selection on a field using the following syntax: (red|blue|green)&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;However, when I try something like (light red|blue|green) it fails. It does not seem to like the space between "light" and "red". I have tried using quotation marks e.g. ("light red"|blue|green) , ('light red'|blue|green) but I can't seem to come up with the right combination. We have QlikView 9 on the Server.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;I'm sure I'm missing the obvious. If someone could point me in the correct direction, it would be appreciated.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;thank you&lt;/P&gt;&lt;P&gt;Grant&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Fri, 29 Nov 2013 12:58:44 GMT</pubDate>
      <guid>https://community.qlik.com/t5/QlikView/Multi-select-light-red-blue-green-doesn-t-work/m-p/509420#M1132873</guid>
      <dc:creator />
      <dc:date>2013-11-29T12:58:44Z</dc:date>
    </item>
    <item>
      <title>Re: Multi select (light red|blue|green) doesn't work?</title>
      <link>https://community.qlik.com/t5/QlikView/Multi-select-light-red-blue-green-doesn-t-work/m-p/509421#M1132874</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;How about (light?red|blue|green) ?&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;- Ralf&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Fri, 29 Nov 2013 13:18:38 GMT</pubDate>
      <guid>https://community.qlik.com/t5/QlikView/Multi-select-light-red-blue-green-doesn-t-work/m-p/509421#M1132874</guid>
      <dc:creator>rbecher</dc:creator>
      <dc:date>2013-11-29T13:18:38Z</dc:date>
    </item>
    <item>
      <title>Re: Multi select (light red|blue|green) doesn't work?</title>
      <link>https://community.qlik.com/t5/QlikView/Multi-select-light-red-blue-green-doesn-t-work/m-p/509422#M1132875</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;There are unfortunately some inconsistencies in the composite search. We are addressing those, but they have not been fixed yet.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Ralf's suggestion should work. Or, you add quotes around all three strings and use wild cards, e.g.&lt;/P&gt;&lt;P&gt;("light red"|"blue"|"green") or&lt;/P&gt;&lt;P&gt;("*red"|"blue"|"green") &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;The trick is to use double quotes on all three values - or on none (but then you can't have spaces).&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;HIC&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;IMG alt="Composite search.png" class="jive-image" src="/legacyfs/online/49747_Composite search.png" /&gt;&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Fri, 29 Nov 2013 13:46:36 GMT</pubDate>
      <guid>https://community.qlik.com/t5/QlikView/Multi-select-light-red-blue-green-doesn-t-work/m-p/509422#M1132875</guid>
      <dc:creator>hic</dc:creator>
      <dc:date>2013-11-29T13:46:36Z</dc:date>
    </item>
    <item>
      <title>Re: Multi select (light red|blue|green) doesn't work?</title>
      <link>https://community.qlik.com/t5/QlikView/Multi-select-light-red-blue-green-doesn-t-work/m-p/509423#M1132876</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Ralf,&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; Thanx for the response. I should be able to use it.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;As odd as it is, this is what I'm doing.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;I am creating the "search" string in MS Excel with vba by concatenating cell values together with | and copying it to the clipboard. The user then pastes it into a list box's search area.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;I will change the vba to replace any "spaces" with "?'s" in the search string. This should work but I was hoping that I could avoid doing so.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;thank you&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Fri, 29 Nov 2013 13:46:50 GMT</pubDate>
      <guid>https://community.qlik.com/t5/QlikView/Multi-select-light-red-blue-green-doesn-t-work/m-p/509423#M1132876</guid>
      <dc:creator />
      <dc:date>2013-11-29T13:46:50Z</dc:date>
    </item>
    <item>
      <title>Re: Multi select (light red|blue|green) doesn't work?</title>
      <link>https://community.qlik.com/t5/QlikView/Multi-select-light-red-blue-green-doesn-t-work/m-p/509424#M1132877</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Henric,&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; Thank you for the reply. Now I know. I will try the solution I mentioned in my reply to Ralf.&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Fri, 29 Nov 2013 13:55:38 GMT</pubDate>
      <guid>https://community.qlik.com/t5/QlikView/Multi-select-light-red-blue-green-doesn-t-work/m-p/509424#M1132877</guid>
      <dc:creator />
      <dc:date>2013-11-29T13:55:38Z</dc:date>
    </item>
    <item>
      <title>Re: Multi select (light red|blue|green) doesn't work?</title>
      <link>https://community.qlik.com/t5/QlikView/Multi-select-light-red-blue-green-doesn-t-work/m-p/509425#M1132878</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Thanx everyone. If you are interested in what I was trying to do. Here is a little more information. We often get Excel workbooks from users with lists that they want to "search" for in QlikView. This is a work around that they can use without loading a table. e.g.&lt;/P&gt;&lt;P&gt;&lt;IMG alt="Excel.png" class="jive-image" src="https://community.qlik.com/legacyfs/online/49766_Excel.png" /&gt;&lt;/P&gt;&lt;P&gt;Here is the code that I put together for Excel. The user selects the first cell and the macro creates the search string and copies it to the clipboard. I pasted the resulting string in the cell but the user would paste in to a QlikView Search area.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Not very elegant but seems to work.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Sub Search_String()&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim rws As Long&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim IDcol As String&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim FirstDataRow As Long&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim FirstPart As String&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim LastPart As String&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim outputText As String&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim strFICSearch As String&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Const Delim = ""&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; On Error GoTo err_handler&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Application.ScreenUpdating = False 'stops the screen from showing the execution of the code&lt;BR /&gt;&amp;nbsp;&amp;nbsp; &lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; IDcol = Split(ActiveCell(1).Address(1, 0), "$")(0) 'Gets the column letter(s)&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; FirstDataRow = ActiveCell.Row&amp;nbsp;&amp;nbsp; 'Gets the 1st row number to be sorted&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; With ActiveSheet 'determines the sheet where the rows to sort are located&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; rws = .Range(IDcol &amp;amp; Rows.Count).End(xlUp).Row - FirstDataRow + 1 'determines the rows to sort - stops at the first blank row&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .Columns(IDcol).Insert 'inserts a new column to the left of the sort columnActiveCell.Columns("A:A").EntireColumn.Select&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Selection.ClearFormats&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; With .Range(IDcol &amp;amp; FirstDataRow).Resize(rws) 'resizes the range to include both columns&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .FormulaR1C1 = "=CONCATENATE(RC[1],""|"")" 'builds the search string in the cell to the left using the concatenation formula"&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .Value = .Value 'converts the formula to a value&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; End With&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .Range(IDcol &amp;amp; FirstDataRow, ActiveSheet.Range(IDcol &amp;amp; FirstDataRow).End(xlDown)).Select 'determines and selects the contiguous range of VINs&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; For Each cell In Selection&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; outputText = outputText &amp;amp; cell.Value &amp;amp; Delim 'basically concatenates each cell's value in a string&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; Next cell&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; With Selection&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .Clear 'clears the cells contents in prepararion for the merging of the cells&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .Cells(1).Value = outputText 'sets the first cells contents to the search string&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; '.Merge 'merges the cells in the range&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; End With&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; Selection.Cells(1).Value = Replace("(" &amp;amp; left(outputText, Len(outputText) - 1) &amp;amp; ")", " ", "?") 'deletes the last | in the string,adds parentheses and replaces spaces with ?'s as a wildcard&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; With New DataObject 'creates a new data object&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .SetText Range(IDcol &amp;amp; FirstDataRow).Text 'sets its text value to the cell's content i.e.the search string&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .PutInClipboard 'put the text onto the Windows clipboard for use later&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; End With&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; .Range(IDcol &amp;amp; FirstDataRow).EntireColumn.Delete 'deletes the new column&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; End With&lt;BR /&gt;&amp;nbsp;&amp;nbsp; &lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Application.ScreenUpdating = True ' turns screen updating back on&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; MsgBox ("Search String Created")&lt;/P&gt;&lt;P&gt;err_handler:&lt;BR /&gt;Application.ScreenUpdating = True&lt;BR /&gt;End Sub&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Fri, 29 Nov 2013 15:01:14 GMT</pubDate>
      <guid>https://community.qlik.com/t5/QlikView/Multi-select-light-red-blue-green-doesn-t-work/m-p/509425#M1132878</guid>
      <dc:creator />
      <dc:date>2013-11-29T15:01:14Z</dc:date>
    </item>
  </channel>
</rss>

