Arkadaşlar merhaba,
Firmada arıza kayıtlarını toplamak için şu makroyu kullanıyorum.
Bu makronun şöyle bir şey yapmasını istiyorum bu mümkün müdür?
Mail ile yolladığı excel tablosunu bilgisayardaki bir klasöre kopyalayacak.
Ya da belge içerisindeki verileri tek bir tabloda listeleyecek. Bu şekilde ne zaman hangi makine arıza yapmış kayıt altında olacak. (bu çok zor gibi duruyor)
Firmada arıza kayıtlarını toplamak için şu makroyu kullanıyorum.
Kod:
Sub Send_Mail()
Dim OutApp As Object
Dim OutMail As Object
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
With OutMail
.to = "mail@gmail.com"
.Subject = "Arıza Geri Bildirim Formu"
.Body = "Ekteki dosyada arıza yapan makine ile ilgili bilgiler mevcuttur."
.Attachments.Add ActiveWorkbook.FullName
.display
End With
Set OutMail = Nothing
Set OutApp = Nothing
End SubBu makronun şöyle bir şey yapmasını istiyorum bu mümkün müdür?
Mail ile yolladığı excel tablosunu bilgisayardaki bir klasöre kopyalayacak.
Ya da belge içerisindeki verileri tek bir tabloda listeleyecek. Bu şekilde ne zaman hangi makine arıza yapmış kayıt altında olacak. (bu çok zor gibi duruyor)