vbs ile boş Word veya Excel belgesi açalım


vbs ile boş excel veya word belgesi açalım

Ben Windows ve Officenin gidişini eleştirdikçe , insanlar yeniliğe ve dokunmatik ekranlara karşı olduğumu düşünüyor , hayır ve asla benim karşı olduğum şey birşeyler satıp parası alınan

insanların fikrine ve isteklerine zerre saygı gösterilmemesi , evet Trend dokunmatik ekranlardan yana fakat gerçek bir klavye ve farenin yerini tam olarak nezaman dolduracaklar derseniz cevabım ; biraz daha geliştikleri zaman olacaktır şu halleri ile en azından işyerleri için hiç uygun değiller ve verimliliği katlederler. Office 2007 benim en sevdiğim officeydi ve Mamül müşteri karlılık raporlarını hazırlarken işlerimi hep bununla yapardım neden bu office sürümünü severdim , çünkü boş bir word belgesi için tek yapmam gereken şey word u başlatmaktı , Office 2010 dan sonra dokunmatik hastalığı yüzünden laptop ve masasütü kullanıcıları için ergenomi katledildi ve işkence başladı mesela 2010 dan sonra bir tıkla açılan boş belge 2-3 tıkla açılır hale geldi

Microsoft word şablon seçimi

Bu durumu bertaraf edip Word direkt boş sayfa ile açılsın istiyorsak ne yapılması gerektiğini Buradaki yazımızda açıklamaya çalışmıştık , gel gelelim bazı arkadaşlar bu çok faydalı birşey ama ayarları kurcalamadan sadece istediğimiz zaman direkt boş sayfa ile açılsın diğer zamanlarda Şablon seçim ekranı gelsin istiyoruz yolu yokmudur diye emailler attılar.

Evet bunun yolu vardır , üstteki linkte verdiğimiz ayarları yapmadan (çünkü yapılırsa hep direkt boş belge ile başlayacaktır) küçük bir .vbs scripti ile bu yapılabilir – tıklandığında word boş sayfası açar işte script

'www.sordum.net
Set objWord = CreateObject("Word.Application")
objWord.Visible = True
Set objDoc = objWord.Documents.Add()

Üstteki kod kullanıldığında Office kapalı olsa bile açılacak ve boş word sayfası karşımıza gelecektir. Şimdi sürekli excel kullananların ya biz neyapacağız aynından isteriz dediğini duyar gibiyim , elbette kodları düzenleyip tek tıkla boş excel sayfası açacak vbs kodunuda oluşturabiliriz (Aşağıda)

'www.sordum.net
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
Set objdoc = objExcel.Workbooks.Add()

Böylece aşağıdaki gibi şablon seçim arayüzü gelmeyecektir

Vbs ile boş excel sayfası

Bu üstteki her iki kodun da hazır hallerini aşağıdaki Download linkine tıklayıp indirebilirsiniz. Scriptler; Microsoft Word , Microsoft Excel 2013 veya 2016 da sorunsuz şekilde çalışmaktadır. indirdiğiniz dosya içerisindeki scriptleri masaüstünüze atıp tek tıkla boş bir excel veya word sayfası açabilirsiniz ve bu da size her bir belge açışta 3-5 sn kazandıracaktır günde ortalama 10 defa bu belgeleri açan biri : 10 x 5 = 50 sn günde kazanacak x 365 gün = 5.06944444 saat Yılda kazanacaktır eğer Bir ülkede Ofislerde 10 milyon kişi çalışıyorsa , yılda sadece bu tık ile Ülkeye 50.694.444,4 (Elli Milyon Altıyüzdoksandörtbin dörtyüzkırkdört) saat kazanç sağlanacaktır , derlerya bazı şeyler ayrıntılarda gizlidir.

Download



Yorum Ekle

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir

CAPTCHA