• 18-03-2024, 09:45:54
    #1
    Application.Wait Now + TimeValue("00:00:" & sitezaman)
    If dogrula = 1 Then 'Kopyalama işlemi gerçeklşti ise yapıştır
    Call SendKeys("^v")
    End If
    Application.Wait Now + TimeValue("00:00:" & enterle)
    Call SendKeys("{ENTER}", True)
    Application.Wait Now + TimeValue("00:00:" & dongu)
    Call SendKeys("^{F4}")
    ' Gönderilme tamamlanınca hücreyi boya
    Cells(i + 4, 1).Select
        With Selection.Interior
            .Pattern = xlSolid
            .PatternColorIndex = xlAutomatic
            .Color = 65535
            .TintAndShade = 0
            .PatternTintAndShade = 0
        End With


    Merhabalar excel üzerinden wp de otomatik mesaj gönderen bir uygulama yazıyorum ancak wp yi açıp mesajı giriyor fakat entera basmıyor ama herhangi bir hata almıyorum sebebi nedir
  • 18-03-2024, 10:23:03
    #2
    Python Coder
    Enter mesaj göndermek için değil de alt satıra geçmek için kullanılıyor olabilir
  • 18-03-2024, 11:35:51
    #3
    Call SendKeys("~", True) dener misiniz

    ek olarak https://www.excel.web.tr/threads/sen...smiyor.199989/

    bu arada belki işlem aralarına doevents koymanız iş görebilir
  • 18-03-2024, 12:09:57
    #4
    keremyagan adlı üyeden alıntı: mesajı görüntüle
    Enter mesaj göndermek için değil de alt satıra geçmek için kullanılıyor olabilir
    whatsapp üzerinden göndereceğim için öyle kullanıyorum ancak dediğiniz gibiyse bile alt satırada geçmiyor
  • 18-03-2024, 12:10:33
    #5
    Neron adlı üyeden alıntı: mesajı görüntüle
    Call SendKeys("~", True) dener misiniz

    ek olarak https://www.excel.web.tr/threads/sen...smiyor.199989/

    bu arada belki işlem aralarına doevents koymanız iş görebilir
    denedim ancak herhangi bir değişiklik olmadı