geri alınan hisse senetleri

  1. ExcelDepo

    Hisse Senedi Açıklamalarını Ayırma

    Sub HISSE_ISLEM_BILGILERI() v = Range("B2:D" & Cells(Rows.Count, 2).End(3).Row).Value2 Range("H2:L" & Rows.Count).ClearContents ReDim snc(1 To UBound(v), 1 To 5) For a = 1 To UBound(v) deg = Replace(v(a, 1), ".", "") snc(a, 1) = Split(deg, " ")(1) snc(a, 2) = Split(Split(deg, snc(a...
Üst