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


vbs ile boş Word veya Excel belgesi açalım
Windows ve Officenin gidişini eleştirdikçe ,takipçiler yeniliğe ve dokunmatik ekranlara karşı olduğumuzu düşünüyor olabilirler, hayır ve asla bizim karşı olduğumuz şey birşeyler satıp parası alınan insanların

fikrine ve isteklerine zerre saygı gösterilmemesidir , 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 masaüstü kullanıcıları için ergonomi katledildi ve işkence başladı mesela Office 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 mesela Microsoft Excel 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 Microsoft 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

Excel boş çalışma kitabı

PowerPoint kullanıcılarının da kod isteme olasılıklarını göz önüne alıp kodları düzenledik ve işte Bir tıkla Boş bir PowerPoint belgesi açan vbs kodları.

'www.sordum.net
Set objPowerPoint = CreateObject("PowerPoint.Application")
objPowerPoint.Visible = True
Set objdoc = objPowerPoint.Presentations.Add()

Bu üstteki üç kodun da hazır hallerini aşağıdaki Download linkine tıklayıp indirebilirsiniz. Scriptler; Microsoft Word , Microsoft Excel , Microsoft PowerPoint 2013 , 2016 ve 2019 da sorunsuz şekilde çalışmaktadır. indirdiğiniz dosya içerisindeki scriptleri masaüstünüze atıp tek tıkla boş bir excel , word ve powerPoint 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.

- Microsoft Office ayarlarını yedekleyelim Burada

- Office de görüntüleme dili nasıl değiştirilir Burada

- Office uygulamalarını Güvenli Mod da başlatın Burada

- Windows ve Office ye Microsoft desteğinin bitiş tarihleri Burada

- Microsoft Office Uygulaması nasıl kaldırılır Burada

- Microsoft Office Picture Manager i kolayca edinin Burada

- Excel dosyalarını topluca Pdf formatına dönüştürün Burada

- Birden fazla hücreye aynı anda yazmak Burada

- Excelde hücrelerdeki en büyük veya küçük değeri bulalım Burada

- Excel de sütun harfleri sayı oldu Burada


4 Yorum Var

Yorum Ekle

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

Captcha