< návrat zpět

MS Excel


Téma: Data Form tlačidlom rss

Zaslal/a 20.8.2017 11:59

Dobrý deň,
keď tento kód zadám do hárku tak mi všetko ide :

If WorksheetFunction.CountIf(Sheet2.Range("T8:T108"), [CurrentUser]) > 0 Then

If MsgBox("Chcete vložiť novú výpožičku?", vbYesNo, "Výpožička") = vbYes Then

SendKeys "%N", False

ActiveSheet.ShowDataForm

End If

End If
avšak keď tento kód chcem prepojiť na tlačidlo, tak mi vypisuje vždy chybu (viď v prílohe).

Příloha: jpg37327_data.jpg.jpg (19kB, staženo 47x)
37327_data.jpg.jpg
Zaslat odpověď >

icon #037337
eLCHa
Bez přílohy pouze tipuji, že spouštíte na jiném listu než chcete zobrazit formulář, přitom používáte ActiveSheet.citovat
#037340
avatar
celkovo mi už nejde tento riadok :
ActiveSheet.ShowDataForm
Příloha: zip37340_data-form.zip (171kB, staženo 22x)
citovat
icon #037343
eLCHa
Funguje mi toto

Odstranil jsem prázdné řádky 2:4 tak, aby data začínala na druhém řádku.
Takže první řádek si roztáhněte pro tlačítko. Pokud jsou nad daty 2 a více řádků, nefunguje to. Sloupce jsem netestoval.

Nazvat oblast Database (lze najít na internetu) mi také nefungovalo.
Příloha: zip37343_data-form.zip (171kB, staženo 27x)
citovat
#037350
avatar
vdaka za vyrieseniecitovat

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse