Forum - Ερωτήματα Πρόβλημα με Right(Trim(tenant), InStr(1, RTrim(tenant), " "))

Forum (https://www.ms-office.gr/forum/)

- Access - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/)

- - [ Ερωτήματα ] Πρόβλημα με Right(Trim(tenant), InStr(1, RTrim(tenant), " ")) (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/4101-problima-me-right-trim-tenant-instr-1-rtrim-tenant.html)

anestaki

15-03-16 19:02

Πρόβλημα με Right(Trim(tenant), InStr(1, RTrim(tenant), " "))

Καλησπέρα σε όλους
Με τον παρακάτω κώδικα προσπαθώ να δημιουργήσω μηνύματα SMS αλλά το Right
Δεν μου επιστέφει σωστά τα ονόματα:
Καλησπέρα ΗΣ ΓΙΩΡΓΟΣ, Καλησπέρα ΜΗΧΑΛΗΣ, Καλησπέρα ΠΟΥΛΟΣ ΚΩΣΤΑΣ
Επίσης θα ήθελα να μάθω εάν υπαρχή τρόπος να αφαιρεθεί το τελικό (Σ).
Σας ευχαριστώ εκ των προτέρων Γιώργος

Κώδικας:

=[timer] & " " & Right(Trim([tenant]);InStr(1;RTrim([tenant]);" ")) & 

" Έχουν εκδοθεί τα κοινόχρηστα του μήνα" & " " & [olog] & "υ" & " " & 

"και είναι " & Calculate_sum_expenses([mhnas1];[etos1];[id];[heating]) & "€"

kapetang

15-03-16 21:44

Καλησπέρα

Γιώργο, δεν είσαι αρκετά σαφής:

1) Δεν περιγράφεις τη μορφή του κειμένου του πεδίου [tenant].

2) Δε διευκρινίζεις ποιο τμήμα από το παραπάνω κείμενο θέλεις να επιστρέφεται.

3) Αυτό που ανέβασες είναι κώδικας VBA ή κάποιος τύπος σε κάποιο πεδίο;

Φιλικά/Γιώργος

anestaki

15-03-16 22:20

Καλησπέρα Γιώργο
Ο τύπος δεδομένων του πεδίου [tenant] είναι κείμενο.
Από ******* ΗΣ ΓΙΩΡΓΟΣ, ****** ΜΗΧΑΛΗΣ , ******ΠΟΥΛΟΣ ΚΩΣΤΑΣ μόνο τα ονόματα.
Το * είναι ακριβώς τα γράμματα που δεν εμφανίζει και είναι διαφορετικός αριθμός γραμμάτων στον κάθε ένα.
Είναι τύπος σε πεδίο

kapetang

15-03-16 23:18

Γιώργο, δοκίμασε τον τύπο:

MID(Trim([tenant]);InStr(1;Trim([tenant]);" ");len([tenant]))

Αν δε σε καλύπτει, ξέχνα τον τύπο σου και:

1) Γράψε απλά σε 3 διαφορετικές γραμμές 3 τιμές του πεδίου [tenant]

2) Για κάθε μία από τις 3 τιμές γράψε σε διαφορετική γραμμή το μέρος που σε ενδιαφέρει.

anestaki

15-03-16 23:46

Γιώργο σε ευχαριστώ
Με καλύπτει για το τελικό (Σ) πιστεύω θα βρεθεί κάποια λύση
Γιατί είναι γνωστό Access + VBA... Εδώ δεν υπάρχουν όρια!
Φιλικά Γιώργος

kapetang

16-03-16 09:26

Γιώργο, δοκίμασε τον τύπο:

Κώδικας:

Replace(MID(Trim([tenant]);InStr(1;Trim([tenant]);" ");len([tenant])) & " ";"Σ ";" ")

anestaki

16-03-16 18:39

Γιώργο σε ευχαριστώ :worthy:

Η ώρα είναι 11:15.

Search Engine Optimization by vBSEO 3.3.2