Gelen İlk rakam. başka bir hücreye kayıt edilsin.

[sensizsoldum]

Merhaba
F3:F ve G3:G aralığına gelen rakamı makro ile başka hücreye bir defaya mahsus kayıt etmem gerekiyor. F3:F ve G3:G aralığındaki rakamlar değişse de bu rakamların değişmemesi gerekiyor. Makro bunu butonsuz değere göre algılamalı. F3:F gelen rakam M3:M, G3:G gelen rakam ise N3:N de olabilir. F ve G hücrelerde değer yoksa ya da silinmişse M ve N de olmamalıdır.
Yardımcı Olabilir misiniz.

 

[ynmcan]

Syn. Sensizsoldum;
Aşağıdaki kod işinize yararmı ?
Ekteki Örnek Dosyayı inceleyin.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

For m = 3 To [M65536].End(3).Row
          If Cells(m, 6) = "" Then
                   Cells(m, 13) = ""
                         End If
                               Next m
                               
For f = 3 To [F65536].End(3).Row
          If Cells(f, 13) = "" Then
                   Cells(f, 13) = Cells(f, 6)
                         Else
                             Cells(f, 13) = Cells(f, 13)
                                   End If
                                         Next f
'------------------------------------------------------------

For n = 3 To [N65536].End(3).Row
          If Cells(n, 7) = "" Then
                   Cells(n, 14) = ""
                         End If
                               Next n

For g = 3 To [G65536].End(3).Row
          If Cells(g, 14) = "" Then
                   Cells(g, 14) = Cells(g, 7)
                         Else
                             Cells(g, 14) = Cells(g, 14)
                                   End If
                                         Next g
                                         
End Sub

 

[sensizsoldum]

Merhaba günaydın, hayırlı sabahlar.
Çok teşekkür ederim denedim tam istediğim gibi. Umarım bilmediğim görmediğim sürpriz bir hata olmaz. Çok teşekkürler. İyi çalışmalar dilerim.
Saygılarımla.