Εμφάνιση ενός μόνο μηνύματος
  #2  
Παλιά 08-02-24, 14:00
pakos Ο χρήστης pakos δεν είναι συνδεδεμένος
Όνομα: Πάκος
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 17-12-2011
Περιοχή: Θεσσαλονικη
Μηνύματα: 171
Προεπιλογή συνεχεια

χαιρετω τα μελη

Φιλε μου πρεπει να δουλεψεις τους κωδικες

α) right(me.[pedio],InStrRev(Me.[pedio], "_Φ")-2)
οπου InStrRev(Me.[pedio], "_Φ") ειναι ο αριθμος απο δεξια που βρισκεται το _Φ
τον αριθμο 2 (επειδη ψαχνει 2 ψηφια το _ και το Φ) ισως τον διορθωσεις αναλογα με την τιμη που θα σου δινει θα παιξεις τους αριθμους 0,1,-1
εκανα το "_Φ" για να αποφυγουμε εαν σε καποιο ονομα υπαρχει το γραμμα Φ θα διαβασει λαθος

β) InStr(1,Me.[πεδιο], "Φ")

σου δινει την θεση του Φ

μετα InStr(1,Me.[πεδιο], "/")

σου δινει την θεση του πρωτου /

τελος τον κωδικα Mid(Me.[πεδιο],InStr(1,Me.[πεδιο], "Φ"),InStr(1,Me.[πεδιο], "/"))
θα σου δωσει .800
για να αποφυγεις την τελεια
Mid(Me.[πεδιο],InStr(1,Me.[πεδιο], "Φ")+1,InStr(1,Me.[πεδιο], "/"))
θα σου δωσει 800

και σου δινει απο το Φ μεχρι το πρωτο /

απο εκει και περα δουλευεις οπως θελεις τι να περιεχει


αν θες απο το δευτερο / κανε το εξης

InStr(InStr(1,Me.[πεδιο], "/"),Me.[πεδιο], "/")
οπου αντι απο την αρχη ψαχνει μετα το πρωτο "/ " μεχρι το δευτερο

ελπιζω να σε κατατοπισα
φιλικα
Πασχάλης

Τελευταία επεξεργασία από το χρήστη pakos : 08-02-24 στις 21:45.
Απάντηση με παράθεση