İki sürüm arasındaki fark.

İki sürüm arasındaki fark.

#2186 İleti | enteresan | 04 Ekm 2017, 15:49

Herkese iyi günler diliyorum.
İşyerinde kullandığım bir dosyada bulunan bir makro, 2 nci sayfada isim listesinde bulunan kişilere mektup yazmakta. Libre Office nin 4 ncü sürümünde, Makrodaki döngü her seferinde 1 nci sayfada bulunan bir hücredeki sıra numarasını artırmakta ve o numaraya göre DÜŞEYARA formülü sayesinde kişi bilgileri otomatik değişerek listedeki kişi sayısı kadar bir kerede hepsine döküm alınmakta iken, sisteme Libre Office nin 5 nci sürüm yüklendi. Şimdi bu makro çalışmıyor. Yani listede 5 kişi varsa ve 1 nci sayfadaki numara bulunan hücrede 1 yazıyorsa 1 numaralı kişiye 5 kez yazı çıkıyor.
1 ıci sayfadaki rakam yazan hücrenin 2 nci sayfadaki kişilerin sol hücresinde yazılı sıra numarasına göre sürekli değişmesi için nasıl bir makro yazılabilir. Saygılarımla...
enteresan
 
İleti: 2
Kayıt: 04 Ekm 2017, 15:30
İşletim Sisteminiz: pardus
LibreOffice Sürümü: 5

Re: İki sürüm arasındaki fark.

#2187 İleti | Hamurcu | 05 Ekm 2017, 18:38

Sizin için sakıncası yoksa bahsettiğiniz dosyaları mesajınıza ekler misiniz kontrol edelim.
İsterseniz siz tablolardaki bu durumu resimlerle de izah edebilirsiniz.
Bu hali ile gerçekten sorun tam olarak nedir anlamak zor.
Kullanıcı avatarı
Hamurcu
 
İleti: 111
Kayıt: 06 Ağu 2012, 00:14
Konum: İstanbul
İşletim Sisteminiz: Windows 10
LibreOffice Sürümü: 5.x

Re: İki sürüm arasındaki fark.

#2190 İleti | enteresan | 06 Ekm 2017, 05:43

Sayın Hamurcu, işyerinde kullandığım için dosya olarak eklemem mümkün değil. (Sistem müsade etmez) Kısaca soruyu şu şekilde değiştirsem daha iyi anlaşılacağını düşünüyorum.

Sayfa 1 K3 hücresinde başlangıçta 0 değeri olsun, makro çalışınca K3'teki değer sayfa 2 deki kişi sayısına göre her seferinde birer artsın istiyorum. Next döngüsü ile yapılan bu makroda K3 hücresi her seferinde değiştiği için, oluşturulan mektuptaki ilgili hücreler DÜŞEYARA formülü sayesinde K3'e bağlı olarak kolayca değiştirilebilmekte. Sadece bu döngü makrosu olsa işimi görür.

Gün içerisinde, eğer fırsatım olursa önceki kullandığım makroyu buraya yazarım. Saygılarımla.

Rem Attrube VBA_ModuleType=VBAModule
Option VBASupport 1
dim i as integer
Sub YAZDIR()
say=sheets("Sayfa2").Range("a65536").End(xlUp).Row
For i=2 To say
Sheets("Sayfa1").Range("K3")=Sheets("Sayfa2").Range("A"&i) <<<<<<Sanırım burası çalışmıyor
Sheets("Sayfa1").Select
Sheets("Sayfa1").PrintOut
Next
End Sub

NOT: Excel'de yazılan bu kod daha sonra LibreOffice 4 sürümünde de çalıştığı halde, nedense 5 sürümünde çalışmadı.
enteresan
 
İleti: 2
Kayıt: 04 Ekm 2017, 15:30
İşletim Sisteminiz: pardus
LibreOffice Sürümü: 5


Calc - Hesap Tablosu

Kimler çevrimiçi

Kayıtlı kullanıcılar: Google [Bot], Tbot, Yandex [Bot]