Bu şablon, seçilen iki hücrenin içeriğini birbiriyle değiştiren bir makro içerir. Kes-yapıştır veya geçici hücre kullanmadan, bitişik ya da birbirinden ayrı iki hücrenin değerleri tek işlemle yer değiştirir.
Dosyanın içeriği
- Sheet2: B4:H16 aralığında kısa bir kullanım notu ve deneme için örnek isimler (George, Mary, Carl, John) bulunur. Not metni, iki hücrenin seçilmesini ve Ctrl tuşunun basılı tutulmasını anlatır.
- Module1: SwapSelections adlı makro bu modülde yer alır.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme veya dışarıya bağlantı gibi zararlı bir işlem yoktur.- SwapSelections: Seçimde tam olarak 2 hücre olup olmadığını denetler. Sayı farklıysa "Your selection should only contain 2 cells" uyarısı gösterir ve işlemi sonlandırır.
- Seçim iki ayrı alandan oluşuyorsa (Ctrl ile seçim) her alanın ilk hücresi alınır.
- Seçim tek alansa ve dikeyse üstteki ile alttaki hücre, yataysa soldaki ile sağdaki hücre değiştirilir.
- Değerler iki metin değişkeninde tutulur ve karşılıklı yazılır. Değerler metin olarak aktarıldığı için sayı biçimleri korunmayabilir.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Yer değiştirmek istediğiniz iki hücreyi seçin; ayrı hücreler için Ctrl tuşunu basılı tutarak ikinci hücreyi seçin.
- Geliştirici sekmesinden Makrolar penceresini açın (Alt+F8) ve SwapSelections makrosunu çalıştırın.
- İki hücrenin içeriği yer değiştirir. Denemek için Sheet2 sayfasındaki isimleri kullanabilirsiniz.
- Makroyu kendi dosyanızda kullanmak için Module1 modülünü VBA düzenleyicisinden kopyalayın.