[AccessD] For all forms

[Arthur Fuller]

Hmm. The compiler and Intellisense  don't like the reference to RowSource.
I can't see anything  similar  in Intellisense.

On Wed., Aug. 4, 2021, 7:39 a.m. Arthur Fuller, <fuller.artful at gmail.com>
wrote:

> You Are the man! I forgot one part. I. am only interested  in combo and
> list boxes. How do I specify the control type?
>
> On Wed., Aug. 4, 2021, 6:15 a.m. Gustav Brock via AccessD, <
> accessd at databaseadvisors.com> wrote:
>
>> Hi Arthur
>>
>> It could be something like this:
>>
>> <code>
>> Public Function ListControlSources()
>>
>>     Dim Form    As Form
>>     Dim Control As Control
>>
>>     On Error Resume Next
>>
>>     For Each Form In Forms
>>         For Each Control In Form.Controls
>>             Debug.Print Form.Name, Control.Name, Control.RowSource
>>         Next
>>     Next
>>
>> End Function
>> </code>
>>
>> /gustav
>>
>> -----Oprindelig meddelelse-----
>> Fra: AccessD <accessd-bounces+gustav=cactus.dk at databaseadvisors.com> På
>> vegne af Arthur Fuller
>> Sendt: 4. august 2021 11:50
>> Til: Access Developers discussion and problem solving <
>> accessd at databaseadvisors.com>
>> Emne: [AccessD] For all forms
>>
>> I used to have code to do this but can't find it. Here is the algorithm.
>>
>> For all forms
>>     For all controls in f
>>         ? Ctl.RowSource
>>     Next
>> Next
>>
>> Do you have such a chunk? Or at least remind me of the syntax?
>> Thanks
>> --
>> AccessD mailing list
>> AccessD at databaseadvisors.com
>> https://databaseadvisors.com/mailman/listinfo/accessd
>> Website: http://www.databaseadvisors.com
>>
>