Oto Twit

[burhanyildirim11]

kolay gelsin


youtubede ototwit ile ilgili video denk geldi
ama çalıştıramadım

nerede yanlış yapıyorum yardımcı olabilirmisiniz.

Sub TWWT()



ActiveWorkbook.FollowHyperlink Address:="https://twitter.com/home"
Application.Wait (Now + TimeValue("00:00:07"))

For i = 1 To 5

twit = Range("A" & i)


Call SendKeys("n", True)
Application.Wait (Now + TimeValue("00:00:02"))

Call SendKeys(twit, True)
Application.Wait (Now + TimeValue("00:00:02"))

Call SendKeys("^+~", True)
Application.Wait (Now + TimeValue("00:00:03"))

Next

End Sub

2022-1.png dosyasını indir - download

2022-1.png dosyasını indir, download. Dosya.tc .Dosya Upload. Dosya Paylaş. Dosya Yükle

s7.dosya.tc

 

[TiOr]

Merhaba,
Bunu bende denedim ama hata aldım.

İlgili videonun linki;

Aldığım hata;



burhanyildirim11bey dönüş yapılmamış size ama konuyu tekrardan bir hortlattım.
Yardımcı olabilir misiniz? Üstatlarım.
Desteklerinizi talep eder, hayırlı akşamlar dilerim.