
Formát TxtBox-u v užívateľskom formulári VBA
Chlapi, mám pocit, že sa škriabem pravou rukou za ľavým uchom... poraďte please...
Príklad:
Mám previazaný TxtBox vo formulári VBA s bunkou A1 v harku Databaza prostredníctvom vlastnosti ControlSource.
Bunku mám naformátovanú ako číslo s dvomi desatinnými miestami a oddeľovačom tisícov.
Keď do TxtBoxu zapíšem číslo, Entrom sa prenesie do A1 a v bunke sa zobrazí v poriadku, ale v TxtBoxe ostane nesformátované.
Doteraz som tento problém riešil nie vlastnosťou ControlSource, ale tvrdým zápisom obsahu TxtBoxu do bunky a vzápätí spätným naplnením TxtBoxu obsahom bunky s pridelením formátu:
frmXYZ.txtABC.Text = Format(Sheets("Databaza").Range("A1"), "#,##0.00")
čo je dosť ošemetné, lebo v takomto prípade musí mať každý takýto TxtBox svoju procedúru na udalosť AfterUpdate...
ControlSource by bolo ideálne, lebo postačí prvotne previazať TxtBox-y s bunkami a šmitec... Lenže čo s formátmi zobrazenia v TxtBoxoch?
Nejak sa mi nechce veriť, že neexistuje elegantnejšie riešenie...
Vie niekto poradiť, ako na to?
Díky