Private Sub UserForm_Initialize()
'naplnenie comboboxu
r = 2
Do Until Sheets(1).Cells(r, 2) = ""
C1.AddItem Sheets(1).Cells(r, 2).Value
r = r + 1
Loop
End Sub
aktivujes userform 2, mas na nom combobox s nazvom C1 ? - nemas, co chces naplnit (C1.AddItem Sheets(1).Cells(r, 2).Value)? . ale v poho, pomaly sa k tomu dopracujeme.
inac vies krokovat makro? lahsie sa dopracujes k tomu co sa deje. Takze v editore VBA prides na makro ktore spusta userform (Userformx.show), kliknes tam na prvy riadok Sub.........., a stlacas F8, ked tam mas nejaku chybu tak zistis na ktorom riadku sa to zastavi a lahsie sa ti detekuje o co ide, skus keby daco pis.
a co keby si tu konecne dal subor v ktorom Ti to nefunguje ?
mas nejaku zvlastnu verziu excelu?
druha moznost je oznacit stlpec v ktorom mas tie hodnoty, stlacit Ctrl+H, das hladat " ml" a nahradit nicim ""(uvodzovky tam nepis)
pouzil by som pomocny stlpec v ktorm by som pomocou =ČÁST(A1;7;2) vytiahol 7 a 8 cislo, a nasledne to cele usporiadal podla tohto stlpca
=ČÁST(A1;1;DÉLKA(A1)-3)
pokial je to 100 ml v bunke A1 a pokial mas cesku mutaciu
ak mas anglictinu pozri subor
v pripade ak je to "ml" iba format bunky , tak zrusit formatovanie
T1.Value = Sheets(1).Cells(UserForm1.C1.ListIndex + 2, 6).Value
mas tu napisane UserForm1 ale Ty pracujes s Userform4 - prepis na 4 a uz to pojde, drobnosti a kolko narobia problemov
jaj, treba tam doplnit do
T1.Value = Cells(UserForm1.C1.ListIndex + 2, 3).Value
Sheets(x). pred to Cells aby vedel na ktorom liste su tie bunky (to x je cislo listu, alebo tam mozes dat nazov listu v uvodzovkach)
prosimta daj sem text toho makra alebo cely subor, alebo aspon link na temu o ktorej tu pises.
toto "-6099.......makro hladanie hodnoty A1 v stl. B, A2 .....- " je co?
takto si tu Tvoju temu nikto ani neprecita nieze by sa snazil este hladat na co prave myslis, pripadne Ti pomohol.
ahoj
tak bez zlateho podnosu, skus
http://wall.cz/index.php?m=topic&id=7769
skus ci nepomoze
oznacis stlpec kde mas data, zvolis v menu Data, Text do sloupcu (Text to columns), das Dalsi, vyberies moznost Čarka , das Dokoncit
tak tie vzorce to docela komplikuju, existuje stlpec v ktorom niesu vzorce a su kopirovane data (podla coho zistime ze sa jedna o posledny vypneny riadok pred vzorcami)?
daj nejaky kusisko suboru nech sa na to mozme pozriet ako by sa to dalo vymysliet.
tak s tlacou Ti ja nepomozem, moznoo by som na Tvojom mieste skusil zaznam makra a potom vymazal zbytocnosti....
mozno niekto vie, a pomoze
Application.Screenupdating = False - vypne zobrazovanie
Application.Screenupdating = True - zapne zobrazovanie, takze by som na Tvojom mieste zapol zobrazovanie pred kodom pre tlac, potom podla potreby zas vypol. Mne to Tvoje makro nejde nakolko mam 2003, tak to tam nempzem checknut o co presne ide
Preco sa uz konecne nenaucite davat sem subor s malou vzorkou?
k teme: 1.nemozes usporiadat data podla stlpca A? potom budes mat vsetky duplicity pekne za sebou
2. ak v stlpci A najdes druhykrat "x1" a pridas mu hodnotu "ANO" tak chces aby sa vsetkym dalsim "x1" priradilo "ANO" ? alebo aby sa "ANO" priradilo aj vsetkym ostatnym duplicitam (ak existuju duplicity X2, X3 atd tak aj im priradit ano? (tu by pomohol subor keby si ho tu dal a nemusel by som sa pytat)
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
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.