MS Office uygulamaları çok tasarlandıakıllıca ve bunu söylemiyorum çünkü işimi son derece kolaylaştırıyorlar. Bunu söylüyorum çünkü doğru. Birkaç gün önce Office 2013’te YouTube videolarını eklemek üzerine bir yayın yaptık ve bu seçeneğin MS Excel’de mevcut olmadığını, çünkü orada gerekmediğini belirtti. Bu bahsettiğim zeka türü; Belirli bir uygulama türünde hangi özelliklerin gerekli olduğunu bilmek. Alakalı olmayan hiçbir şeyin nihai teklifle sonuçlanmamasını sağlar. Bununla birlikte, Excel'in bir çalışma sayfasına daha fazla satır eklemenize izin verdiği yeri bulmak için şaşırdım, eklemek istediğiniz satır sayısını seçmenize izin vermiyor. Bunu gerçekleştirmek için, mevcut olanlardan eklemek istediğiniz satır sayısını seçmek ve ardından ekleme işlevini kullanmak gibi başka çalışmalarınız var. Veya satır ekleme adımını istediğiniz kadar satır için tekrarlayabilirsiniz. Bu tekrarlayıcıdır, ancak beş dakikanızı ayırmak istiyorsanız, bu küçük Makro işi sizin için halledebilir.
Bu bir Makro gerektirdiğinden, yapmanız gerekenlerdosyanızı makro etkin bir Excel dosyası olarak kaydedin. Bunu yapmak için, farklı kaydet penceresindeki as Farklı kaydet ’seçeneğini tıklayın ve‘ Excel Marco Etkin Çalışma Kitabı (* xlsm) öğesini seçin.
Sonra, Makroyu yazmanın zamanı geldi. Görünüm sekmesine gidin ve yeni bir tane oluşturmak için Makrolar'ı tıklayın. İstediğinizi adlandırın ve 'Oluştur' düğmesini tıklayın. Aşağıdaki pencere otomatik olarak açılacaktır.
Burada önemli olan ‘Sub‘ ve ‘End Sub’tur.çizgiler. Alt satırda, makronuzun adı bulunurken, Alt Alt, bu Makrodaki komutların sonunu işaretler. Yeni oluşturduğunuzdan, yukarıdaki ekran görüntüsündeki gibi çizgiler arasında hiçbir şey olmamalıdır. Aşağıdakileri bu iki satır arasına yapıştırın.
Dim CurrentSheet As Object
" Loop through all selected sheets.
For Each CurrentSheet In ActiveWindow.SelectedSheets
" Insert 5 rows at top of each sheet.
CurrentSheet.Range("a1:a5").EntireRow.Insert
Next CurrentSheet
Bu kod en baştan beş satır ekleyecektir. Kodda A1: A5 olarak belirtilir. Gereksinimlerinize göre düzenlemek için bu aralığı düzenlemeniz gerekir. İlk değer, satırların ekleneceği yerlere bir referans olarak hizmet eder. A100 olarak değiştirirseniz, ilk doksan dokuz satırdan sonra satırlar eklenir. Referans noktasını ayarladıktan sonra satır sayısını girmeniz gerekir.
Satır numaraları, A1: A5 hücre aralığı tarafından tanımlanır. Bu aralık 5 satır ekleyecektir. Satır sayınıza göre doğru aralığı bulmak için, örneğin A99'dan 25 satır eklemek istediğinizde, referans noktasına 25 ekleyeceksiniz, böylece A99 ve eksi bir hücre. Yani A100 + 99 - 1 = A198. Sütun değil, satır ekliyorsunuz, böylece sütun numarası değil yalnızca sayı değişecek. Makroya her satır eklemek istediğinizde güncellenmesi gerekir, ancak yalnızca küçük bir düzenlemedir ve harcanan zamana değecek kadar iyi çalışır.
Microsoft Desteği ile Makro
Yorumlar