Birleştirilmiş Hücrelerin Başlangıç Bitiş Sütununu Belirleme
Birleştirilmiş Hücrelerin Başlangıç Bitiş Sütununu Belirleme isimli kod ile birleştirilmiş hücre aralığının hangi satır ve sütunları kapsadığını bulursunuz.
XD Destek İstePublic Sub StartEndMerge()
Dim StartColumn As Integer
Dim EndColumn As Integer
StartColumn = ActiveCell.Column
EndColumn = Selection.Columns.Count + StartColumn - 1
MsgBox "Başlangıç Sütunu " & StartColumn
MsgBox "Bitiş Sütunu " & EndColumn
End SubGerekli Adımlar
Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.
- Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
- Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
- Araç çubuklarından Insert -> Module yazısına tıklayın.
- Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
- Alt kısma eklenecek gelecek olan Module(1) yazısına çift tıklayın.
- Üstteki kodu yapıştırın.
#Birleştirilmiş Hücrelerin Başlangıç Bitiş Sütununu Belirleme
Üstteki alanda, Google Reklamları yerine sizin reklamınızın yayınlanmasını ister misiniz?
Reklam vermek istiyorum
Daha önce yorum yapılmamış!
Bir çalışma sayfasının hızlı bir şekilde kopyasını oluşturmak için:
Not: Çalışma sayfasının kopyasının konumu, Ctrl tuşundan nereye gittiğinize bağlıdır. İmleci sürüklediğinizde küçük bir siyah ok (aşağı doğru işaret) olduğuna dikkat edin. Bu ok çalışma sayfasının kopyasının konumunu belirler.
- Klavyede Ctrl tuşuna basın.
- Ctrl tuşu basılıyken, çalışma kitabının altındaki sekme adına sol tıklayın, çalışma sayfasını çalışma alanına doğru sürükleyin (imleç ile birlikte bir dikdörtgenin artı işaretinin göründüğünü fark edersiniz).
- Düğmeyi bırakın.
Not: Çalışma sayfasının kopyasının konumu, Ctrl tuşundan nereye gittiğinize bağlıdır. İmleci sürüklediğinizde küçük bir siyah ok (aşağı doğru işaret) olduğuna dikkat edin. Bu ok çalışma sayfasının kopyasının konumunu belirler.