T

Çözüldü Aktif olan hücrenin sağına doğru doldurma

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

tahsinanarat

Normal Üye
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Aktif olan hücreye;
1 yazdığımda Aktif hücreye yazdığım 1 in başına A koyarak, A1, sağına doğru her bir hücreye A2 A3 A4 olarak dolduracak,
2 yazdığımda yazdığım rakama 3 ekleyip A5 A6 A7 A8 olarak yazacak,
3 yazdığımda 6 ekleyerek A9 A10 A11 A12 Yazacak
4 yazdığımda 9 ekleyerek A13 A14 A15 A16 yazacak
5 YAZDIĞIMDA 12 Ekleyerek A17 A18 A19 A20 şeklinde devam edecek

Böyle bir makroya ihtiyacım var, yardımcı olacak hocalarıma şimdiden teşekkürler.
 
Sn. @AhmetRasim 37 ekip için verdiğiniz kodlardan faydalanarak yaptım, çalışıyor bir sıkıntı yok. İlginize çok teşekkür ediyorum.
Eğer bu aşağıdaki kodun daha kısa yazılır bir şekli varsa üstatlardan yardım bekliyorum. Teşekkürler

Kod:
Görüntülemek için giriş yapmanız gerekmektedir.
(335 satır)
 
SN @cakarem yine harikalar yaratmışsınız, çok teşekkür ediyorum.
Kod:
Görüntülemek için giriş yapmanız gerekmektedir.
(13 satır)

yazdığım sutuna da değer yazması için yukarıdaki gibi kullanacağım, çok teşekkür ediyorum.
Target.Offset(0, i + 1) = "A" & deger + (deger - 1) * 3 + i
yerine
Target.Offset(0, i) = "A" & deger + (deger - 1) * 3 + i
olarak kullanacağım.
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst