Tak jsem vše dobře nastavila a funguje to.

Jen jak mám nastavit když zadám město: Praha aby se to automaticky v Kraj nastavilo Hlavní město Praha.
Nato nemůžu přijít.

Jak vyvolám formulář pravím tlačítkem myši.
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Columns("A:K")) Is Nothing And Target.Columns.Count <> Columns.Count And Target.Rows.Count <> Rows.Count Then ShowDataForm: Cancel = True
End Sub

Tento kód nefunguje.
Vyvolá to jen Excelovský formulář, já potřebuji můj formulář
Moc ti děkuji za tvoji ochotu mě pomoct.
PB