satırları sütuna sütunu satıra bağlı yapıştırma nasıl yapılır

Katılım
7 Ağustos 2006
Mesajlar
13
arkadaşlar ben programımda satırları sütuna dönüştürmek istiyorum fakat bunu bağlı yapıştırmak istiyorum bir sayfadaki programımdaki satırdaki hücrelerden boş hücreleri atlayarak veriyi alıp , başka bir sayfadaki programımın sütunundaki hücrelere sıralı bir şekilde o verileri bağlı olarak yapıştıracak.
bu konuda çok araştırma yaptım fakat hep kopyala ters çevir yapıştır olarak örnek vermişler bu benim işimi görmüyor bu konuda yardımcı olabilirseniz sevinirim şimdiden teşekkürler
 

leumruk

Uzman
Uzman
Katılım
15 Nisan 2007
Mesajlar
3,472
Excel Vers. ve Dili
Office 2010 & 2013 tr
Örnek dosya ekleyebilirseniz yardımcı olamaya çalışırım.
Olanı ve olması gerekeni örnekte belirtmeyi unutmayın.
 

leumruk

Uzman
Uzman
Katılım
15 Nisan 2007
Mesajlar
3,472
Excel Vers. ve Dili
Office 2010 & 2013 tr
Merhaba,
Aşağıdaki kodu kullanabilirsiniz.
Kod:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, [c1]) Is Nothing Then Exit Sub
Cancel = True
Set s1 = Sheets("HİSSELER")
Set s2 = Sheets("ANALİZ")
Set Alan = s1.Range("a2:u2").SpecialCells(xlCellTypeConstants, 23)
Sat = 1
For Each hcr In Alan
Sat = Sat + 1
s2.Cells(Sat, "c") = "=" & s1.Name & "!" & hcr.Address
Next
End Sub
 

Ekli dosyalar

Son düzenleme:
Katılım
7 Ağustos 2006
Mesajlar
13
syn leumruk bu kodu nasıl kullanabileciğim konusunda da lütfen yardımcı olun lütfen kodlar konusunda pek bilgim yok
 

leumruk

Uzman
Uzman
Katılım
15 Nisan 2007
Mesajlar
3,472
Excel Vers. ve Dili
Office 2010 & 2013 tr
syn leumruk bu kodu nasıl kullanabileciğim konusunda da lütfen yardımcı olun lütfen kodlar konusunda pek bilgim yok
Kodu kullanabileceğiniz şekilde düzenledim ve bir örnek ekledim. C1 hücresine çift tıkladığınızda kod çalışır.
 
Üst