• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

excelde hücreleri çoğaltma

Katılım
18 Temmuz 2012
Mesajlar
21
Excel Vers. ve Dili
excel 2007 türkçe
Arkadaşlar elimde bir liste ve firma isimleri var ancak her firmanın altında farklı sayılarda boşluk var ve ben bu boşluklara üstteki firmanın adını kopyalamanın bir mantığı veya çözümü var mıdır?
örnek dosya ektedir.
 

Ekli dosyalar

Bu konu sitede o kadar çok işlendi ki, google da bile arasanız rahtlıkla bulabilirsiniz.
Lütfen konu açmadan önce sitede arama yapınız.

Alternatif olarak şu kodları kullanarabilirsiniz;

Kod:
Sub Emre()
    Dim i As Integer
    For i = 2 To Range("A65536").End(3).Row
        If Cells(i, 1) = "" Then
            Cells(i, 1).FillDown
        End If
    Next i
    i = Empty
End Sub
 
Geri
Üst