Merhabalar; farklı sayfalardaki aynı hücre değerlerini başka bir sayfanın sutununa sıralamak istiyorum. Örnek dosya ekte yardımlarınız için şimdiden teşekkürler..
Ekli dosyalar
-
9.5 KB Görüntüleme: 20
DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Option Explicit
Sub SayfaBirlestir()
Dim i As Integer, S2 As Worksheet
Set S2 = Sheets("Sayfa2")
Application.ScreenUpdating = False
S2.Select
[A:A].ClearContents
For i = 1 To Sheets.Count
If Sheets(i).Name <> "Sayfa2" Then
Sheets(i).Select
Range("A" & Cells(Rows.Count, "A").End(xlUp).Row).Copy _
S2.Range("A" & S2.Cells(Rows.Count, "[COLOR=red][B]A[/B][/COLOR]").End(xlUp).Row + 1)
End If
Next i
S2.Select
Application.ScreenUpdating = True
MsgBox "İşlem Tamam"
End Sub
Mustafa Bey verdiğiniz formülü uygluladım fakat başvuru hatası verdi.sayfa2 adli sayfanizin a1 hucresine =INDIRECT("start_"&ROW(A1)) bunu yaziniz egerki exceliniz turkce ise =DOLAYLI("start_"&SATIR(A1)) seklinde yaziniz..
Ayrica profilinizden excel versiyonunuzun yanina dilinide yaziniz, bu alacaginiz cevaplarin daha net olmasini saglayabilir..
Ömer Bey ilginize çok teşekkürederim fakat dediğiniz şekilde yapamadım. Sorun şu ki sabit olan hücre isimi örneğin g5 olsun her sayfadaki g5 değerleride sayfa2 de istediğim her hangi bir hücreden başlayabilsin örneğin oda c3 ten başlasın. Burdaki g5 ve c3 ü formülde nasıl girmem gerekir?#5 nolu mesajda kırmızı ile işaretledim..
.
Örnek dosya ekte..Sorunuzu destekleyen bir örnek eklermisiniz..
.