• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

mail yollarken eklenti nasıl ekliyebilirim

  1. Discreum

    Çözüldü mail yollarken eklenti nasıl ekliyebilirim

    Sub listele() Dim X As Long Dim ws As Worksheet Set ws = Sheets("MailListesi") X = ws.Range("A10000").End(xlUp).Row lstMail.ColumnCount = 3 On Error Resume Next lstMail.ColumnWidths = "155,250,50" If X = 1 Then lstMail.RowSource = "MailListesi!A2:C2" Else lstMail.RowSource = "MailListesi!A2:C"...
Geri
Üst