
08-02-24, 14:00
|
| Όνομα: Πάκος Έκδοση λογισμικού 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.
|