Static89: co mozem vrelo doporucit tak to je visual basic 2010 krok za krokom :) je to pisane pre uplneho lajika .... tak isto odporucam visual c# 2010 krok za krokom .... ta je asi 2x lepsia ako basic ... ale to je zas iny programovaci jazyk :))) aj ked maju isty kompilator maju inu syntaxu.
jedina nevyhoda tej knihy je ta ze sa orientuje na vyvoj aplikacie .... nie priamo na excel .... ale zas nadruhu stranu ked pochopite tu knihu tak vam nebude robit problem nejake makra, addins, com atd.
Al: napodobne aj ja koli tomuto navstevujem toto forum :)
statik89 musi mat radost ked to cita :))
popravde na debugovanie kodu je najlepsie si ho odkrokovat a postupne sledovat jeho procesy ci su spravne:
navod1:
- V kode vlavo klikneme tam kde chceme zastavit proces a vytvori sa tam taka hneda gulicka.
- ked potom stlacime makro tak pri tej hnedej gulicke zastane proces a mozme postupne s degurerom krokovat az kym nenajdeme chybu
navod2:
- do kodu zapiseme: debug.print PREMENA
- s tymto sa do Immediate vypise sledovana premena
navod2 sa povecsinou pouziva ked sa odkazuje na SQL databazu a potrebuje vediet ci ste dobre zapisali SELECT, DELETE, INSERT atd.
tam hlavne ide aj o to ze vkladanie new udajov ... a tie by sa samozrejme nemohli po novom ukladat len v jenom riadku
no urcite to pojde ale ted je otazne kolko riadkov obsahuje jeden udaj??
najlepsia by bola priloha aby som to videl
doplnil som tam dalsie dva stlpce
nevyhoda toho makra je ze na liste1 tie stlpce v tej tabulke sa musia nachadzat inac padne :) ... resp. nieje to osetrene na pocet listov .... je to potrebne?
spravne makro funguje tak ze kazdy riadok z listu1 porovnava s tablkou v liste2
a postupne sa pyta ked ho najde v liste dva ci ho ma prepisat
// ted som si vsimol ze moj testovaci subor je trochu blbo navrhnuty, kedze v liste1 sa nachadzaju duplicity
tak isto v liste2
staci takto:
takto?
zopar otazok:
- z list1 sa bude kpirovat len jeden riadok?
- porovnavat ma co presne? resp. co je identifikator a co je value
tak uz viem ze to je aj QueryTables(1) :))
.. urobil som to podla toho ake som mal vedomosti ... ted uz viem pracovat aj s QueryTables .... resp. nikdy som takto s databazou nerobil .. kedze ja radsej si sam definujem polia
tj. tak jednoduche ja dakujem tiez uz som zas onieco chytrejsi :)
takto:
Sheet("meno").Shapes("Rectangle 2").Visible = True
priloha:
aha uz t chapu to pojde podla mna len s makrom a to tak ze v danom sheete sa dopise
kedze nemam prilohu tak to tu takto pisem :)
Private Sub Worksheet_Change(ByVal Target As Range)
// IF target.cells pre ktory sa to tyka
// a podmienku ked je prazna nezobrzit alebo zobrazit ked je plna + nazov shape
End Sub
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.