Příspěvky uživatele


< návrat zpět

Chyba při nastavení ověření dat pomocí VBA (11.5.2019 18:05)

Zdravím, chtěl jsem nastavit jednoduché makro, které by na zvolenou buňku nastavilo ověření dat(List). Bohužel ani při pokusu makro nahrát záznamem (na kód jsem ani nesáhl) mi po spuštění Excel hází chybu Application-defined or object-defined error. Už si opravdu nevím rady. Zdá se, že Excelu vadí přímo stavba oné formule, což opravdu nevím proč. Chci jenom, aby Excel vzal ten kód a hodil do nastavení toho ověření dat. Mimochodem když to nastavím ručně (ten kód tam dám sám), tak vše bez problému funguje.

Range("X7:AB7").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:= _
"=POSUN(Program!$A$3;POZVYHLEDAT(1;(Program!$B$4:$B$30=$X$5)*(Program!$C$4:$C$30="Ano");0);0;COUNTIFS(Program!$B$4:$B$30;$X$5;Program!$C$4:$C$30;"Ano"))"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With

Děkuji za veškeré rady


Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje