Takže řešení: šlo vlastně o to udělat aby se každým krokem, kterým projede cyklus For Each tabulku při nalezení zadaného jména do InputBoxu přičetla k proměnné p +1. A následně MsgBox umístit až za If a For Each, jinak by se objevoval MsgBox pořád dokola s tím, že by se např. jméno vyskytovalo pětkr...

Tak dobrý,
už jsem to vyřešil, díky moc :-)

Jasně já to chápu ale když tam bude např. pět jmen se stejným názvem tak se ukáže: MsgBox 1 MsgBox 2 . . . Prostě pětkrát MsgBox přičemž v každém to je postupně v prvním je 1, druhém je 2 atd. Možná to nějak sečíst. Ale nevim právě. Dám sem přílohu jak to vypadá a zkuste se na to někdo kouknout. Má ...

Zdravím vás lidi, prosím vás budte tak hodní a poraďte mi jen s takovou maličkostí, která mi nejde. Máte tabulku dejme tomu od A1 do F8 s jmény lidí Pro představu načrtnu sem: Středisko / Den Pondělí Úterý Středa Čtvrtek Pátek A Hak Hak Janda Vach Nový B Nový Nový Hak Flégl Král C Janda Janda Dobrý ...