..|| Blog || Produkti/Storitve || MExcel || MDodatki || 300 nasvetov ||..

Kljukica

Pomoč pri delu z MS Excelom

Kljukica

OdgovorNapisal/-a bate » Ne avg 02, 2009 1:31 pm

Zdravo,
imam le eno poletno vprašanje.
V neko celico želim iz makra napisati potrditveno kljukico!
Priznam, da glede tega nisem nič brskal po forumu, ker je že preobširen, pa še ta vročina in sploh... Najlažja (najhitrejša) linija je tanartaboljša. Tistemu, ki zadevo obvlada ne bo težko... Torej koda gre približno takole:
Koda: Izberi vse
----
If pogoj then cells(ta in ta)=kljukica
sicer je cells(ta in ta)=prazna
----

Upam, da je dovolj razumljivo. Zelo lepo prosim za Help...
lp brane
bate
 
Prispevkov: 127
Pridružen: Če mar 19, 2009 10:11 am



Matjazev.NET
 

OdgovorNapisal/-a cedra » Ne avg 02, 2009 3:48 pm

Ne potrebujete zato makra :)
Spodnji primer vam kontrolira celico A1. Če je vrednost večja od 5, potem vam v celico, v katero ste vnesli spodnjo formulo, zapiše črko "P". In zdaj še najbolj važno, celici v kateri želite imeti kljukico, spremenite pisavo v Wingdings 2! V pisavi Wingdings 2 je velika črka "P", kljukica.
Koda: Izberi vse
=IF(A1>5;"P";"")

Makro pa bi bil približno tak:
Koda: Izberi vse
Sub Kljukica()

    If ActiveCell.Value = 1 Then
        ActiveCell.Offset(0, 1).Select
            Selection = "P"
                With Selection.Font
                    .Name = "Wingdings 2"
                End With
    Else
        ActiveCell.Offset(0, 1).Select
            Selection = ""
                With Selection.Font
                    .Name = "Arial CE"
                End With
    End If
   
End Sub

Nanaša pa se na vrednost aktivne celice, kljukco pa naredi v celico desno od aktivne.
lp,

cedra
cedra
 
Prispevkov: 263
Pridružen: Po jul 25, 2005 11:11 pm
Kraj: Kamnik

OdgovorNapisal/-a bate » Po avg 03, 2009 9:43 am

Hvala za odgovor Cedra...
lp Brane
bate
 
Prispevkov: 127
Pridružen: Če mar 19, 2009 10:11 am


Vrni se na Excel

Kdo je prisoten

Po forumu brska: 0 registriranih uporabnikov in 0 gostov

cron