Příspěvky uživatele
< návrat zpět
@venali
Ale ZIP snáď funguje. Zbaľ to do ZIPu.
A keď to elninoslov nemal možnosť, kde by ten kód overil, tak to je ťažké. Možno to písal z mobilu.
eLCHa napsal/a:
Já poprosím všechny zúčastněné, aby kód vkládali do tagu code - to je to tlačítko $ (dolar)
Kdo to má číst.
Děkuji
@Venali
žádnou urážku jsem nenašel - pokud tam je, specifikujte
Už som to napravil.
Tá "urážka" asi bola na mňa. Ale je to chyba zadávateľky, ak nechápe ako funguje SELECT. Zapíše ich niekoľko za sebou a potom sa diví, že to funguje inak, ako si predstavovala.
Anonym napsal/a:
Upravená verze, snad bude stačit
Toto vyzerá fajn.
Range("A96:I143").Select
ActiveSheet.PageSetup.PrintArea = Range("$A$1:$I$95," Selection.Address).Address
ActiveSheet.PrintOut Preview:=True
End If
If Range("B144").Value > 0 Then
Range("A144:I187").Select
ActiveSheet.PageSetup.PrintArea = Range("$A$1:$I$95," Selection.Address).Address
ActiveSheet.PrintOut Preview:=True
End If
No keby si to zadala takto tak by to bolo o inom. Ale ťažko radiť, keď nevieme ako má presne vyzerať výstup.
Toto nie je o skúsenostiach s VBA, ale o logiku. Platí to pre všetky jazyky, nielen pre VBA.
Predpokladám, že ten kód od elninoslov si ani nevyskúšala.
Problém bude medzi stoličkou a klávesnicou.
Ak v B191 bude "4" a v B238 bude "0", tak sa vytlačí A1 až A234
Ak v B238 bude "4" tak sa vytlačí všetko bez ohľadu na to či bude v ostatných bunkách "0"
Venali napsal/a:
protože at dělám co dělám,
Doporučujem pokračovať v tom "dělání". Bez prílohy to tu ťažko za teba niekto urobí.
Možno toto makro ti naznačí, čo robíš nesprávne.
Sub Makro1()
Range("A8:A14").Select
Range("A18:A24").Select
Range("A1:A5", Selection).Select
End Sub
A taktiež si pozri aj tento príkaz, možno ti to zapne.
Union(Range("A1:A5"), Range("A18:A24")).Select
@elninoslov
Jasné, "=" som zabudol vymazať. Už som opravil.
No chyba je aj tu =SUMIFS(LASER!V3:W1048576....
Netuším, čo chce zadávateľ vypočítať, ale asi takto.
=SUMIFS(LASER!V3:V1048576;LASER!T3:T1048576;">="&F4;LASER!T3:T1048576;"=<"&H4)+SUMIFS(LASER!W3:W1048576;LASER!T3:T1048576;">="&F4;LASER!T3:T1048576;"=<"&H4)
No asi neexistuje. Ale môžeš si ho vytvoriť.
Ono je to správne. Len si tam musíš dať vlastný formát.
[h]:mm;@
ad 2
Ak si to prevedieš na tabuľku, tak by to malo fungovať.
A čo tak tie úvodzovky okolo B vyhodiť?
{=MAX(KDYŽ(B:B=B2;C:C))}
https://exceltown.com/navody/funkce/max-if-min-if-hledani-nejvyssich-a-nejnizsich-hodnot/
A nejaký obrázok od Picasa nemáš? Ten by tiež pomohol. Možno. 
Pokiaľ som porozumel tomuto skvelému zadaniu, tak chceš označiť iba bunky s českou diakritikou. Bunky so slovenskou diakritikou alebo nemeckou už zrejme nie. No toto netuším ako riešiť. Jedine nahrať komplet český slovník a porovnávať každé slovo. Možno elninoslov to dá.
lubo napsal/a:
Jinak pro běžného občana je asi vhodnější použít pomocný sloupec
=AGGREGATE(9;7;A1)
Pokiaľ má Excel 2010 vyšší.
Uživatelské menu
\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