piątek, 3 listopada 2023 o 14:08:02 UTC+1 Stan napisał(a):
> Cześć.
> Tabela1 ma 33 kolumny (Pole1, Pole2 ...Pole33).
> Formularz1 ma GrupęOpcji (wartości od 1 do 33).
[...]
Może tak będzie krócej niż kod AI ;-)
Private Sub cmdOtworzRaport_Click()
DoCmd.OpenReport ("Raport1"), acViewReport
Reports("Raport1").Controls("txtPoleRaportu").ControlSource = _
"Pole" & "27" '<= wartość pola Opcji
End Sub
--
LX'yrs