- Katılım
- 5 Ocak 2007
- Mesajlar
- 138
- Excel Vers. ve Dili
- 2007 English
Merhaba,
Ekteki dosyada sorunumu dile getirdim. iyi çalışmalar...
Ekteki dosyada sorunumu dile getirdim. iyi çalışmalar...
DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$B$3" Then Exit Sub
If Target = "okul" Then
[b28:l28].NumberFormat = "0.00%"
Else
[b28:l28].NumberFormat = "#,##0.00"
End If
End Sub
Belki işinize yarayabilir...=EĞER(DÜŞEYARA($A28;$A$36:$L$38;B$32;0)<1;DÜŞEYARA($A28;$A$36:$L$38;B$32;0)*100;DÜŞEYARA($A28;$A$36:$L$38;B$32;0))