Příspěvky uživatele


< návrat zpět

Strana:  1 ... « předchozí  77 78 79 80 81 82 83 84 85   další » ... 122

Príklad na mnou popísaný druhý spôsob:

Do kódového okna Listu1 vlož:Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = [A1] And Target.Value = 1 Then Call MovePic
End Sub
Do okna modulu vlož:Option Explicit

Dim iniLft As Single
Sub MovePic()
Dim tillLft As Single
tillLft = Sheet1.Shapes("Obdélník 4").Left
With Sheet1.Shapes("Veselý oblièej 5")
iniLft = .Left
Do While .Left < tillLft
.Left = .Left + 10
Application.Wait (Now + 0.0000057)
Loop
End With
End Sub

Sub ResetPicPos()
Sheet1.Shapes("Veselý oblièej 5").Left = iniLft
End Sub
Makru ResetPicPos buď priraď tlačítko, alebo ho naviaž na nejaký event, obnoví východziu pozíciu toho panáčika.

Robí sa to tak, že obrázok panáčka si skopíruješ do riadku a makrom potom riadiš vlastnosť visible jednotlivých obrázkov - povedzme, že budeš mať 10 panáčikov, na začiatku bude viditeľný prvý obrázok a makrom potom prepínaš postupne viditeľnosť druhého, tretieho atď.; v každom kroku je vždy viditeľný iba jeden a ostatné sú skryté, to vyvolá ilúziu pohybu obrázka, v skutočnosti je v liste obrázkov niekoľko.

Iná možnosť je, že budeš makrom v cykle meniť hodnotu LEFT a TOP objektu SHAPE; v tomto prípade si vystačíš s jedným obrázkom panáčika a ten makrom po liste skutočne posúvať.

No, to teda, domnievam sa, naozaj možné nie je. Môžeš si ale zobraziť list v dvoch oknách, prípadne ho zobraziť zprava doľava (to používajú napr. arabi, videl som na vlastné oči).

@marjankaj
niet čo nechápať, chlapec to celé poplietol 1 . Oni skúšajú, do akej miery sme v strehu 1

marjankaj napsal/a:

No toto je pre mňa v cudzej reči.

Poslednou dobou sa tu vyrojila spústa talentov na vysvetľovanie, úmerne tomu klesá kvalita príspevkov a riešených problémov 1. Šéfovi ide o to, že do krabice sa mu vojde 120 ks čohosi a potrebuje zistiť, koľko krabíc bude potrebovať na zabalenie 4652 ks čohosi. Priateľ s najväčšou pravdepodobnosťou hľadá funkciu ROUNDUP, prípadne CEILING.

@eLCHa:Používám to taky :)))
Já taki :)))))). Trúfam si tvrdiť, že v podobných situáciách, ako Vy.
Neviem, ako to napísať „citlivo“: Pokladám Vás za skutočne poučeného užívateľa, ktorý dokáže riziká linkovaných súborov ošetriť. Ale ruku na srdce, aké percento užívateľov to ošetrí tiež?
Ja som mal na mysli predovšetkým prepojenie desiatok workbookov s nejakým master workbookom. Typicky je to na nejakých zdieľaných diskoch, k jednotlivým súborom má prístup x užívateľov, po tom, čo niekto súbory navzájom prelinkuje, občas niekto z užívateľov spácha v jednom zo zdrojových súborov nejakú zmenu, napr. odstráni riadky, sĺpce, alebo ich presunie. Ako to potom hrdý vlastník toho master booku zistí? Mám na starosti v práci nejaké takéto "skvele" designované mastersheety, ktoré som zdedil; ide ma mimochodom šľak trafiť už len z doby, ktorú trvá aktualizácia hodnôt z linkovaných súborov, bývalá kolegyňa, ktorá tie sheety vytvorila, bola veľká umelkyňa patrične hrdá na obludnosť, autorom ktorej bola :(. Sú dobré a lepšie postupy. Linkovanie súborov nepokladám ani za dobrý ani za lepší. Pokiaľ nie je čas urobiť veci správne, kedy si ho nájdeme?? Mám k práci vývojárov z Microsoftu venujúcich sa tvorbe excelu skutočne veľkú úctu, ale linkovanie súborov sa pmn naozaj príliš nepodarilo.
MS Query je nástavba – v poriadku; podobne ako VBA. VBA používate. I Vašu obľubenú klimatizáciu v aute, ste to písal pred nejakou dobou.. Pokladám za svoju povinnosť, pokiaľ sa rozhodnem niekomu radiť, poradiť najlepší postup, ktorý poznám. Linkovanie súborov má v porovnaní s MS Query tragicky špatný pomer kvality k nákladom.
Písal ste, že je to vec názoru, dovolil som si teda prezentovať názor svoj; som ale demokrat a vnímam pozorne názory ostatných, konieckoncov, účasť na fórach ma naučila v lepšom používaní Excelu mnohému :)
Pekný deň prajem.

