Listbox displaying named range B but Adding named range A to cell

Hello,
I’m searching for a way to display a named range (from column B) in a userform listbox, but add the value from another named range (from column A) to the active cell after the selection. I didn’t find a thread about listboxes that resembles this. Is there any way to achieve this?

This is my code:

Please Login or Register  to view this content.

Why not load both into listbox then, set columnwidth property of column A to zero to hide it. So you can use column index to retrieve value?

Sample Code below.

Please Login or Register  to view this content.

Please Login or Register  to view this content.

That's a clever trick, thank you for the quick reply.

I've noticed an odd behavior of the listbox. After loading RV from the Active Cell value back in the listbox it's giving V (instead of RV) As the selected value. Somehow it only occurs if the last letter is available as a single letter in that list (...also with A instead of LA).

RV becomes V.JPG

Could this be some kind of bug?

Ah, I see your issue.

You are checking for Instr(ActiveCell.Value, .List(i)) > 0.

So above is checking that...

.List(i) occurs as part of ActiveCell.Value...

R, V, & RV all evaluate to being true for the check. And since you don't have Exist For or any other process to stop the loop.... it finds match as i = 1, 3, & 6. And always exit loop at last match (6).

Instead of using Instr to check. Use ActiveCell.Value = .List(i) for exact match.