Forum

Forum (https://www.ms-office.gr/forum/)
-   Excel - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/)
-   -   [VBA] Δημιουργία κωδικών με βάση το όνομα (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/2766-dimioyrgia-kodikon-me-basi-onoma.html)

sotisanis 30-10-13 20:34

Δημιουργία κωδικών με βάση το όνομα
 
Παιδια καλησπερα και παλι.θα ηθελα την πολυτιμη βοηθεια σας. Θελω να κανω το εξης: σε μια στηλη να δημιουργω 6ψηφιους κωδικους με βαση τα ονοματα μια αλλης στηλης.πχ να μετατρεπει καποια γραμματα σε αριθμους.

Εχει κανεις καμοια ιδεα???

ChrisGT7 01-11-13 06:52

Καλημέρα!

Ποιος είναι ο επιθυμητός αλγόριθμος που χρειάζεσαι για του κωδικούς; Δηλαδή ποια είναι η αντιστοίχιση γραμμάτων-αριθμών, π.χ. Α=1, Β=2, Γ=3 κ.ο.κ.

Αν το όνομα στο Α1 είναι ΧΡΗΣΤΟΣ, τότε ο κωδικός στο Β1 πρέπει να είναι οπωσδήποτε 6φηφιος;

Θα διευκόλυνε πολύ αν έδινες περισσότερες πληροφορίες για τη δημιουργία των κωδικών.

sotisanis 01-11-13 18:00

ναι οπως το ειπες.να διαβαζει τα πρωτα εξι γραμματα και να τα μετατρεπει σε κωδικους

ChrisGT7 01-11-13 19:51

Σε τι είδος κωδικού; Αριθμητικό κωδικό; Κι αν ναι, τότε ποια θα είναι αντιστοιχία των αριθμών;

Μερικοί συνδιασμοί κωδικών είναι:
1) Α=1, Β=2...., Ω=24
2) Ο συνδυασμός του τηλεφώνου, δηλαδή Α-Β-Γ=1, όπως όταν γράφεις ένα μήνυμα στο κινητό.

Επίσης, άλλη αρίθμηση θες για τους λατινικούς κι άλλη για τους ελληνικούς χαρακτήρες;

sotisanis 01-11-13 20:01

το πρωτο θελω δηλαδη Α=1 Β=2 και αντιστοιχα και οι λατινικοι κωδικοι. το ενα θα ειναι για να δημιουργησω βοηθητικους κωδικους προιοντων και μετα θα το χρησιμοποιησω για να φτιαξω barcode

ChrisGT7 01-11-13 22:02

1 Συνημμένο(α)
Δεν ξέρω κατά πόσο θα σε βολέψει το σκεπτικό μου για την κωδικοποίηση, αλλά λειτουργεί ως εξής:

1) Ελέγχει τα κελιά της στήλης Α. Αν οι χαρακτήρες του ονόματος είναι λιγότεροι από 6, τότε δεν υπάρχει κωδικοποίηση.
2) Αν οι χαρακτήρες είναι περισσότεροι ή ίσοι από 6, τότε κωδικοποιεί μόνο τους 6 πρώτους:

Λατινικοί Χαρακτήρες "A" - "I" και "a" - "i" => 1 - 9
Λατινικοί Χαρακτήρες "J" - "R" και "j" - "r" => 1 - 9
Λατινικοί Χαρακτήρες "S" - "Z" και "s" - "z" => 1 - 8

Ελληνικοί Χαρακτήρες "Α" - "Ι" και "α" - "ι" => 1 - 9
Ελληνικοί Χαρακτήρες "Κ" - "Ρ" και "κ" - "ρ" => 1 - 8
Ελληνικοί Χαρακτήρες "Σ" - "Ω" και "σ" - "ω" => 1 - 7

Οποιοσδήποτε άλλος χαρακτήρας => 0

Ο αριθμητικός κωδικός θα εμφανιστεί στη στήλη Β σε μορφή κειμένου για να μη χάσεις τα μηδενικά σε περίπτωση που είναι το αρχικό ψηφίο.

sotisanis 01-11-13 22:46

ΘΕΟΣΣΣ!!! Δουλευει.αυτο ακριβως ηθελα!!!!!!!μετα θα το αλλαξω για να μου βγαζει περισσοτερα νουμερα για να φτιαξω barcode


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

Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.


Search Engine Optimization by vBSEO 3.3.2