Super ďakujem.
Dobrý deň všetkým,
mám problém s „doplnkovými funkciami“ pri objektoch (TextBox) ktoré som vytvoril cez: controls.Add("Forms.TextBox.1").
potrebujem zmeniť farbu pozadia ak sa zmení hodnota v objekte.
Neviem čo mám zadať za Private Sub ????_Change() aby to fungovalo.
Dúfam, že existuje riešenie, inač všetko čo som do teraz vytvoril môžem ...
v prílohe je príklad. (TextBox2 = je moja predstava)
Už začínam byť zúfali.
Vopred ďakujem za všetko čo ma posunie ďalej.
Martin
Ahoj,
ono to ide cez :
Private Sub Worksheet_SelectionChange (ByVal Target As Range)
... ... ...
... ...
...
End Sub
ale je potrebné zadať nejakú „brzdu“, aby to nebežalo do nekonečna.
napr:
zastavenie makra bude podmienené „skrytým“ kódom v Bunke “K1“. (zmena formátu údaju)
- ak v údaji (v bude "K1") sa bude nachádzať „bodka“ makro sa skončí.
Pred ukončením makra sa v “K1“ hodnota 1,0 (1 čiarka 0) prepíše na 1.0 (1 bodka 0)
Ak to nie je číslo ktoré chceš ďalej používať v nejakých vzorcoch, tak by to vo vizuálnej forme nemalo vadiť. (1,0 či 1.0)
Ak to počká deň - dva, tak to pošlem. dnes už nestíham a zajtra som bez PC.
Caute,
vymazané funguje. super
eLCHa, teraz si ma fakt dostal. A to sa dá??? > viac neskôr (step by step)
Ten novovzniknutý zoznám budem používať v X ďalších veciach = preto radšej nech existuje
Paralelne, kým to riešil Opičák som sa pustil do verzie s Kontingenčnou tabuľkou.
Problém mám existujúce pole zadať do „rozsahu“ pre ComboBox.
To isté ma tak či čaká v riešení od Opičáka.
Jedná sa o rozsah DL3:DL8, u ktorého logicky DL8 sa bude meniť/ zväčšovať narastaním údajov v databáze.
A tu mám problém ako dostať plavajúci pole do jeho rozsahu:
mejaká možnosť s Range (“DH1“) ktorého hodnota /Value je výsledok DL3:DL8 zo vzorca:
=CONCATENATE( “DL“ ; ROW($DL$3) ; “:“ ; COUNTA($DL:$DL)+1 )
alebo priamo premennú napr. “a“ (vo VBA už zvládnem zadefinovať)
ComboBox1.RowSourse =( “Deckblatt!DL3:DL8“) => to “pevné" zadanie > teda nevyhovuje
Ako pri voľbe v ComboBox-e dostanem do bunky napr. “A10“ nie Value (text ktorý je aj vo výbere) ale číslo (poradie v ktorom sa v zozname nachádza môj výber) . je mi to jasné pokiaľ ComboBox nie je súčasťou UserForm-u. ale v ňom???
Ahoj,
Výsledok ma byť len s jedinečnými hodnotami. Ten stĺpec C považuj za zdrojak (Databáza). Výsledok bude v stĺpci E = všetko len jedinečné hodnoty zo stĺpca C (hodnoty stĺpca C ale iba 1x zadané).
Dobrý deň,
už asi 3-ti deň sa trápim s pochopením Cyklov no nech robím čokoľvek stále sa mi nedarí do cyklu zapracovať operácia + podmienky.
Popis požiadavky:
do Databázy za ukladajú údaje o dodávateľoch (stále do zľava najbližšieho prázdneho stĺpca)
pre načítanie údajov z Databázy chcem použiť vo Formulári „ComboBox“
zoznám v ComboBox-e je zoznám nahraných dodávateľoch v Databáze
A začína môj problém:
Keďže dodávatelia sa budú opakovať rovnako ako aj ich produkty, potrebujem do zoznamu v ComboBox-e načítať niečo ako Kontingenčnú tabuľku. myslím si, že priame použitie Kontingenčnej tabuľky nie je najšťastnejšie riešenie (treba stále aktualizovať, nejako zadať rozsah údajov ktoré má načítavať, keďže sa budú meniť, vyfiltrovať prázdne riadky,...)
Priame riešenie:
napadlo ma niečo ako „VLOOKUP“ – ak sa hodnota (Range(“A2“) v zozname (Stĺpec E) nenachádza, zadaj ju do posledného voľného riadku (ak sa v zozname už nachádza nerob nič)
Nepriame rešienie:
napadlo ma Cyklom ošetriť preverovanie Stĺpca C (v ktorom sú všetci dodávatelia – aj opakujúci sa) a nejako podmienkou
IF Range(“A2“) ????? Then Exit Sub
Range(“A2“).Value = ?????
Neviem si sať s tým poradiť. Pomóc.
Ďakujem.
presne toto som potreboval.
Cestu si upravím vo „Tempov“ nech nie je problém na PC s užívateľskými oprávneniami User/Admin .
ešte raz Ďakujem.
Zadávam (nové), upravujem (existujúce), vyvolávam (do rôznych tabuliek, či protokolov) údaje uložené v databáze cez Formuláre. Je to perfektná vecička (Excel v podstate beží na pozadí) tak som chcel aj PrintPreview zapracovať do formulára. No na webe nič také som nenašiel.
Mám pocit, že jediné riešenie bude použi princíp ako u grafu (vytvoriť z neho objekt > obrázok a ten načítať do formulára.)
Musím priznať, že Excel cez Formuláre (UserFomr) je oveľa komfortnejší príjemnejší pre spravovanie databáz. Hlavne ak s nimi pracuje veľa užívateľov. (nehrozí aby niekto omylom vymazal vzorec, premiestnil údaj či napr. zmenil formátovanie)
Vytvorenie toho všetkého je síce náročnejšie ako tabuľka s funkciami či makrami, ale výsledok stojí zato.
Dobrý deň,
zase potrebujem vašu pomoc. Tento krát sa jedna o zobrazenie PrintPreview priamo v UserForm.
Všetko čo sa mi podarilo do teraz prelúskať na webe je toto:
Private Sub CommandButton3_Click()
ActiveWindow.SelectedSheets.PrintPreview
End Sub
Nenašiel som nič k tomu ako tento náhľad dostať do UseFrom napr. cez Image1.
Viete mi s tým pomôcť?
Ďakujem
Dobrý deň,
potrebujem pomôcť s makrom pre vytvorenie grafu. jedná sa o dosť veľa úprav v samotnom grafe ako je napr.: ide o kombinovaný graf - stĺpcový a spojnicový, pričom u spojnicového grafu sa čiary nezobrazujú; farby v grafe sú presne definované; podfarbenie „menovky“ dát.
úlohou grafu je zobraziť akúsi časovú os priebehu jednotlivých úloh.
V zdrojovom súbore mám omnoho viac údajov (2 roky po týždňoch a okolo 20 úloh), čo my pravdepodobne strašne spomaľuje samotnú prácu v tabuľke, keďže Excel stále to on-line spracováva aj v grafe. preto ma napadlo graf vytvoriť „na povel“ makrom.
V prílohe je makro ktoré síce nejaký ten graf vytvorí, ale vyžaduje si dodatočné úpravy = nevyhovuje.
Ďakujem Martin
Ten druhý prípad (vyriešený 00000000\/00 overené a funguje => diky ) je číslo dodávateľa.
Prvý prípad je číslo dielu (každá skupina niečo označuje. napr.: prvá skupina označuje projekt)
tvar 1S0.845.011 sa oveľa ľahšie číta ale zase formát 1S0845011 sa lepšie ďalej spracováva.
Preto som chcel aby Excel pracoval v skutočnosti s verziou bez bodiek, ale v bunke bude zobrazoval číslo s bodkami kvôli lepšej čitateľnosti.
Makro tu nie je riešením, to by muselo „bežať“ On-line >spúšťať sa hneď po zadaní hodnoty do bunky a potvrdením „Enter“. (tiež extrémne riešenie)
No mám pocit, že manuálne zadanie bodky bude nevyhnutnosťou a vo vzorcoch / makrách ktoré s bunkou budú pracovať ako prvé odstránim tie bodky. Asi najlogickejšie riešenie.
Každopádne ďakujem.
v prvom prípade: jedná sa o 3 skupiny s tromi znakmi, pričom prvá skupina môže obsahovať čísla a písmená. druhá a tretia skupina sú len čísla. To je základ ktorý by mi tiež stačil. Štvrtú a piatu skupinu radšej vynechajme.
Bolo by to komplikované (štvrtá skupina len písmená, jedno, max. dve a rôzne; piata skupina mix čísiel a písmen no max. 3 znaky)
v druhom prípade: vždy sa jedná o 8 čísel potom "/" a vždy 2 čísla. no môžu začať aj nulou.
Dobrý deň,
neviem si dať rady s Formátovaním bunky (kategória > vlastné).
Potrebujem aby po zadaní hodnoty 1S0845011 sa hodnota v bunke zobrazila nasledovné 1S0.845.011 (je to vôbec možné)
Zadania (v jednej bunke) môžu byt nasledovné:
1S0845011 => výsledok 1S0.845.011
1S0845011A => výsledok 1S0.845.011.A
1S0845011AA => výsledok 1S0.845.011.AA
1S0845011ABBB => výsledok 1S0.845.011.A.BBB
1S0845011AABBB => výsledok 1S0.845.011.AA.BBB
Rovnako (ale v inej bunke), ak zadám 0005211202 potrebujem aby sa hodnota v bunke zobrazila nasledovné 00052112/02 (je to vôbec možné)
Ide o to, aby (ak je to možné) som nemusel ja zadávať “.” alebo “/”.
Ďakujem
Dobrý deň,
ďakujem za radu. funguje to super. (dokonca sa nemusím zaoberať odklikávaním tlačidiel v nejakom „Open okne“)
V prílohe je graf spracovaný ako Tacho. dá sa nadradiť aj obyčajným „koláčovým grafom, takže 100% použiteľné aj v starých verziách Excelu. možno sa to niekomu zíde.
otázočka:
ak použijem: ActiveWindow.SelectedSheets.Delete tak musím potvrdiť (dať súhlas) na dokončenie makra. stlačiť „súhlasím“ / „OK“. nedá sa to nejako obýsť. skúšal som niečo ako True na konci no nič.
Ďakujem
- vytvorím novú kópiu „Martin_1.xlsm“ ktoréj názov určuje hodnota v bunke B1 => „Firma_A.xlsm“
- po vyplnení súboru „Firma_A.xlsm“ potrebujem niektoré hodnoty z buniek tohto súboru v kopírovať (ako hodnoty) do môjho pôvodného súboru „Martin_1.xlsm“. (na ďalšie spracovanie, vyhodnotenie)
Otvorenie súboru „Firma_A.xlsm“ priamo z „Martin_1.xlsm“:
(info: v prílohe je nastavené makro „Otvor“)
No nech skúšam čokoľvek, neviem prísť na spôsob ktorým by som dokázal z konkrétnych buniek suboru „Firma_A.xlsm“ kopírovať hodnoty do „Martin_1.xlsm“.
Keďže názov „Firma_A.xlsm“ je v podstate premenná.
ďakujem za pomoc
Martin
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.