MS Excel

Téma: Nutnost zadat data

Zaslal/a zejdy 21.12.2010 23:56

Prosím o radu, jak donutit uživatele, aby před uložením sešitu zadal data do určité buňky.Ověření dat v tomto případě nepomáhá. Děkuji

Zaslat odpověď >

Poki(22.12.2010 9:18)#003582

tuto proceduru vlozte do modulu ThisWorkbookPrivate Sub Workbook_BeforeClose(Cancel As Boolean)
If IsEmpty(List1.Range("B3")) Then
MsgBox "Vyplňte buňku B3, protože jináč to nezavřete :-)", vbCritical
List1.Range("b3").Select
Cancel = True
End If
End Subcitovat

zejdy(22.12.2010 22:00)#003595

Díky moc za rychlou odpověď, funguje to, jenom to zcela neřeší můj problém. V listu mám cca 10x pod sebou stejnou tabulku. Ty se v průběhu měsíce postupně vyplňují. Jde mi o to, že když se začne vyplňovat jedna tabulka, aby bylo nutno do ní zadat např. datum nebo jméno uživatele, který data zadává. První tabulka je jasná, to řeší Váš kód. A pak bych asi musel pro každou další tabulku kód opakovat a navázat to na vyplněnou předchozí tabulku. Zkusím to nějak spatlat. Díky.citovat

Uživatelské menu

Nejste přihlášen(a)

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.