Zavrieť
Upraviť
Hlavné
- Auto Moto [x]
- Cestovanie [x]
- Deti [x]
- Domácnosť [x]
- Elektronika [x]
- Foto [x]
- Hoby [x]
- Hudba [x]
- Iné [x]
- Kaviareň Porady [x]
- Kultúra [x]
- Mobily a Tablety [x]
- Móda [x]
- Mzdy a personalistika [x]
- Neziskové organizácie [x]
- Počítače [x]
- Podnikanie [x]
- Porada (o stránke Porada) [x]
- Právo [x]
- Recenzie [x]
- Recepty [x]
- Software [x]
- Stavba [x]
- Šport [x]
- Účtovníctvo a dane [x]
- Vzdelávanie [x]
- Záhrada [x]
- Zdravie [x]
- Zvieratá [x]
Otázku
Pravidlá
Položte novú otázku, ak:
- Potrebujete odpoveď (na diskusiu slúžia Debaty).
- Ste nenašli odpoveď cez vyhľadávanie
Tip
Pravidlá a tipy
Vaše rady, tipy a vedomosti!
Tip môžete napísať stručne ale môže ísť aj o dlhší článok.
Ak chcete zdieľať cudzí článok, zdieľajte link.
Tip môžete napísať stručne ale môže ísť aj o dlhší článok.
Ak chcete zdieľať cudzí článok, zdieľajte link.
Zdieľaj link
Pravidlá a tipy
Zdieľajte s nami link na články z iných webov.
Komentáre k linku budú zoradené podľa počtu hlasov,
môžete využiť aj filter komentárov a zobraziť
len komentáre od členov ktorých na Porade sledujete.
Komentáre k linku budú zoradené podľa počtu hlasov,
môžete využiť aj filter komentárov a zobraziť
len komentáre od členov ktorých na Porade sledujete.
Sledovať
VBA excel - Colordialog
Dobrý deň.
Poradí mi niketo ako získam nejakú informásiu o farbe (napr vo formate long) z vyvolaného Colordialogu?
Myslim takymto posobom : " Application.Dialogs(xlDialogColorPalette).Show "
Ked to dam len samotné hlási chybu a neviem to priradit do nejakej premennej...
V podstate mi principialne ide o to že chcem v určitom momente v kode vyvolat tento dialog zvolit farbu a priradit ju napr. fontu alebo pozadiu bunky ... a nemožem sa dostat ku kriteriam farby.
...ďakujem...
Poradí mi niketo ako získam nejakú informásiu o farbe (napr vo formate long) z vyvolaného Colordialogu?
Myslim takymto posobom : " Application.Dialogs(xlDialogColorPalette).Show "
Ked to dam len samotné hlási chybu a neviem to priradit do nejakej premennej...
V podstate mi principialne ide o to že chcem v určitom momente v kode vyvolat tento dialog zvolit farbu a priradit ju napr. fontu alebo pozadiu bunky ... a nemožem sa dostat ku kriteriam farby.
...ďakujem...
- Každý móže napísať len 1 odpoveď. Neskor mozete svoju odpoveď vylepšiť.
- Odpoveď má priniesť riešenie na otázku, vyvarujte sa hodnotenia otázky.
- Odpoveď má byť viac o faktoch ako o názoroch.
Ak potrebujete v otázke niečo upresniť, najskôr sa spýtajte na podrobnosti.
Koncept slúži na uloženie rozpracovanej odpovede, koncept sa zobrazuje len Vám, až kým ho nezverejníte.
Ak máte podobnú otázku, založte Novú otázku alebo Súvisiacu otázku.
Koncept slúži na uloženie rozpracovanej odpovede, koncept sa zobrazuje len Vám, až kým ho nezverejníte.
Ak máte podobnú otázku, založte Novú otázku alebo Súvisiacu otázku.
❤ Buďte priateľskí ❤
Sme súčasťou jednej komunity, ktorá si chce vzájomne pomáhať, rozdieľnosť je vítaná ak neubližuje!
Usporiadať podľa času
2 
Idem od konca.
1) Ad RGB.
Ak si vo VBA oselektuješ názov fn RGB a potom stlačíš F1, zobrazí sa ti ako sa fn používa. Farebná škála sa zadáva priamo ako čísla:
resp. spôsobom pomenovaných argumentov:
Odkazovanie na jednotlivé objekty UserFormu možno cez ich názvy cez Controls.
2) ad xlDialogColorPalette
Tento dialóg slúži na zmenu celej farebnej palety aktuálneho zošita (mrkni si pripojený príklad)
3) Ofarbenie bunky
Jednoduchá zmena pozadia cez VBA sa dá cez Interior a ColorIndex.
Stačí keď si dáš odchytenie makra, veľa ti napovie Excel sám (potom stačí F1
)
Ak však chceš volať formátovací dialóg, tak treba volať iný, pre pozadie je to konkrétne: xlDialogPatterns
Ostatné sú tieto:
Celý zoznam zabudovaných dialógov, ako ich volať s parametrom .. si môžeš pozrieť aj tu:
Excel - volanie zabudovaných dialógov
Palo
1) Ad RGB.
Ak si vo VBA oselektuješ názov fn RGB a potom stlačíš F1, zobrazí sa ti ako sa fn používa. Farebná škála sa zadáva priamo ako čísla:
Code:
Me.Controls("TextBox" & i).BackColor = RGB(255, i * 50, i * 10)
'(RED, GREEN, BLUE) Code:
Me.Controls("TextBox" & 6 - i).BackColor = _
RGB(red:=255, green:=i * 50, blue:=i * 10) 2) ad xlDialogColorPalette
Tento dialóg slúži na zmenu celej farebnej palety aktuálneho zošita (mrkni si pripojený príklad)
3) Ofarbenie bunky
Jednoduchá zmena pozadia cez VBA sa dá cez Interior a ColorIndex.
Stačí keď si dáš odchytenie makra, veľa ti napovie Excel sám (potom stačí F1
)Code:
With Selection.Interior
.ColorIndex = 8
End With Ostatné sú tieto:
Code:
''xlDialogFormatNumber ''xlDialogAlignment ''xlDialogFormatFont ''xlDialogBorder ''xlDialogPatterns ''xlDialogCellProtection
Excel - volanie zabudovaných dialógov
Palo
Naposledy upravil PaloPa : 29.10.10 at 14:32
-
RGB_via_VBA.xls
(71.5 KB, 14 videní)
Hlasovalo 2 pouzivatelov
| Užitočné (2) | Marína, marjankaj |
No kedže som stravil cely den prehladavanim webu a nič ... tak som sa pustil do vytvorenia sukromnej palety vo forme "userform" ...
... teraz potrebujem poradit ako sa da sfunkčnit takyto princip :
nechce mi to zobrat to " Image(I) " ako sa to robí vo vba? (takto to šlo v c++)
... teraz potrebujem poradit ako sa da sfunkčnit takyto princip :
For I = 1 To 5
UserForm1.Image(I).BackColor = RGB(RED, GREEN, BLUE)
Next I
UserForm1.Image(I).BackColor = RGB(RED, GREEN, BLUE)
Next I
Tak tomu vravím komplexná odpoved... 
Velká vďaka PaloPa ... s týmto už dokážem tvorit dalej...
... pochopil som všetko len drobnosť, ako je to myslene "počet kopii" ?
===============================
Jáj to patrí k tomu "print dialogu" ...
Super velmi pekne dakujem..!
Velká vďaka PaloPa ... s týmto už dokážem tvorit dalej...
... pochopil som všetko len drobnosť, ako je to myslene "počet kopii" ?
With dlg
.Show ' , , , 1 'pocet kopii
End With
.Show ' , , , 1 'pocet kopii
End With
Jáj to patrí k tomu "print dialogu" ...
Super velmi pekne dakujem..!
Naposledy upravil DVX : 31.10.10 at 19:20
VBA excel - Colordialog
Vieš, kto pozná odpoveď?
Porady, ktoré by vás mohli zaujímať
Prihláste sa a sledujte len tie Porady, ktoré Vás zaujímajú.32
Odpovedáte na otázku?
Zoznámte sa s novými pravidlami.Áno, poznám odpoveď.
Každý môže napísať 1 odpoveď, neskôr ju môže vylepšiť. Pokračovať v odpovedi
Nie, chcem sa ešte spýtať na upresnenie otázky.
Upresnenie si vyžiadajte v komentári otázky (nájdete pod otázkou). Vyžiadať upresnenie
Copyright © PORADA.sk, s.r.o. - žiadna časť stránky nemôže byť rozširovaná, alebo reprodukovaná bez predchádzajúceho súhlasu
