ano je TextBox5 a TextBox9, daj kod alebo subor, uvidime co nejdecitovat
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: neumim makra
Uzamčeno - nelze přidávat nové příspěvky.
Private Sub UserForm_Initialize()
r = 2
Do Until Sheets(1).Cells(r, 2) = ""
C3.AddItem Sheets(1).Cells(r, 2).Value
r = r + 1
Loop
End Sub
Private Sub C3_Change()
T16.Value = Sheets(1).Cells(UserForm2.C3.ListIndex + 2, 1).Value
T3.Value = Sheets(1).Cells(UserForm2.C3.ListIndex + 2, 3).Value
T9.Value = Sheets(1).Cells(UserForm2.C3.ListIndex + 2, 7).Value
End Sub
Private Sub UserForm_Initialize() - spravi sa pri inicializacii userformu
Private Sub C3_Change() - sprvai sa po zmene hodnoty v C3 (tam mas klienta , po tom co ho zmenis prebehne C3_Change
MS Excel
Téma: neumim makra 
Zaslal/a lajos 12.4.2012 20:46
Zdravím,
tak zdravotní stav opet dovolil neco delat a proto bych opet rád požádal o Vaši pomoc.V sešitě na listě KLIENT a zadám data o klientovi.Po ověření klienta mu pošlu fakturu.Na listu FAKTURA je UserForm od kterého bych chtěl toto:Ve formuláři v řádku klient bych potřeboval,jestli by bylo možné vyhledávat v jakémsi seznamu klientů(nejlépe zřejmě z prvního listu)podle jména a aby makro dosadilo i další atributy k danému klientovi jako je adresa,rodné číslo atd.Po uložení by se data z faktury zapsala do listu ARCHIV..
Opět to nechci celé na zlatém podnose,MISOCKO ví 
Snad je to pochopitelné.
Děkuji za Vaši pomoc
Příloha: 
8011_test111.rar (50kB, staženo 19x)
8011_test111.rar (50kB, staženo 19x) Uzamčeno - nelze přidávat nové příspěvky.Private Sub UserForm_Initialize()
r = 2
Do Until Sheets(1).Cells(r, 2) = ""
C3.AddItem Sheets(1).Cells(r, 2).Value
r = r + 1
Loop
End Sub
Private Sub C3_Change()
T16.Value = Sheets(1).Cells(UserForm2.C3.ListIndex + 2, 1).Value
T3.Value = Sheets(1).Cells(UserForm2.C3.ListIndex + 2, 3).Value
T9.Value = Sheets(1).Cells(UserForm2.C3.ListIndex + 2, 7).Value
End Sub
Private Sub UserForm_Initialize() - spravi sa pri inicializacii userformu
Private Sub C3_Change() - sprvai sa po zmene hodnoty v C3 (tam mas klienta , po tom co ho zmenis prebehne C3_Change
Příloha: 8055_kddd.zip (39kB, staženo 19x)
citovat8055_kddd.zip (39kB, staženo 19x)Ahoj Misocko,tak jsem to zvládl.Je to hodně o nepozornosti..a ted přijde na řadu snad už závěr a to uložení dat do jakési databaze.Zkusím vysvětlit.
Ozve se klient,zadám si ho do systemu na list Klienti.Mezitím dalších třeba deset klientů.Všichni na listě Klienti a čekají.Klienty prověřuji a po prověrce pokračuje další činnost.Prověřený klient je kontaktován a je mu zasláno několik papírů atd.Po kontrole papírů je zaslána faktura a klient je vyřešen.Potřebuji je ukládat na list Archiv a to tak,že by si to toho klienta mělo vyhledat,protože už tam je něco o něm uloženo.Tedy např.mám klienta Fr.Nováka.Je na listě klient a zároven už na listu archiv.Vystavim mu fakturu a data z té faktury by se měla uložit do listu Archiv k jeho jménu.Vystavím mu dopis a opět by se data měla uložit k jeho již uloženým datům.Z listu Archiv by mělo být možné pak zpětně data rekonstruovat..Snad je to pochopitelné
citovat
Ozve se klient,zadám si ho do systemu na list Klienti.Mezitím dalších třeba deset klientů.Všichni na listě Klienti a čekají.Klienty prověřuji a po prověrce pokračuje další činnost.Prověřený klient je kontaktován a je mu zasláno několik papírů atd.Po kontrole papírů je zaslána faktura a klient je vyřešen.Potřebuji je ukládat na list Archiv a to tak,že by si to toho klienta mělo vyhledat,protože už tam je něco o něm uloženo.Tedy např.mám klienta Fr.Nováka.Je na listě klient a zároven už na listu archiv.Vystavim mu fakturu a data z té faktury by se měla uložit do listu Archiv k jeho jménu.Vystavím mu dopis a opět by se data měla uložit k jeho již uloženým datům.Z listu Archiv by mělo být možné pak zpětně data rekonstruovat..Snad je to pochopitelné
citovatvzpln nejake data, hlavne nieco podla coho roylisime ci je klient v riesenei alebo vzriesenz, ci si to chces vzbrat sam yo yoynamu ?, tak ci tak daj subor kde bude yopar vzplnenzch riadkov. kua zas prehodena klavesnica y/z 
citovat
citovatAhoj,klient je vyřešen,pokud je mu odeslána faktura.Tím by měl být blokován proti např.nové faktuře.Pořadí řešení je:1.Uložení do listu Klient.2.List Dopis1+list Rámcová smlouva.3.Faktura.Po faktuře zablokovat proti změnám.Prozatím bych zůstal jen u toho,pokračování pak.OK?
Příloha: 8061_testulozit.rar (107kB, staženo 19x)
citovat8061_testulozit.rar (107kB, staženo 19x)tak a tu som skoncil, tu uz treba zacat rozmyslat a momentalne sa mi fakt nechce, mozno neskor ked ma daco jednoduche napadnecitovat
Ahoj,netušil jsem,že je to tak složité.No,dnad tě něco napadne.Já to sám dohromady rozhodně nedám,na to nemám.citovat
preco sam, tu na fore je plno sikovnych riesitelov, ak nie ja tak Ti pomozu urcite oni.citovat
Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
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
Vynásobit hodnoty kurzem - Power Query
Alfan • 26.4. 7:56
Relativní cesta - zdroje Power Query
Alfan • 26.4. 7:54
Vynásobit hodnoty kurzem - Power Query
elninoslov • 26.4. 7:54
Vynásobit hodnoty kurzem - Power Query
lubo • 25.4. 19:18
Relativní cesta - zdroje Power Query
elninoslov • 25.4. 15:12
Relativní cesta - zdroje Power Query
Alfan • 25.4. 15:08
Relativní cesta - zdroje Power Query
elninoslov • 25.4. 14:21
RSS nejnovější články