Sayın hocam; Şöyle bir şey oldu.

Hangisini denediniz?

2. Id lı olanı denediyseniz

SELECT MSysNavPaneGroups.Name

yerine

SELECT MSysNavPaneGroups.Id

yazarak dener misiniz

Sütun sayısını da 2 yapın yada kosul olan sutunun görüntülenmesini sağlayan tık işaretini kaldırin

Evet teşekkür ederim. Elinize sağlık. Oldu

Dim list As Variant

For Each list In Me.Liste.ItemsSelected

 DoCmd.OpenReport Me.Liste.ItemData(list), acPreview, , "sirano=" & Me.kimo, acWindowNormal

 Next list

Peki listedekileri "kimo" açılır kutusunun "sirano" İd ne göre nasıl yazdıracağım. Kod hata veriyor.

Cevaplanmışlara taşınabilir mi konu?