@eLCHa:
že naprogramovanie niečoho stálo vývojára ohromné úsilie, nemusí nutne znamenať, že výsledný produkt je super, i keď záznamník naozaj skvelý je; pokiaľ budete môj pôvodný príspevok čítať pozorne a bez predsudkov, tak tam žiadny kategorický nesúhlas voči záznamníku z mojej strany neuvidíte:).
Možno Vás ukľudní moje priznanie, že záznamník makra používam skoro vždy, keď kód tvorím; kvôli postupnému ladeniu jeho jednotlivých fragmentov. A nakoľko poslednou dobou píšem kódy často, tak používam záznamník minimálne 2x týždenne. Znamená to, že som docikal vyššie, než Vy a túto súťaž o väčšieho znalca VBA vyhral? :)
K čomu smerujem: Ja som so Standom nemal v úmysle polemizovať, len som upozornil na limity záznamníka makra pri tvorbe kódu. Toto upozornenie nebolo adresované poučeným užívateľom, medzi ktorých na tomto fóre z pravidelných prispievateľov radím predovšetkým Vás, Luba a Palaa, z menej aktívnych napr. Jezu (dúfam, že sa nikto iný neurazí, pokiaľ som ho nemenoval), ale novým nadšencom, ktorí začínajú výhody VBA zatiaľ iba objavovať.
Nehľadajte prosím v mojich príspevkoch niečo, čo tam nie je, ďakujem :)

Ľahšiu otázku nemáš? Len zo zvedavosti: Na čo ich potrebuješ vytvárať programovo? Paloo, ja by som Ti rád pomohol, páč Ty by si si to určite za svoje zásluhy v práci pre miestnu komunitu naozaj zaslúžil (nie je v žiadnom prípade mienené ironicky), ale toto je problém, treba mať zmáknutý objektový model aplikácie, pokiaľ by som to musel riešiť ja, tak by som skúsil google na vyhľadanie Guides, VBA, PowerPoint, nejako takto (určite si ale skúšal googliť sám, takže chápem, že táto rada je v tvojom prípade bezcenná, Teba by som v tomto smere nepodceňoval):https://www.google.cz/?gws_rd=cr&ei=ErRZU7OJLKe54ATN54Bg#q=guides%20vba%20powerpoint%20drawing

ale tuná píšu, že to asi nejde: http://www.vbaexpress.com/forum/showthread.php?8984-Solved-PowerPoint-Drawing-Guides ďalej som nehľadal, takže can't be 100% sure 'bout it 1

Stando, dobrý, ako sa to vezme. Pmn nenaučí premýšľať objektovo, zapisuje spústu balastu (áno viem, to sa dá potom upraviť, ako zmieňuješ), nedokáže vygenerovať podmienky (If...End If, Select Case... End Select), cykly, rekurzie, sub procedúry s parametrami, function procedúry, udalostné procedúry, subrutiny, pripojenie knižníc, API calls, prácu s poľami (arrays), premennými, komunikáciu medzi aplikáciami, je toho proste strašne moc, na čom si záznamník makra vyláme zuby. Na druhej strane, je fajn, že v Exceli existuje, páč bez neho by to bolo často ešte zložitejšie (viď. jeho absencia v Access, PowerPoint a ostatných MS Office produktoch). Takže moje stanovisko: Záznamník je fajn, ale seriózny záujemca o VBA veľmi skoro zistí, že so záznamníkom si nevystačí a nemal by nadobudnúť dojem, že záznamník z neho urobí znalca vo VBA.
Nie je to negácia toho, čo uvádzaš, púhe doplnenie a upozornenie na limity jeho použitia.

text do stĺpcov, čus

Dá se do vzorečku vsunout nějak heslo aby to otvíralo automaticky.
Nedá. Okrem toho, celý koncept s prepojenými súbormi (externými linkami) je na draka a mali by zaň všetkým, ktorí toto zversto používajú, dávať poriadne vysoké tresty. Naučte sa používať dotazy (MS Query) a budete mať omnoho jednoduchší život čo sa týka možných chýb, ktoré vznikajú z dôvodu broken links atď. 7
tu máš návod, môžeš poštudovať, čo zmieňujem:http://excel-navod.fotopulos.net/tabulka/propojenidat.html

No, pmn pozná, ale v českej verzii je to SOUČIN.SKALÁRNÍ. S Vami je to tuná skutočne zložité 1

jo a proč je ve fci countif toto: ""& ?
aby funkcia nehádzala chybu v prípade, že niektoré bunky v zozname sú prázdne.

Rozšíriť vzorec na oblasť 798 buniek miesto 200 asi zvládneš, nie?

Tak fajn, stiahni si medzitým teamviewer a v SZ dohodneme zvyšok.

=SUMPRODUCT(1/COUNTIF(A1:A200;""&A1:A200))-(--(SUMPRODUCT(COUNTIF(A1:A200;""))>0))edit: ten druhý skalárny súčin je tam zbytočný, stačí napísať i takto:=SUMPRODUCT(1/COUNTIF(A1:A200;""&A1:A200))-(--(COUNTIF(A1:A200;""))>0)


Strana:  1 ... « předchozí  77 78 79 80 81 82 83 84 85   další » ... 122

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

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.

On-line nástroje