değişken veri alan sütundan o anki veriyi başka bir kolona aktarma

[Qosqo]

selamlar

forex ekranından excele veri alıyorum ordan gelen veriler anlık değişmekte
yapmak istediğim 17:17 itibari ile kapanış olduğunda örnekte olduğu gibi B sütunudaki sayısal değerleri 17:17 itibari ile alıp örnerkte L sutuna kopyalamasını,
yine o B sütunu forexden veri aldığı için değişicek bu seferde 17:27 itibari ile oluşan B sütünundaki verileri alıp M sutünuna kopyalamasını yapıcak bir makroya
ihtiyac duydum
yardımcı olursanız sevinirim şimdidden çok teşekkür ederim

 

[omerceri]

Sn Qosqo
1-Veri alma aralığını (en alt süreyi) 1 dakkika olarak ayarlayın
2-Dış veri aldığınız sayfanın kod sayfasının "Change" olayına aşağıdaki örnekte belittiğim yere aktarma kodlarını yazın.

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 2 Then
'.....Kodlar buraya
End If
End Sub

 

[omerceri]

Sn Qosqo
Yukardaki birinci madde geçerli olmak üzere verdiğiniz zaman koşuluna göre kodlar aşağıda
Private Sub Worksheet_Change(ByVal Target As Range)

If Minute(Time) = 17 And Hour(Time) = 17 Then
Columns(2).Copy

Columns(12).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
ElseIf Minute(Time) = 27 And Hour(Time) = 17 Then
Columns(2).Copy

Columns(13).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End If

End Sub