- Katılım
- 17 Kasım 2009
- Mesajlar
- 295
- Excel Vers. ve Dili
- 2010
- Altın Üyelik Bitiş Tarihi
- 24-12-2023
merhaba arkadaşlar aşağıdaki kodu vba koduna dönüştürmek istiyorum yardımcı olma imkanınız varmıdır.
aranan = eokul.FindElements(By.XPath("//i[@class='feather icon-eye f-20']"));
} while (aranan.Count > 0);
***ÜSTTEKİ KODLAR GİZLİ BİLGİLERİN GÖRÜNMESİ İÇİN GÖZ İŞARETİNE TIKLIYOR
aranan = eokul.FindElements(By.ClassName("col-sm-4"));
if (checkedListBox1.GetItemChecked(3) == true)
{
veri = aranan[0].FindElement(By.TagName("img"));
geciciVeri = veri.GetAttribute("outerHTML").ToString();
geciciVeri = geciciVeri.Remove(0, geciciVeri.IndexOf("BitMapResim=") + 12);
adSoyad = geciciVeri.Substring(0, geciciVeri.IndexOf("\""));
**** ÜSTTEKİ KODLAR AD BİLGİSİNİ ALIYOR
veri = aranan[2].FindElement(By.TagName("img"));
geciciVeri = veri.GetAttribute("outerHTML").ToString();
geciciVeri = geciciVeri.Remove(0, geciciVeri.IndexOf("BitMapResim=") + 12);
adSoyad += " " + geciciVeri.Substring(0, geciciVeri.IndexOf("\""))
**** ÜSTTEKİ KODLAR SOYAD BİLGİSİNİ ALIP AD BİLGİSİNE EKLİYOR
aranan = eokul.FindElements(By.XPath("//i[@class='feather icon-eye f-20']"));
} while (aranan.Count > 0);
***ÜSTTEKİ KODLAR GİZLİ BİLGİLERİN GÖRÜNMESİ İÇİN GÖZ İŞARETİNE TIKLIYOR
aranan = eokul.FindElements(By.ClassName("col-sm-4"));
if (checkedListBox1.GetItemChecked(3) == true)
{
veri = aranan[0].FindElement(By.TagName("img"));
geciciVeri = veri.GetAttribute("outerHTML").ToString();
geciciVeri = geciciVeri.Remove(0, geciciVeri.IndexOf("BitMapResim=") + 12);
adSoyad = geciciVeri.Substring(0, geciciVeri.IndexOf("\""));
**** ÜSTTEKİ KODLAR AD BİLGİSİNİ ALIYOR
veri = aranan[2].FindElement(By.TagName("img"));
geciciVeri = veri.GetAttribute("outerHTML").ToString();
geciciVeri = geciciVeri.Remove(0, geciciVeri.IndexOf("BitMapResim=") + 12);
adSoyad += " " + geciciVeri.Substring(0, geciciVeri.IndexOf("\""))
**** ÜSTTEKİ KODLAR SOYAD BİLGİSİNİ ALIP AD BİLGİSİNE EKLİYOR