Bu dosya, belirlenen bir alandaki dolu hücrelerin içeriğini tek hücrede, aralarına seçilen bir ayraç (örneğin tire) koyarak birleştirmek için hazırlanmış iki özel işlev içerir. Boş hücreler atlanır, sonuç ayraçla ayrılmış tek bir metin olarak döner.
Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.
İşlevler makro ile tanımlı olduğundan makrolar etkin değilse hücrede #NAME? hatası görünür. Makrolar etkinleştirildiğinde sonuç hesaplanır.
Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
- Sayfa1: B2:I17 aralığında örnek veri alanı bulunur. Örnek değerler ve C13 hücresindeki işlev çağrısı bu sayfadadır.
- Module1: Birles1 ve Birles2 adlı iki özel işlevin VBA kodu.
Kullanılan formüller
C13 hücresinde B2:F10 aralığındaki dolu hücreleri tire ile birleştiren işlev çağrısı yer alır:=Birles1(B2:F10;"-")Makrolar
- Birles1(Alan, Ayrac): Alandaki hücreleri sırayla dolaşır, boş olmayanların değerini ayraçla art arda ekler ve sondaki fazla ayracı siler. Ayraç isteğe bağlıdır. İşlev, Application.Volatile ile tanımlandığı için çalışma sayfası her hesaplandığında yeniden çalışır.
- Birles2(Alan, Ayrac, BosGizle, AsDisplayed): Daha kapsamlı sürümdür. Hücre değerlerinin başındaki ve sonundaki boşlukları temizler. BosGizle değeri varsayılan olarak True olduğundan boş hücreler atlanır. AsDisplayed True verilirse hücrenin değeri yerine ekranda görünen biçimli metin (Text) birleştirilir.
Nasıl kullanılır
- Dosyayı açın ve güvenlik uyarısında makroları etkinleştirin.
- Birleştirilecek verileri Sayfa1 üzerinde ilgili alana girin.
- Sonucun görüneceği hücreye Birles1 veya Birles2 işlevini, alan ve ayraç bilgisiyle yazın.
- Boş hücre ve biçimli görünüm üzerinde denetim gerekiyorsa Birles2 işlevinin ek bağımsız değişkenlerini kullanın.
- İşlevleri başka bir dosyada kullanmak için Module1 kodunu o dosyanın bir modülüne kopyalayın ve dosyayı .xlsm olarak kaydedin.
