sağ sütundaki yazıyı sol sutunun altına almak

Katılım
23 Ocak 2021
Mesajlar
6
Excel Vers. ve Dili
öğrenci
Arkadaşlar fotoğraflarda görültüğü gibi sağ satırda bulunan yazıyı sol satırın altına nasıl alabilirim bu şekilde bin satırım var en hızlı nasıl yapabilirim bunu 1 ci fotoğraftaki yazılar 2 cideki gibi olması gerekiyor bu konuda yardımcı olursanız memnun olurum

 
Katılım
6 Temmuz 2015
Mesajlar
925
Excel Vers. ve Dili
2003
Merhabalar, aşağıdaki şeklide bir deneyiniz.

sub deneme()
For a = 1 to [A1048576].end(xlup).row
if cells(a,1) <> "" then
cells(a+1,1) = cells(a,2)
cells(a,2).clearcontents
end if
next a
end sub
 
Katılım
6 Temmuz 2015
Mesajlar
925
Excel Vers. ve Dili
2003
Eğer a sütunundaki veriler sürekli 3 boşluk halinde aşağı doğru gidiyorsa, döngiüyü şu şekilde de kurabilirsiniz.

For a=1 to [A1048576].end(xlup).row step 3
 
Katılım
23 Ocak 2021
Mesajlar
6
Excel Vers. ve Dili
öğrenci
Eğer a sütunundaki veriler sürekli 3 boşluk halinde aşağı doğru gidiyorsa, döngiüyü şu şekilde de kurabilirsiniz.

For a=1 to [A1048576].end(xlup).row step 3
Yorumunuz için teşekkür ederim ben bayağı bir yeniyim verdiğiniz kodları nasıl gireceğimi bilmiyorum :(
 

ÖmerFaruk

Destek Ekibi
Destek Ekibi
Katılım
22 Ekim 2017
Mesajlar
4,616
Excel Vers. ve Dili
Microsoft 365 Tr-64
Boş bir yere, mesela C sütununa
C1 hücresine =A1
C2 hücresine =B1
C3 hücresine =C3
formüllerini yazın ve C1:C2:C3 mouse ile seçili için alt sa ğ köşeden tutup listenizin sonuna kadar çoğaltabilirsiniz.
İşlem birince C sütununu seç, kopyala, özel yapıştır, değerleri diyerek a sütununa yapıştırabilirisin.
 
Üst