aktif satırı renklendirme

[aliberberoglu1981]

arkadaşlar excelde bir tabloda aktif olan satırdaki sütünün renkli ve yazı boyutunun büyük çıkmasını istiyorum. bir alt veya üst satıra geçtiğimde o satırın normale dönmesi geçtiğim satırın yine renk değiştirip yazı boyutunun büyümesi için ne yapabilirim.

 

[Necdet]

Merhaba,

Bu tür sorular çok soruldu, forumda bulmanız gerekirdi.

Aşağıdaki kodları ilgili sayfanın kod bölümüne kopyalayıp deneyiniz.

Değerleri kendinize göre ayarlayınız.

Option Explicit
Public Eski As Long
Public Kol  As Integer

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Kol = Cells.Find("*", , , , xlByColumns, xlPrevious).Column

    If Eski > 0 Then
        With Range(Cells(Eski, "A"), Cells(Eski, Kol))
            .Interior.ColorIndex = xlNone
            .Font.Bold = False
            .Font.Size = 11
        End With
    End If
    
    With Range(Cells(Target.Row, "A"), Cells(Target.Row, Kol))
        .Interior.ColorIndex = 12
        .Font.Bold = True
        .Font.Size = 16
    End With
    
    Eski = Target.Row
    
End Sub

 

[aliberberoglu1981]

Necdet bey çok sağolun aradım ama bulamadım daha yeniyim bu konularda. Necdet bey bu uygulamayı sadece tablonun içinde uygulayabilirmiyiz. yani başlık larda çalışmasın. birde ben sayfanın üstüne düğmeler koymuştum satır geçişlerinde onlarda titreme oluyor. bu uyglamada

 

[aliberberoglu1981]

tabloda bazı formüllü hücreler koruma koyduğumda bu formül hata veriyor. bunu nasıl düzeltirim yardımcı olurmusunuz. birde tablonun başlıklarında bu formülün işlememesi için ne yapmalıyım

 

[KuTuKa]

Tablonuzu eklermisiniz
hangi satır aralığı renklenecek belirtirseniz hallolur

 

[Korhan Ayhan]

Ekteki örnek dosyayı inceleyiniz.

Kod içindeki "Alan" tanımlamasını dilediğiniz gibi değiştirebilirsiniz.

 

[aliberberoglu1981]

dosyayı ekledim şifre 0197 dir. arkadaşlar Necdet beyin formülünü kullandığımda yukarıdaki düğmelerde çok titreme oluyor. ve tablodaki renklendirmeler siliniyor. korhan bey sizin yolladığınız örnekteki formülü uyguladığımda sayfa sütünlarında bozulma oluyor. yaedımcı olursanız sevinirim. birde formüllere koruma koyduğumdada bu kod hata veriyor

 

[KuTuKa]

Selam

istediğiniz gbi olmuş mu

 

[aliberberoglu1981]

arkadaşlar renklendirmeyi başka bir konuda bulduğum kodla halettim ama formüllü hücreler den sonra yön tuşları ile aktif hücre sola yani geriye dönmüyor. ancak mause ile başa tıklayarak geri dönüyor. yardımcı olurmusunuz kodda bir hata mı var. tabloyu ekte yolladım. arkadaşlar bir sorum daha olacak tabloda son sütüne geldiğimde yani N sütununa enter bastığımda tekrar bir alt satırdaki ilk hücreye A hücresine gelmesi mümkünmü böyle bir yol varmı

 

[aliberberoglu1981]

arkadaşlar cevap verecek biri yokmu

 

[Emir Hüseyin Çoban]

arkadaşlar renklendirmeyi başka bir konuda bulduğum kodla halettim ama formüllü hücreler den sonra yön tuşları ile aktif hücre sola yani geriye dönmüyor. ancak mause ile başa tıklayarak geri dönüyor. yardımcı olurmusunuz kodda bir hata mı var. tabloyu ekte yolladım. arkadaşlar bir sorum daha olacak tabloda son sütüne geldiğimde yani N sütununa enter bastığımda tekrar bir alt satırdaki ilk hücreye A hücresine gelmesi mümkünmü böyle bir yol varmı

. . .

Ekteki dosyanız açılışta parola korumalı.
Bu şekilde yardım olmanız zor.

. . .

 

[aliberberoglu1981]

kusura bakamayın şifrem 0197 dir

 

[aliberberoglu1981]

hüseyin bey bakabildinizmi

 

[Korhan Ayhan]

Dosyanız ektedir.

 

[aliberberoglu1981]

korhan bey çok sağolun tam istediğim gibi ama bunu nasıl yaptınığınızı söylermisiniz.sizin yolladığınız örneği benim excel tabloma yapıştırdığımda çalışmıyor.

 

[Korhan Ayhan]

Merhaba,

Module1 ve BuÇalışmaKitabı bölümündeki kodları kendi dosyanıza aktarmalısınız.

 

[aliberberoglu1981]

korhan bey kusura bakmayın ya ben biryerde yanlış yapıyorum ama olmadı. tüm kodları ve makroları aktardım. ama o sutana geldiğim de enter yaptığımda başa gelmiyor. makrolar bölümünden makroyu çalıştır yaparsam başa geliyor ama enterla gelmiyor.

 

[aliberberoglu1981]

arkadaşlar macroyu aynen kopyaladım ama bir türlü benim tablomda çalışmıyor. başka yapmam gereken birşey varmı yardım edin. Korhan bey yardımlarınızı bekliyorum

 

[Korhan Ayhan]

Bahsettiğim işlemleri yaptıktan sonra dosyanızı kayıt edip kapatın. Daha sonra tekrar açın.

Açtıktan sonra N sütununa gelip ENTER tuşuna basın ve sonucu gözlemleyin.

 

[aliberberoglu1981]

korhan bey ne yaptımsa olmadı size dosyayı tekrar yolluyorum bakabilirmisiniz. şifre si 0197