[]
excel, yinelenenleri kaldır ama birleştirerek kaldır.
arkadaşlar selam,
tablo şu olsun;
ad soyad............15.07.2011......141.5......775
ad soyad............15.08.2011......9.25......1744
şimdi yinelenenleri sadece sütun 1 e göre kaldır diyince, alttaki satır gidiyor. bunları, sütun 3 ve sütun 4 un rakamlarını toplayarak birleştirmesi için ne yapmak gerekir?
yani,
ad soyad............15.07.2011......150.75......2519
gibi olsun istiyorum, tarih farketmez.
tablo şu olsun;
ad soyad............15.07.2011......141.5......775
ad soyad............15.08.2011......9.25......1744
şimdi yinelenenleri sadece sütun 1 e göre kaldır diyince, alttaki satır gidiyor. bunları, sütun 3 ve sütun 4 un rakamlarını toplayarak birleştirmesi için ne yapmak gerekir?
yani,
ad soyad............15.07.2011......150.75......2519
gibi olsun istiyorum, tarih farketmez.
Takip
- letheavendangered
(24.05.16 19:51:13)
excel guruları, up up up (kendimi ergen gibi hissettim)
- gneral (24.05.16 20:16:40)
daha kolay bir yol ile olmazsa makro ile şöyle deneyebilirsin. Yalnız mutlaka yedek bir excelde çalış. çünkü yinelenen satırlar silinecek. ayrıca kodu tam olarak deneyemedim, çalışmazsa yeniden bakarız.
tablonun 1'den 12. satıra kadar olduğunu düşünelim. kaç satır varsa o sayı ile değişebilirsin.
Sub test()
toplam_satir = 12
For i = 1 To toplam_satir
For j = i + 1 To toplam_satir
If Cells(i, 1) = Cells(j, 1) Then
Cells(i, 3) = Cells(i, 3) + Cells(j, 3)
Cells(i, 4) = Cells(i, 4) + Cells(j, 4)
Let x = firstcolumn & j & ":" & lastcolumn & j
Range(x).Delete
toplam_satir = toplam_satir - 1
j=j-1
End If
Next j
Next i
End Sub
tablonun 1'den 12. satıra kadar olduğunu düşünelim. kaç satır varsa o sayı ile değişebilirsin.
Sub test()
toplam_satir = 12
For i = 1 To toplam_satir
For j = i + 1 To toplam_satir
If Cells(i, 1) = Cells(j, 1) Then
Cells(i, 3) = Cells(i, 3) + Cells(j, 3)
Cells(i, 4) = Cells(i, 4) + Cells(j, 4)
Let x = firstcolumn & j & ":" & lastcolumn & j
Range(x).Delete
toplam_satir = toplam_satir - 1
j=j-1
End If
Next j
Next i
End Sub
- puc
(24.05.16 20:39:41 ~ 20:41:14)
daha kolay bir yolu yeni bir sayfada veri>birleştir yapıp kaynak kısmını seç. eğer başlık var ise etiket yerinden üst satırı işaretle, diğer sol sütün ve kaynak veriye bağlantı oluştur da işaretli olsun.
isim sayı1 sayı2
fatih 150 540
fatih 25 60
bunun için resimdeki gibi yapman gerekiyor yeni sayfada yani.
i.hizliresim.com
edit: aslında en kolay yolu pivot table'da yapmak. ismi satıra, sayıları toplamlara eklemen yeterli.
edit2: etopla ile de yapabilirsin kolay bir şekilde. resimdeki gibi : i.hizliresim.com
isim sayı1 sayı2
fatih 150 540
fatih 25 60
bunun için resimdeki gibi yapman gerekiyor yeni sayfada yani.
i.hizliresim.com
edit: aslında en kolay yolu pivot table'da yapmak. ismi satıra, sayıları toplamlara eklemen yeterli.
edit2: etopla ile de yapabilirsin kolay bir şekilde. resimdeki gibi : i.hizliresim.com
- napak panpa (24.05.16 20:41:08 ~ 20:57:43)
PıvotTable
- compumaster (24.05.16 21:27:55)
pivot table +1 bunun en basit yolu bu. o kadar vba kodlarına makrolara ne gerek var yahu.
- animalman (25.05.16 07:56:27)
1
