Text z ComboBox vzít a vyhledat v listu excel – Visual Basic – Fórum – Programujte.com

Ahoj,

potřebuji pomoc s nastavením VBA. Mám vytvořený formulář, ve kterém si pomocí ComboBox vyhledávají lidé svou pracovní pozici. Potřebuji, aby se tato pozice pak vyhledala v dalším listě, ve sloupci E, kdy jeden řádek může obsahovat více pozic oddělených mezi sebou čárkou (např.: jsem na pozici AM, vyberu si ji v ComboBox a když kliknu na OK, tak se mi tato pozice vyhledá na dalším listě ve sloupci E a např. na řádku, kde je vypsáno: PBO, CBO, AM). Jedna pozice může být i na více řádcích v daném sloupci.

Předem moc děkuju :-)

#1 Zuzka
Tak jsem si to nakonec vyřešila a funguje výborně :-)

Sub ZobrazSkryte()

Dim POZICE As String
Dim SEZNAM As String
' je nutné v excelu přes Vzorce - Definované názvy vydefinovat oblast buňek'

For Each cell In Range("SEZNAM")
For Each cell2 In Range("POZICE")
If InStr(1, cell, cell2) <> 0 Then cell.EntireRow.Hidden = False

Next
Next

End Sub