🚀 VBA Event Nedir?
Kullanıcı D2 hücresine değer yazarsa, otomatik olarak formül güncelle. Veya A1 değişirse, başka sayfayı tetikle!
💻 Örnek: Tarih Yazınca Otomatik Gün Adı
VBA Kodu:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Select Case Weekday(Target.Value)
Case 1: Target.Offset(0, 1).Value = "Pazar"
Case 2: Target.Offset(0, 1).Value = "Pazartesi"
Case 3: Target.Offset(0, 1).Value = "Salı"
'vb...
End Select
End If
End Sub
(Türkçe: A1'de tarih değişirse, B1'e gün adını yaz)
⚙️ Setup
1. Alt+F11 → VBA Editor aç
2. Sayfaya sağ tıkla → View Code
3. Yukarıdaki kodu yapıştır
4. A1'e tarih yaz → B1'e gün adı otomatik!
💡 İleri: Hücre Rengi Değiştir
If Target.Value > 100000 Then
Target.Interior.Color = RGB(0, 255, 0) 'Yeşil
Else
Target.Interior.Color = RGB(255, 0, 0) 'Kırmızı
End If
(Türkçe: Hücre 100.000'den fazlaysa yeşil, değilse kırmızı)
⚡ Pratik: Dinamik Uyarı
If Target.Value < ReorderPoint Then
MsgBox "UYARI: Stok düşük! Sipariş ver!"
Target.Font.Bold = True
Target.Font.Color = RGB(255, 0, 0)
End If
(Türkçe: Satılması gereken seviyenin altınaysa uyar)
🎪 Challenge
Satış tablosu: Fiyat × Miktar = Toplam. Fiyat veya Miktar değişirse, Toplam otomatik güncellensin! (VBA Event)
Henüz yorum yapılmamış. İlk yorumu sen yap!
Yorum Yap