Kullanıcı
- Katılım
- 28 Tem 2022
- Mesajlar
- 117
- Excel Versiyonu
- Excel 365
- Excel Sürümü
- 32 Bit
- Excel Dili
- İngilizce
Merhaba elimdeki listede yaklaşık 7000 adet link var bunların her birini açıp tek tek içinde işlem yapmam gerekiyor. Fakat tek tek açmak yerine topluca linkler açılsın istiyorum. Aşağıdaki gibi bir örnek buldum fakat burada listedeki tüm linkleri açıyor bu da programın yavaşlamasına sebep oluyor. ben belli bir aralık değeri gireyim ve sadece o aralıktaki linkleri açsın istiyorum. Mümkün müdür? Link örneğinde, her 7 satırda tekrar ediyor linkler örnek olması için fazla link bulamadım çünkü
Sub Web_Sayfası_Aç1()
Dim i%
For i = 1 To Range("A4000").End(3).Row
If Cells(i, 1) <> "" Then
Shell "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe " & Cells(i, 1) & "", 1
End If
Next i
i = emty
End Sub
Sub Web_Sayfası_Aç1()
Dim i%
For i = 1 To Range("A4000").End(3).Row
If Cells(i, 1) <> "" Then
Shell "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe " & Cells(i, 1) & "", 1
End If
Next i
i = emty
End Sub
Ekli dosyalar