access rapor çıktı kağıt boyutunu sabitlemek istiyot-rum

15cmx20 cm gibi report açılışında

iyi günler

LastRow = Sheets("Colors").Cells(Rows.Count, "A").End(xlUp).Row

 For i = 1 To LastRow
            .AddItem Sheets("Colors").Range("B1:B100").Cells(i, 1).Value
[color=#212121][size=medium][font=-apple-system, BlinkMacSystemFont,]            .List(.ListCount - 1, 1) = Sheets("Colors").Range("A1:A100"

INTO liste6 cümlesinde "6" değeri değişkene bağlı olarak değişecek
& " INTO liste6" _
 bunu nasıl değiştirebiliriz

bir fonksiyon var on tane textboxdan veri işlem yapıyor bu işlemi hangi textboxtan veri geldiğini nasıl belirtebiliriz
kolayı şu 

sub textbox1.click
fonksiyon "textbox1"
end sub

sub textbox2.click
fonksiyon "textbox2"
end sub



başka yolu var mı

bir tablomuz var tablo alanında onay çerçevesinin değerini tutacağız. 1 2 veya 3
ama alan boş ise hiç biri seçili olmasın bunu nasıl belirteceğiz mesela şöyle mi olacak
me.çerçeveozel.value = null