makro çakışması

[karahan61]

merhabalar..

aşağıdaki açılış sayfası ve açılış mesaı makroları aynı anda kullanılırsa hata veriror

ikisininde çalışmasını istiyorum. Ne yapmam lazım
Yardımlarınız için teşekkürler,

Sub Autpen()
Sheets("GİRİŞ").Select
End Sub
……………………………….

Sub Auto_open()
Beep
MsgBox "Bu program ..................tarafından yapılmıştır. ", vbInformation, " Buraya yazdığınız yazı mesaj kutusunun başlığında gözükecektir."
End Sub


Sub Auto_close()
Beep
MsgBox "Program Hatalarını 0-542-.......... numaralı telefona bildirebilirsiniz.", vbSystemModal, " Buraya yazdığınız yazı mesaj kutusunun başlığında gözükecektir"
ActiveWorkbook.Save
End Sub

 

[leumruk]

Merhaba,
Aşağıdaki gibi deneyin.

Sub Auto_Open()
Sheets("GİRİŞ").Select
Beep
MsgBox "Bu program ..................tarafından yapılmıştır. ", vbInformation, " Buraya yazdığınız yazı mesaj kutusunun başlığında gözükecektir."
End Sub