Güncel olmayan bir tarayıcı kullanıyorsunuz. Bunu veya diğer web sitelerini doğru şekilde göstermeyebilir. Yükseltmeli veya bir alternatif kullanmalısınız. tarayıcı.
With ListView2
.ListItems.Clear
For i = 11 To Sheets("Zarf Açma").Cells(Rows.Count, "B").End(xlUp).Row
x = x + 1
Set Liste = .ListItems.Add(, , Sheets("Zarf Açma").Cells(i, 2).Value)
With Liste
' .SubItems(1) = Sheets("Zarf...