sıralı sayılar kendi içinde yukarıdan/aşağı dönsün

[kenangulal]

:hey: Merhaba, belli satır aralığı içinde bulunan verilerin sırayla yukarıdan aşağıya inmesini en alttakinin de yukarı çıkmasını istiyorum yardımcı olabilirmisiniz. teşekkürler

 

[danersin]

Sorunuzda yanlış anlama yoksa , makro recorder ile kaydettiğim aşağıdaki kod bunu yapar.

Sub Makro1()
Range("A28").Select
Selection.Cut
Range("A4").Select
Selection.Insert Shift:=xlDown
End Sub

 

[kenangulal]

teşekkürler sayın danersin işimi tam anlamıyla görüyor. iyi çalışmalar.