Merhaba, Yedişer satır atlayarak her sekizinci satırdaki veriyi yan sütuna almak istiyorum. Yani yedi eşit aralıklarla atlayarak sadece B1, B8, B15.....gibi bu hücrelerdeki veriyi çekmek istiyorum. Bunu formülleştirebilir misiniz. Teşekkür ederim.
Sub yediatla() Dim x As Long Sheets("Sayfa3").Select 'verilerin bulunduğu sayfa adını tırnak içine yazınız. For x = 1 To 2000 With Sayfa3 Range("c" & x).Value = Range("b" & x).Value x = x + 6 End With Next x End Sub
🇦🇿Selam. Allah yardımcınız olsun yararlı vedolarınız var. Rica etsem birden çok Kuran mealini karşılıaştırmağı ve kendi çevrimi ilave ede bilme özelliyini anlatırmısınız. Resimdekibi bir şey images.app.goo.gl/Wfn2tBmMsFsE9kT16 Mesela 7ayetlik Fatiha suresini 7 satra yazıp karşısına birden fazla meal ilave etdikten sonra diyer bir sayfada tek tek her bir ayetin 4-5tane farklı mealını alt alta getirerek inceleyebilmek ve aynı zamanda kendi çevrimi ilave ede bilmek imkanı olsun. Önceden teşekkürler.
Merhaba Hocam Aynı çalışma kitabı 10 sayfadan oluşuyor. Sayfa1(ANA SAYFA)'de ComboBox2 de bu sayfaların listesi var. Ançak CombıBox2 deki sayfa adlarına tıkladığımda ilgili sayfa gidmesini istiyorum. Bunu nasıl yapabilirim. Yardımcı olursanız sevinirim. İyi günler.
![Felix "Unfair" | [Stray Kids : SKZ-PLAYER]](http://i.ytimg.com/vi/Oswujxm2Ag0/mqdefault.jpg)
Babacım siz neredesiniz yaaa... On gündür Bu son satırdır, son kayıttır uğraşıp duruyorum. Kafayı yedim. Şükür yahu ....
Saatlerce uğraştığım bir şeyi sonunda bulabildim. Çok teşekkürler, emeğinize sağlık.
VBA Egitimindeki 16 vidoyu izledim.Aradıgımı buldum.Eline emegine saglık kardeşim,yolun açık olsun
Harika anlatıyorsunuz
güzel
Eğitime devam hocam 😊
Abla sayfanızı kapattınız mı
More video please
merhabalar dinamik ad tanımlanması oluşturma son yaptığımız örnek mi yoksa video süresinde mi sıkıntı oldu teşekkürler her şey için
Sayın Hocam sizinle iletişim kurabileceğim bir dijital adresinizi verebilirmisiniz?
Merhabalar elimde 2 senelik on numara sonuç excell kayıtı var bunu ençok çıkan sayılar şeklinde ayarlayabilirmisiniz size mail atsam .?
Merhaba,
Yedişer satır atlayarak her sekizinci satırdaki veriyi yan sütuna almak istiyorum. Yani yedi eşit aralıklarla atlayarak sadece B1, B8, B15.....gibi bu hücrelerdeki veriyi çekmek istiyorum. Bunu formülleştirebilir misiniz. Teşekkür ederim.
Sub yediatla()
Dim x As Long
Sheets("Sayfa3").Select 'verilerin bulunduğu sayfa adını tırnak içine yazınız.
For x = 1 To 2000
With Sayfa3
Range("c" & x).Value = Range("b" & x).Value
x = x + 6
End With
Next x
End Sub
@@bizimkanal3428 yardımcı olduğunuz için çok teşekkür ederim.
🇦🇿Selam. Allah yardımcınız olsun yararlı vedolarınız var.
Rica etsem birden çok Kuran mealini karşılıaştırmağı ve kendi çevrimi ilave ede bilme özelliyini anlatırmısınız. Resimdekibi bir şey
images.app.goo.gl/Wfn2tBmMsFsE9kT16
Mesela 7ayetlik Fatiha suresini 7 satra yazıp karşısına birden fazla meal ilave etdikten sonra diyer bir sayfada tek tek her bir ayetin 4-5tane farklı mealını alt alta getirerek inceleyebilmek ve aynı zamanda kendi çevrimi ilave ede bilmek imkanı olsun. Önceden teşekkürler.
Merhaba Hocam
Aynı çalışma kitabı 10 sayfadan oluşuyor. Sayfa1(ANA SAYFA)'de ComboBox2 de bu sayfaların listesi var. Ançak CombıBox2 deki sayfa adlarına tıkladığımda ilgili sayfa gidmesini istiyorum. Bunu nasıl yapabilirim. Yardımcı olursanız sevinirim. İyi günler.
Herkeste oldu bende hata veriyor sebebi nedir bilen varmı ? Her iki farklı kod'da aynı hata !!!