Excelde Hücredeki Veriyi Alt Alta Yazdırma

[gokhangur]

Merhabalar,

Elimde bir excel dosyası mevcut
takım içeriği hücresindeki verileri ondan önceki verilerde kopyalanacak şekilde bölmek istiyorum. "divTakimUrunUstItem" referans değerim bu olacak şekilde nasıl yapabilirim örnek excel dosyamıda ekledim

excel

 

[Muzaffer Ali]

Merhaba.
Sanıyorum elinizde xml dosyası mevcut ve bunu excel tablosuna çevirmek istiyorsunuz.
Bir Excel dosyası açın, Menüyü kullanarak "Aç" seçip xml uzantılı dosyanızı seçip excele tablo olarak aktarabilirsiniz.
Eğer online xml doyasıysa, Dosya aç kısmında dosya adı alanına xml linkini kopyalayarak da açabilirsiniz.

 

[gokhangur]

Merhaba.
Sanıyorum elinizde xml dosyası mevcut ve bunu excel tablosuna çevirmek istiyorsunuz.
Bir Excel dosyası açın, Menüyü kullanarak "Aç" seçip xml uzantılı dosyanızı seçip excele tablo olarak aktarabilirsiniz.
Eğer online xml doyasıysa, Dosya aç kısmında dosya adı alanına xml linkini kopyalayarak da açabilirsiniz.

Merhabalar,

Xml dosyasını içeri excele alabildim, takim_icerigi olan alanı divTakimUrunUstItem değişkenine göre alt alta yazdırmak istiyorum. Bunu nasıl yapabilirim acaba

 

[Muzaffer Ali]

Ne istediğinizi anlayamadım.
Örnek dosyanızda görmek istediğiniz sonucu elinizle birkaç tane örnek yaparak paylaşın..

 

[gokhangur]

Ne istediğinizi anlayamadım.
Örnek dosyanızda görmek istediğiniz sonucu elinizle birkaç tane örnek yaparak paylaşın..

Merhaba

excel 2 yapmak istediğim şekilde atmış bulunmaktayım, Yardımcı olduğunuz için çok teşekkür ederim.

 

[ÖmerFaruk]

Makro ile yapabildim. İnceleyin.
Sayfa1 verileriniz, sayfa2 istediğiniz son hali

https://dosya.co/klw3lptkw0ft/php_bt__makrolu.xlsm.html

 

[gokhangur]

Makro ile yapabildim. İnceleyin.
Sayfa1 verileriniz, sayfa2 istediğiniz son hali

https://dosya.co/klw3lptkw0ft/php_bt__makrolu.xlsm.html

Çok teşekkür ederim emeğiniz için hemen inceliyorum.

 

[ÖmerFaruk]

Öncelikle
Özel mesaja gerek yok. Konuyu ve varsa sorunu buradan devam ettiriniz ki benzer sorunları olanlar da faydalanabilsin.
Worksheets("Sayfa2").Range("A2").Resize(Say, 18) = Application.Transpose(Liste)
Bu satırda hata verdiğini söylüyorsunuz.

1. Size gönderdiğim dosyayı tekrar açtım. Tekrar tekrar butona bastım hata göremedim.
Siz kodlarda, sayfa yapılarında ya da excel kitabında bir şey değiştirmiş olabilir misiniz?

2. Hata verdiği anda (satır sarıya boyalıyken) Say değişkeninin değerininin ne olduğunu söyler misiniz? (mouse ile üzerine gelip görebilirsiniz)

 

[gokhangur]

Öncelikle
Özel mesaja gerek yok. Konuyu ve varsa sorunu buradan devam ettiriniz ki benzer sorunları olanlar da faydalanabilsin.
Worksheets("Sayfa2").Range("A2").Resize(Say, 18) = Application.Transpose(Liste)
Bu satırda hata verdiğini söylüyorsunuz.

1. Size gönderdiğim dosyayı tekrar açtım. Tekrar tekrar butona bastım hata göremedim.
Siz kodlarda, sayfa yapılarında ya da excel kitabında bir şey değiştirmiş olabilir misiniz?

2. Hata verdiği anda (satır sarıya boyalıyken) Say değişkeninin değerininin ne olduğunu söyler misiniz? (mouse ile üzerine gelip görebilirsiniz)

Tekrardan Merhabalar, Attığınız ham dosya üzerinden yaptım direk işlemi, Sarı alanın üzerine geldiğimde say değeri 15 olarak gözükmekte.

 

[drumitgunay]

Merhaba,

A sütunundaki verilerin 12 kez tekrar etmesini sağlayan makro için destek alabilir miyim ?

Dosya örneği ektedir.

 

[ÖmerFaruk]

Örnek dosyanızda istediğiniz sonucu en azında 1-2 kere tekrar etmiş veriyi gösterebilirseniz, hangi verileri, ne şekilde tekrar ettireceğimizi daha iyi anlayabiliriz.
Eğer şu formül işinizi görüyorsa bunu kullanabilirsiniz.
Dosyanıza B sütununa B2 hücresine aşağıdaki formülü yazıp listenizin uzunluğunun 3 katı kadar aşağı doğru çoğaltabilirsiniz.
=İNDİS(A:A;TAMSAYI((SATIR()-2)/3)+2)