Word
Excel
PowerPoint
Access
Outlook
ECDL
Poradna - VBA - jak napsat IF prikaz
Vložení příspěvkuhlavní kategorie | zpět | + odpovědět na toto téma
| VBA - jak napsat IF prikaz - diskuze na toto téma |
| Ahoj,
je mozne vytvorit makro, ktere bude fungovat na zaklade barvy bunky a hodnoty bunky zaroven? Dole mam priklad, vim, ze neni spravne, ale jak by se to pripadne dalo udelat, pokud to lze? Ve zkratce, pokud je nektera bunka v danem rozsahu oranzova a neni v ni zadna hodnota, dej mi hlasku.
Sub upozorneni_podminka()
If Range("F13:S57").Interior.Color = vbOrange And Range("F13:S57").Value = "" Then
MsgBox "Nejsou vyplneny vsechny zvyraznene polozky"
Else
MsgBox "V poradku"
End If
End Sub
Moc diky! tyjo, moc diky. U vas to vypada suprove, akorat me to nefunguje :( bohuzel mi asi dela problem to, ze v mem excelu se bunky zabarvuji na zaklade podmineneho formatovani (vzorec). Pokud to zkusim s ciste zabarvenou bunkou bez podmineneho formatovani, tak uz to jede.. prekvapuje me, ze to dela problem.:/ Odpověď To je ZÁSADNÁ vec, že sa to podfarbuje podmieneným formátom. To sa v makre číta zle (nepriamo cez subrutinu volanú cez Evaluate), VBA nedovoľuje štandardne čítať túto farbu. Takže potom je lepšie, rovnakú podmienku vyhodnocovať aj v makre. Aká je podmienka v Podmienenom formátovaní na zafarbenie tých buniek? Najlepšia by bola príloha. Odpověď Ak majú napr. všetky bunky rovnaké pravidlo, a je hromadne kontrolovateľné, dá sa to vybaviť jedným dlhším riadkom kódu. Všetko záleží na tom, ako to tam presne máte. Odpověď |
