Avko 30.12.2024 11:35
Predmet:VBA EXCEL TextBox tekst koji nestaje

Moze li se napraviti da u TextBox-u pishe format datuma koji moramo unijeti tipa: DD.MM.GGGG, prije nego se pocne unositi. Kod unosa taj tekst nestane.
Prilozi:
format datuma u textBox.png (Velicina datoteke:10.38 KB)

zxz 31.12.2024 00:23
Predmet:Re:VBA EXCEL TextBox tekst koji nestaje

ako sam te dobro razumio hoces da u polju pise dd.mm.yyyy kad nie u fokusu a kad udje u fokus da se brise.
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. Me.TextBox2 = "DD.MM.GGGG"
  7. End Sub
  8.  
  9. Private Sub UserForm_Activate()
  10. Me.TextBox2 = "DD.MM.GGGG"
  11. End Sub

Avko 01.01.2025 14:48
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