Prikazi cijelu temu 01.01.2025 14:48
Avko Van mreze
Administrator
Registrovan od:28.05.2014
Lokacija:zagreb


Predmet:Re:VBA EXCEL TextBox tekst koji nestaje
ovo se izostavlja jer nema vise nikakvu ulogu:

PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub TextBox2_Change()
  2.    'neki kod
  3. End Sub

jeli tako?

u ovo dole u
PreuzmiIzvorni kôd (Visual Basic):
  1.     Private Sub TextBox2_Enter()
  2.     Me.TextBox2 = ""
  3.     End Sub
  4.      
  5.     Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
  6.     'ovdje stavljamo kod koji je bio prije u Private Sub TextBox2_Change()
  7.    'npr
  8.    If Not IsDate(Me.TextBox3.Value) Then Stop
  9.    
  10.     Me.TextBox2 = "DD.MM.GGGG"  'nakon sto se izvrsi kod ponovo se upisuje u textbox kucicu DD.MM.GGGG
  11.    End Sub
  12.      
  13.     Private Sub UserForm_Activate()
  14.     Me.TextBox2 = "DD.MM.GGGG"
  15.     End Sub
zivot je moja domovina.