(23/01/2021, 23:06)hayalibey yazdı:

Kod:

  Call SendKeys(ListBox1.List(x, 8), True)
  zaman (1000)
  Call SendKeys("~", True)
' Call SendKeys "{ENTER}", True
zaman (2000)
If CheckBox1.Value = True Then
Call SendKeys(TextBox1.Value, True)
Else
Call SendKeys(ListBox1.List(x, 9), True)

Hocam bir yerde 8 diğer yerde 9 neden var.
Bir de kod sadece ilk numaraya mesajı atıyor 2. sıradaki numarayı da 2. sıradaki numaranın karşındaki I sütunundaki mesajı da ilk numaraya atıyor.

---

Aynen Hocam grek Excel sayfası üzerinden gerekse userform üzerinden gönderilen tüm mesajlar I sütunundaki ilk numaraya gidiyor. Hatta diğer telefon numaraları  ile o numaraların karşılarındaki mesajlarda ilk numaraya gidiyor. Tekrar koda bakma imkanınız var mı acaba

8 yazılan yer numarayı alan sütun 9 ise gidecek mesaj sütunu . Müsait olduğumda kodları tekrar kontrol ederim .