MS Excel

Potřeboval bych hromadně upravovat ComboBoxy v sešitu, našel jsem si, že všichni používají Me.Controls, ale mají to na Form. Když se pokusím použít Controls tak mi jen vyskočí Compile error: Method or data member not found. Kód jsem psal do general toho listu. Mám Office365. Prosím o radu jaké to má mít náležitosti nebo odkaz, kde by použití Controls bylo vysvětleno.
Děkuji.

Zaslat odpověď >

elninoslov(18.6.2020 21:00)#046971

Pre celý zošit:
Sub ChangesComboBoxesSettingBook()
Dim OLEObj As OLEObject, WS As Worksheet

Const CBID As String = "Forms.ComboBox.1"

For Each WS In ThisWorkbook.Worksheets
For Each OLEObj In WS.OLEObjects
If OLEObj.progID = CBID Then OLEObj.Object.Text = "pokus"
Next OLEObj
Next WS
End Sub

Pre jeden list:
Sub ChangesComboBoxesSettingSheet()
Dim OLEObj As OLEObject

Const CBID As String = "Forms.ComboBox.1"

For Each OLEObj In Worksheets("Hárok1").OLEObjects
If OLEObj.progID = CBID Then OLEObj.Object.Text = "pokus"
Next OLEObj
End Subcitovat

Sodík(19.6.2020 11:07)#046976

Super, takhle to funguje, děkuji

. Asi jsem to i pochopil, ale pro jistotu, abych jen tupě neopisoval, to progID vrací nějaké ID typu toho objektu, takže ID pro ComboBox, Button a podobně?citovat

elninoslov(19.6.2020 13:34)#046978

Áno, ale aj tak musíte vždy vedieť čo hľadáte, lebo toto prehľadá OLE objekty (ActiveX), nenájde napr. ovál alebo klasické tlačítko, lebo to nie sú OLE.citovat

Téma: .Controls - Method or data member not found

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje