Příspěvky uživatele
< návrat zpět
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šší.
Vzorce zmeň na hodnoty a potom to zoraď.
danis napsal/a:
Stlpec je vyplneny, urobim dvojklik, ale vzorec sa neskopiruje do celeho stlpca. Ide to iba tahanim. Da sa ten vzorec nastavit napr. po riadok 10000 bez tahania?
No asi niečo nerobíš správne.
Vzorec zadaj do bunky B1
Klikni na bunku B1
V pravom dolnom okraji je taký malý čierny štvorček
Ak naň nabehneš myšou, tak sa zmení kurzor na krížik bez šipiek
Vtedy treba urobiť dvojklik
https://www.abecedapc.cz/navod-excel/microsoft-excel-kopirovani-vzorce
danis napsal/a:
Ano, ide to :-)
A ked to chcem kopirovat pre cely stlpec, aby som to nemusel "tahat" ?
Že by si to vypisoval pre každú bunku zvlášť?
Ale môžeš aj kliknúť na spodný pravý okraj bunky a keď sa tam objaví krížik, tak urob tam dvojklik. Ak je vedľajší stlpec vyplnený, tak sa to skopíruje.
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