formül yada makro yardım eğer formülü ama ben makro ile yapamak istedim olmadı

[samed32]

örnegi incelerseniz daha iyi anlarsınız teşekkürler...eğer formülü ile galiba olacak

 

[Ali]

Aşağıdaki gibi deneyiniz.

Sub değerleriyaz()
If Cells(1, 2) <> "" Then GoTo 10
If Cells(1, 2) = "" Then GoTo 20
20 If Cells(1, 1) >= 1 And Cells(1, 1) <= 5 Then
Cells(1, 1).Offset(0, 2) = "10 YTL"
End If
If Cells(1, 1) > 5 And Cells(1, 1) <= 10 Then
Cells(1, 1).Offset(0, 2) = "20 YTL"
End If
10 If Cells(1, 2) >= 1000 And Cells(1, 2) <= 3000 Then
Cells(1, 2).Offset(0, 1) = "25 YTL"
End If
If Cells(1, 2) > 3000 And Cells(1, 2) <= 6000 Then
Cells(1, 2).Offset(0, 1) = "30 YTL"
End If
If Cells(1, 2) > 6000 And Cells(1, 2) <= 9000 Then
Cells(1, 2).Offset(0, 1) = "35 YTL"
End If
End Sub

 

[a.akyurek]

örnegi incelerseniz daha iyi anlarsınız teşekkürler...eğer formülü ile galiba olacak

C1:

=IF(B1>=1000,LOOKUP(B1,{1000,25;3000,30;6000,35}),IF(A1,LOOKUP(A1,{1,10;5,20}),""))

 

[Ali]

C1:

=IF(B1>=1000,LOOKUP(B1,{1000,25;3000,30;6000,35}),IF(A1,LOOKUP(A1,{1,10;5,20}),""))

Formüllü çözümde hoşuma gitti .Ellerinize sağlık.