Excel alt alta sayıları otomatik yazma

[mertkara10]

merhaba yardıma ihtiyacım var aynı sayıları alt alta otomatik olarak yazdırmak istiyorum bunun için formül önerir misiniz? örneğin 20 sayısını 10 kere alt alta yazsın

 

[Tevfik_Kursun]

Deneyiniz

Sub Yaz()
    For x = 1 To 10
        Cells(x, 1) = 20
    Next x
End Sub

 

[mertkara10]

Deneyiniz

Sub Yaz()
    For x = 1 To 10
        Cells(x, 1) = 20
    Next x
End Sub

bunu tam olarak nereye yazmalıyım benim excel türkçe tam olarak tarif edebilir misiniz

 

[qlue01]

bunu tam olarak nereye yazmalıyım benim excel türkçe tam olarak tarif edebilir misiniz

Merhaba,
Paylaşılan kod makro içindir. Geliştirici sekmesinden, Visual Basic kısmına girin (Kıyasolu Alf + F11. Sol tarafta VBA Project altında boş bir alana sağ tıklayıp Insert > Module kısmını seçin. Açılan ekrana Tevfik Bey'in paylaşmış olduğu kodu yapıştırın ve sayfayı kapatın.

İşlem yapmak istediğiniz sayfaya bir adet buton ataması yapın. (Geliştirici sekmesinde Ekle > Düğme). Ardından eklemiş olduğunuz butona Yaz isimli makronun atamasını yapın. Butona tıkladığınızda bulunduğunuz sayfada A1:A10 arasına 20 sayısı yazılacaktır.