Skip to main content

AccessTr.neT


Raporda Verileri Yan Yana Yazdırmak

Raporda Verileri Yan Yana Yazdırmak

Çözüldü #2
Sayın üyemiz ayni çözümü birkaç kez
sunduk. Amacınızı bilmediğim için sadece
çözümü yazıyorum.

1. Raporunuzdaki [Deneme Adı] denetimini silin
2. Raporunuzun Sayfa Üst bilgisi bölümüne [metinyaz] isimli
ilşkisiz bir denetim ekleyin
3. Raporunuzun "Etkinleştiğinde" olayına aşağıdaki kodu yazın
4. Kaydedin, raporunuzu açın


Private Sub Report_Activate()
Dim dbs As DAO.Database
Dim rst As DAO.Recordset
Dim deneme As String

Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("Select * from denemeler")
deneme = ""


With rst

Do While Not .EOF
deneme = deneme + ![Deneme Adı] & " - "
.MoveNext
Loop
End With

Reports!denemeler!metinyaz = deneme

End Sub

[Resim: 2rfu2kw.jpg]

Kolay gelsin
okileturc, 18-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Raporda Verileri Yan Yana Yazdırmak - Yazar: muradoglu - 26/11/2010, 02:02
Cvp: Raporda Verileri Yan Yana Yazdırmak - Yazar: okileturc - 26/11/2010, 03:31
Task