if komutunda nasıl AND kullanırım?

Katılım
20 Ocak 2009
Mesajlar
10
Excel Vers. ve Dili
2007 ing
Merhaba,

bir konu hakkında bilgisi olanlardan yardım isteyecektim.

problemim şu
a sütununda kodlarım var
b sütununda a'daki kodların tarihi
c sütununda da a'daki kodlardan bazıları var.
d sütununda c'deki kodların tarihi mevcut.

yapmak istediğim eğer A'daki kodlardan C'de varsa(örn:a1=c5 ise) ve B'deki tarih D'deki tarihten küçükse B'deki tarih yerine D'deki tarihi yaz
yazdığım komut aşağıdaki gibidir. Ancak çalışmıyor.

For i = 3 To 50
For j = 3 To 50
If Cells(j, 1).Value = Cells(i, 5).Value And Cells(j, 3).Value > Cells(j, 6).Value Then Cells(j, 3).Value = Cells(j, 6).Value
Next j
Next i
 
Katılım
22 Eylül 2006
Mesajlar
883
Excel Vers. ve Dili
Office Excel®2007®TR
2003 formatında eklerseniz bütün kullanıcılar daha rahat edeceklerdir.
 
Katılım
22 Eylül 2006
Mesajlar
883
Excel Vers. ve Dili
Office Excel®2007®TR
Aşağıdaki kodu dener misin ?
Kod:
Sub olustur()
Dim i, j As Integer
On error resume next
For i = 3 To 100
For j = 3 To 100
If Cells(i, 1).Value = Cells(j, 3).Value And Cells(i, 2).Value < Cells(j, 4).Value Then
Cells(i, 2).Value = Cells(j, 4).Value
End If
Next j
Next i
End Sub
 
Üst