sinansuzer
Yeni Üye
- Katılım
- 27 Nis 2022
- Mesajlar
- 9
- Aldığı beğeni
- 1
- Excel V
- Office 2010 TR
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