< návrat zpět

MS Excel


Téma: ověření v tabulce II rss

Zaslal/a 16.11.2010 17:14

http://wall.cz/index.php?m=topic&id=2967

šlo by upravit makro tak, aby při vyplnění poslední pravé buňky (sloupec P) došlo k automatickému uložení všech změn v sešitu?

Příloha: zip3174_2985_formular.zip (30kB, staženo 12x)
Zaslat odpověď >

icon #003182
Poki
zkus do modulu Listu pridat tento kod:Private Sub Worksheet_Change(ByVal Target As Range)
radek = Cells(65000, 1).End(xlUp).Row
If Not Intersect(Target, Cells(radek, 16)) Is Nothing And IsEmpty(Target) = False Then
ThisWorkbook.Save
MsgBox "Sešit byl uložen", vbInformation, "Saved"
End If
End Sub
citovat
#003365
avatar
Funguje,
díkycitovat

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

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09