VBAでエクセルからツイッターに投稿

VBAでエクセルからツイッターに連続投稿したいのですが難しいでしょうか？？

試しに作ってみたVBAです。




'モバイルなら投稿できるかも・・・？

Sub tweet()


Dim ie As InternetExplorer
Dim txtAreaInput As HTMLTextAreaElement


Set ie = CreateObject("internetExplorer.Application") 'IEを開く○
ie.Visible = True
ie.Navigate "https://mobile.twitter.com/compose/tweet" 'ツイッターを開く○


Do While ie.Busy Or ie.ReadyState < READYSTATE_COMPLETE 'ページの読み込みを待つ○
DoEvents
Loop


Range("B2").Select '画像ファイルのセルをコピー○しかし連続となるとやり方わからないです。
Selection.Copy


Set txtAreaInput = ie.Document.getElementsByName("textarea")(0) 'セルを選択×
txtAreaInput.Value = ActiveSheet.Cells(2, 1).Value


ObjIE.Document.all("camera-input").Click '画像パスを開く×そもそもカメラボタンが消えている？？


SendKeys "^v{ENTER}" '画像ファイルのパスをペーストしエンター×効かない？？



For Each Anchor In ie.Document.getElementsByTagName("A") 'ツイートを投稿×ボタンが押せない
If Anchor.innerText = " ツイート " Then
Anchor.Click
Exit For
End If
Next


End Sub

No.3 ベストアンサー 回答者： adfadfa 回答日時： 2014/08/18 15:00

VBA　IE操作にcopyは利用しないですね。

あと、クリック処理の後は、IE読込処理入れないとプログラムが次の処理をしてしまい、うまくいきませんよ。

できるかできないかについては、「できる」ですが、ちょっと手間がかかるので、私はギブです（笑）

下記サイトの主にメールしたらどうですか？

ツイッター系のVBA操作も書かれているので、もしかしたら協力してくれるかもしれません。

http://www.vba-ie.net/

No.2 回答者： l3651s31io4 回答日時： 2014/08/10 04:17

画像は画像URLをつぶやいた方が早いかもしれませんね。

昔は、画像ファイルの選択も自動化できましたが、マイクロソフトのセキュリティ対策としてできなくなっています。

No.1 回答者： eden3616 回答日時： 2014/08/07 15:37

回答ではないですが以下が参考になるのでは。

http://blog.cles.jp/item/4549
http://news.mynavi.jp/articles/2011/11/04/excelv …