Dobrý den,
nevíte někdo jak vnutit excelu stringovou proměnou jako název objektu?
Něco jako tohle nefunguje
DIM strNazevObjektu As String
DIM obj As object
strNazevObjectu = Range("A1").Value
Set obj = strNazevObjectu
Nefunguje to ani s proměnou typu variant
Dík za radu
Pavel
Excel - VBA Vyřešeno
- Ltb
- Administrátor
-
Master Level 8.5
- Příspěvky: 6755
- Registrován: únor 03
- Bydliště: Praha západ
- Pohlaví:
- Stav:
Offline
- Kontakt:
Ahoj, ve VBA dělám spíše základní úkony, ale...tvůj kód mi připadá zvláštní. Přiřazuješ objektu hodnotu string. Myslím si, že by to mohlo jít přes vlastnosti objektu. Pokud lze změnit jméno objektu, půjde to přes vlastnosti (properties). Bohužel, víc toho o objektech ve VBA nevím.
Namísto Set obj = strNazevObjectu bych použil něco jako SetName(obj) = strNazevObjectu
Namísto Set obj = strNazevObjectu bych použil něco jako SetName(obj) = strNazevObjectu
No, jde mi o to, že nechci objektu přiřadit hodnotu string ale objekt
jehož název je v promené string. Mám např. 10 textboxů a kód má
pracovat s textboxem jehož name je v bunce A1. Zatím to řeším
Select Case Range("A1").Value
Case "txbOkno1"
set obj = txbOkno1
Case "txbOkno2"
set obj = txbOkno2
ale je to dost nepohodlné
jehož název je v promené string. Mám např. 10 textboxů a kód má
pracovat s textboxem jehož name je v bunce A1. Zatím to řeším
Select Case Range("A1").Value
Case "txbOkno1"
set obj = txbOkno1
Case "txbOkno2"
set obj = txbOkno2
ale je to dost nepohodlné
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
- 16
- 5988
-
od mirekol
Zobrazit poslední příspěvek
20 říj 2023 08:31
-
- 3
- 1839
-
od Story-Long
Zobrazit poslední příspěvek
14 srp 2023 10:11
-
- 1
- 262
-
od Grimm
Zobrazit poslední příspěvek
12 bře 2024 21:43
-
- 2
- 1637
-
od honzzicek
Zobrazit poslední příspěvek
01 črc 2023 08:57
-
- 5
- 2320
-
od mmmartin
Zobrazit poslední příspěvek
13 črc 2023 18:44
Zpět na “Programování a tvorba webu”
Kdo je online
Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 3 hosti