• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Makroyu ya da kodu düzeltmek

  • Konbuyu başlatan Konbuyu başlatan AKREP1
  • Başlangıç tarihi Başlangıç tarihi
A

AKREP1

Katılım
30 Mayıs 2007
Mesajlar
142
Excel Vers. ve Dili
excel 2003 türkçe
Ekteki dosyamda sayfaya satır ve sütun renklendirme kodu uygulanınca koru makrosu bunu engelliyor.Araçlar sekmesinden Sayfa korumasını kaldırınca kod çalışıyor.Benim isteğim bunların ikisinin de aynı anda çalışması.Yardımcı olursanız sevinirim.Saygılarımla.
 
Dosyanız ekte.:cool:
Kod: 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   [COLOR="Red"][B] ActiveSheet.Unprotect[/B][/COLOR] 
Cells.Interior.ColorIndex = 1  'Turn off previous use Cells.Interior.ColorIndex = 1  'Turn off previous use
   If Cells(1, 1) = "." Then GoTo son
   Target.EntireRow.Interior.ColorIndex = 5
   Target.EntireColumn.Interior.ColorIndex = 26
[COLOR="red"][B]son:
   ActiveSheet.Protect[/B][/COLOR]
End Sub
 
Teşekkürler,elinize emeğinize sağlık.
 
Tablo koruması olmadan yapmak mümkü mü?Teşekkürler
 
Teşekkürler,sağolun.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[COLOR="[COLOR="Red"]Yellow"]Cells.Interior.ColorIndex = 1 'Turn off previous use Cells.Interior.ColorIndex = 1 'Turn off previous use[/COLOR][/COLOR]
If Cells(1, 1) = "." Then GoTo son
Target.EntireRow.Interior.ColorIndex = 5
Target.EntireColumn.Interior.ColorIndex = 26
son:
End Sub
satır hata veriyor.
 
Son düzenleme:
Yardımcı olursanız sevinirim.
 
Sayfa korumasını kaldırın.:cool:
 
Teşekkürler dediğinizi yaptım düzeldi.Sağolun.
 
Cevap yazmak için giriş yap yada kayıt ol.
Geri
Üst