daha sonra notepad acip asagidaki kodlari yazip html olarak kaydediyoruz
html> <meta http-equiv="refresh" content="10" > <head> <style type="text/css"> body { margin: 0; overflow: hidden; } #iframe1 { height: 100%; left: 0px; position: absolute; top: 0px; width: 100%; } </style> </head> <body> <iframe id="iframe1" src="tvmakro.mht" frameborder="0"></iframe> </body> ------------------ ve excelimizde alt f11 e basıp makroları ekliyoruz otomatik kaydetsin diye sag tıklayım insert module tikla ve ekle ; Sub SaveMyBook() 'Turn off Excel message alerts Application.DisplayAlerts = False 'Save this workbook. ThisWorkbook.Save 'Turn back on alerts Application.DisplayAlerts = True 'call this procedure again in another 15 mins Application.OnTime Now + TimeValue("00:15:00"), "SaveMyBook" End Sub ---------------- bunlarıda shhet1e tıkla ve ekle makroda Place this code in the ThisWorkbook module Private Sub Workbook_Open() 'Set a timer to run the SaveMyWorkbook procedure in 15 mins Application.OnTime Now + TimeValue("00:15:00"), "SaveMyBook" End Sub |
No comments:
Post a Comment