Centar za edukaciju-BiH

iCentar → Racunari i oprema → Softver i operativni sistemi → Ms office


Prosiri i skupi Opcije teme
Stranice (1):1
 Prikazi prvu neprocitanu poruku

#1 30.12.2024 11:35
Avko Van mreze
Administrator
Registrovan od:28.05.2014
Postovi:4,904


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.

Slicice prilozenih slika:
format datuma u textBox.png
Tip datoteke:Informacije o tipu datoteke za:png png
Preuzimanja:0
Velicina datoteke:10.38 KB
Velicina slike: 594 x 336 Pikseli

zivot je moja domovina.
↑  ↓

#2 31.12.2024 00:23
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,692


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
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#3 01.01.2025 14:48
Avko Van mreze
Administrator
Registrovan od:28.05.2014
Postovi:4,904


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.
↑  ↓

Stranice (1):1

Srodne teme

Ko je online?

Aktivni clanovi:
nema clanova


Kontakt
Sva vremena su GMT +02:00. Trenutno vrijeme: 8: 18 pm.