Alt Alta Olan Verileri Yanyana Yapmak

[Krunk]

Hemen alltaki oranları sağ tarafındaki yere (işaretlediğim gibi) almanın kısa yolu varmı ??

 

[Ömer]

Merhaba,

İstediğiniz bu mu?

Sub Duzenle()
    
    Dim i As Long, son As Long, sut As Integer
    
    Application.ScreenUpdating = False
      
    For i = 2 To Cells(Rows.Count, "D").End(xlUp).Row
        If Cells(i, "C") = "" Then
            If Cells(i, "D") <> "" Then
                son = Cells(i, "C").End(xlUp).Row
                sut = Cells(son, Columns.Count).End(xlToLeft).Column + 1
                Cells(i, "D").Resize(1, 3).Cut Cells(son, sut)
            End If
        End If
    Next i
    
    Application.ScreenUpdating = True
    
End Sub

.

 

[Krunk]

kırmızı ıle ısaretlı yerden yesıl ıle ısaretlı yere tasımak ıstıyorum bu kodu nasıl kullanabılırım

 

[Krunk]

yokmu bilen ?

 

[Ömer]

Kodlar bu istediklerinizi yapıyor olması lazım. Deneyerek vermiştim.

Kodları çalıştırdıktan sonra sonuçlar üzerinden hatayı açıklar mısınız.

.

 

[Krunk]

nasıl kullanılır onu bilmiyorum =)

 

[Korhan Ayhan]

Merhaba,

Dosyanızı açın.
ALT+F11 tuşları ile kod editörünü açın.
INSERT menüsünden MODULE seçeneğini seçin.
Sağ tarafta beyaz bir bölüm açılacaktır.
Ömer beyin verdiği kodlar o bölüme uygulayın.

Sonra kodun içinde herhangi bir satıra mouse ile tıklayın ve F5 tuşu ile kodu çalıştırın.

Son olarak excel sayfanıza dönüp istediğiniz sonuç oluşmuş mu kontrol edin.

 

[Krunk]

Merhaba,

Dosyanızı açın.
ALT+F11 tuşları ile kod editörünü açın.
INSERT menüsünden MODULE seçeneğini seçin.
Sağ tarafta beyaz bir bölüm açılacaktır.
Ömer beyin verdiği kodlar o bölüme uygulayın.

Sonra kodun içinde herhangi bir satıra mouse ile tıklayın ve F5 tuşu ile kodu çalıştırın.

Son olarak excel sayfanıza dönüp istediğiniz sonuç oluşmuş mu kontrol edin.

olduuuuuuuuuuuuuuuuuuuuuuuuu yessssssssssss evettttttttttt çok teşekkürlerrrrr =)

 

[Krunk]

manuel hesaplama yaparsam sıyah ıle yazdığım ıkı fıyat arasındakı yüzdesel değışım çıkıyor.Sıyah ıle yazılan şekılde nasıl kod yazabılırım :/kırmızı ıle yazınca kodu hata oluyor

 

[Krunk]

Uppp :/
.......

 

[Asri]

manuel hesaplama yaparsam sıyah ıle yazdığım ıkı fıyat arasındakı yüzdesel değışım çıkıyor.Sıyah ıle yazılan şekılde nasıl kod yazabılırım :/kırmızı ıle yazınca kodu hata oluyor

Siyah yazılı işlemin formülü aşağıdaki şekildedir.

=((C2/B2)-1)*100