- Katılım
- 26 Ekim 2023
- Mesajlar
- 15
- Excel Vers. ve Dili
- Excel 2016 - Türkçe
Merhaba çok değerli hocalarım.
Bir websitesinde (işyatırım> mali tablolar) 4 adet dropdownlist var, Dropdown'da bilanço dönemleri var.
Her biri için alternatif olarak kod hata vermesin diye dropdown'da olduğundan emin olduğum dönemi (yani son dönemi "2023/9") seçmesini yazıyorum .
Ve ilk istediğim dönemde hata olması - isteğimin dropdownda olmaması- durumunda, kesin olduğunu bildiğim diğer döneme "2023/9" geç diyorum.
kodu yazarken de bu bölümün başına "On Error Resume Next" yazdım lakin, istediğim dönem dropdownda olmasına rağmen o dönemi kısa bir seçip alt satırdaki alternatif döneme "2023/9" a geçiyor.
Örneğin ben 2017/12 yazmışım fakat o 2023/9'a geçiyor.
Dropdownda 2017/3 - 6 - 9 yok ama 2017/12 kesin var.
2107/ 3 - 2017/6 - 2017/9 dönemlerinde 2023/9 u ayarlıyor. 2017/12 olmasına rağmen orada yine 2023/9 yapıyor. 2017/12 olması gerekirken.
Yardımlarınız için şimdiden çok teşekkür ederim.
Bir websitesinde (işyatırım> mali tablolar) 4 adet dropdownlist var, Dropdown'da bilanço dönemleri var.
Her biri için alternatif olarak kod hata vermesin diye dropdown'da olduğundan emin olduğum dönemi (yani son dönemi "2023/9") seçmesini yazıyorum .
Ve ilk istediğim dönemde hata olması - isteğimin dropdownda olmaması- durumunda, kesin olduğunu bildiğim diğer döneme "2023/9" geç diyorum.
kodu yazarken de bu bölümün başına "On Error Resume Next" yazdım lakin, istediğim dönem dropdownda olmasına rağmen o dönemi kısa bir seçip alt satırdaki alternatif döneme "2023/9" a geçiyor.
Örneğin ben 2017/12 yazmışım fakat o 2023/9'a geçiyor.
Kod:
On Error Resume Next
'1
bilanco.FindElementByXPath("/html/body/form/div[4]/div/div[2]/div/div/div[1]/div/div[3]/div/div[2]/div[4]/div/div/div/div/div/div/div/div[1]/div[2]/div[2]/div/table/thead/tr/th[2]/select").AsSelect.SelectByText ("2017/3")
bilanco.FindElementByXPath("/html/body/form/div[4]/div/div[2]/div/div/div[1]/div/div[3]/div/div[2]/div[4]/div/div/div/div/div/div/div/div[1]/div[2]/div[2]/div/table/thead/tr/th[2]/select").AsSelect.SelectByText ("2023/9")
'2
bilanco.FindElementByXPath("/html/body/form/div[4]/div/div[2]/div/div/div[1]/div/div[3]/div/div[2]/div[4]/div/div/div/div/div/div/div/div[1]/div[2]/div[2]/div/table/thead/tr/th[3]/select").AsSelect.SelectByText ("2017/6")
bilanco.FindElementByXPath("/html/body/form/div[4]/div/div[2]/div/div/div[1]/div/div[3]/div/div[2]/div[4]/div/div/div/div/div/div/div/div[1]/div[2]/div[2]/div/table/thead/tr/th[3]/select").AsSelect.SelectByText ("2023/9")
'3
bilanco.FindElementByXPath("/html/body/form/div[4]/div/div[2]/div/div/div[1]/div/div[3]/div/div[2]/div[4]/div/div/div/div/div/div/div/div[1]/div[2]/div[2]/div/table/thead/tr/th[4]/select").AsSelect.SelectByText ("2017/9")
bilanco.FindElementByXPath("/html/body/form/div[4]/div/div[2]/div/div/div[1]/div/div[3]/div/div[2]/div[4]/div/div/div/div/div/div/div/div[1]/div[2]/div[2]/div/table/thead/tr/th[4]/select").AsSelect.SelectByText ("2023/9")
'4
bilanco.FindElementByXPath("/html/body/form/div[4]/div/div[2]/div/div/div[1]/div/div[3]/div/div[2]/div[4]/div/div/div/div/div/div/div/div[1]/div[2]/div[2]/div/table/thead/tr/th[5]/select").AsSelect.SelectByText ("2017/12")
bilanco.FindElementByXPath("/html/body/form/div[4]/div/div[2]/div/div/div[1]/div/div[3]/div/div[2]/div[4]/div/div/div/div/div/div/div/div[1]/div[2]/div[2]/div/table/thead/tr/th[5]/select").AsSelect.SelectByText ("2023/9")
Dropdownda 2017/3 - 6 - 9 yok ama 2017/12 kesin var.
2107/ 3 - 2017/6 - 2017/9 dönemlerinde 2023/9 u ayarlıyor. 2017/12 olmasına rağmen orada yine 2023/9 yapıyor. 2017/12 olması gerekirken.
Yardımlarınız için şimdiden çok teşekkür ederim.