Bez toho súboru ťažko predjímať, ako si to vlastne predstavuješ..citovat
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: automatické řidávání hodnoty
MS Excel
Téma: automatické řidávání hodnoty 
Zaslal/a Plansecur 28.11.2011 19:38
dd všem kteří se vyznaji.
chtěl bych dosáhnout aby se v poly č.faktury přidávala automaticky hodnota +1
ve SW MS Works je taková funkce možná už při tvorbě takového pole.
přikládám soubor v doufání že se dá i v exelu něco vymyslet.
pokud ne děkuji přesto všem kteří se tím zabývali.
s.p.
Pavel
S těma přílohama je to volaké divné :-).
Funkce na to asi neexistuje, ale makrem se dá ošetřit spousta věcí :-), ale když to člověk nevidí tak je to fakt blbý :-).
přidávání pořadového čísla, něco jako ID v databázi lze provést třeba následovně:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 1 Then
Dim radek As String
radek = Target.Row & ":" & Target.Row
If Application.WorksheetFunction.CountA(Range(radek)) > 0 Then
Cells(Target.Row, 1) = Application.WorksheetFunction.Max(Range("A:A")) + 1
End If
End If
End Sub
M@citovat
Funkce na to asi neexistuje, ale makrem se dá ošetřit spousta věcí :-), ale když to člověk nevidí tak je to fakt blbý :-).
přidávání pořadového čísla, něco jako ID v databázi lze provést třeba následovně:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 1 Then
Dim radek As String
radek = Target.Row & ":" & Target.Row
If Application.WorksheetFunction.CountA(Range(radek)) > 0 Then
Cells(Target.Row, 1) = Application.WorksheetFunction.Max(Range("A:A")) + 1
End If
End If
End Sub
M@citovat
(7.12.2011 9:30)#006641
Někteří čitatelé chtějí bez přesného zadání hlavně bez zaslání souboru to správné řešení ( možná očekáváné) to vždy nejde. Např. Plansecur se na v podstatě totéž ptal ve vlákně
http://wall.cz/index.php?m=topic&id=6376
kde jsem se mu snažil popsat problém. Já ho vidím v tom, co si představuje pod "automaticky" buď je to nějaká událost tak jak jsou definovány ve VBA, a když tato událost nastane makro automaticky načte jedničku kde závisí od toho co zadám do programu nebo je to změna v tabulkách Excelu (listu) a pak to mohu dělat jak makrem tak v mnoha případech i pomocí vzorců ovšem bez toho, že napíšu při jaké události (změně) se má přičíst +1 a kde (v buňce, ve sloupci, v proměnné apod.) tak je každý návrh střílení do vzduchu naslepo.citovat
http://wall.cz/index.php?m=topic&id=6376
kde jsem se mu snažil popsat problém. Já ho vidím v tom, co si představuje pod "automaticky" buď je to nějaká událost tak jak jsou definovány ve VBA, a když tato událost nastane makro automaticky načte jedničku kde závisí od toho co zadám do programu nebo je to změna v tabulkách Excelu (listu) a pak to mohu dělat jak makrem tak v mnoha případech i pomocí vzorců ovšem bez toho, že napíšu při jaké události (změně) se má přičíst +1 a kde (v buňce, ve sloupci, v proměnné apod.) tak je každý návrh střílení do vzduchu naslepo.citovat
Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
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.
RSS nejnovější články