Δεδομένα σε άλλες στήλες
 

Γεια σε όλους..Θα ήθελα να ρωτήσω πως μπορώ στο επισυναπτόμενο έγγραφο να μεταφέρω δεδομένα από κάποιες στήλες σε κάποιες άλλες και αντίστροφα με ένα κλικ...(κώδικας visual basic)
Ευχαριστώ εκ' τον προτέρων...

Καλησπέρα σε όλη την παρέα

Σάκη στο συνημμένο σου προτείνω μία απλή λύση με την If χωρίς VBA.
Ελπίζω να σε εξυπηρετεί

Φιλικά
Μανώλης

Καλησπέρα σε όλους!
Σάκη, το ένα κλικ που ζητάς είναι λίαν επικίνδυνο αφού στην Excel μόνο με το συμβάν
Worksheet_SelectionChange(ByVal Target As Range) μπορούμε να παρακολουθήσουμε
το κλικ του χρήστη.
Δυστυχώς όμως το συμβάν αυτό εξαπολύεται (όπως δηλώνει και το όνομα του) ακόμα και αν κάνεις μια απλή επιλογή ενός κελιού!
Αναλογίζεσαι λοιπόν τι θα συμβεί αν κατά λάθος πατήσεις το βελάκι του πληκτρολογίου και προκαλέσεις την εκτέλεση του συμβάντος Worksheet_SelectionChange()......

Αυτός ήταν και ο λόγος που σε προηγούμενο θέμα σου, σου πρότεινα έναν κώδικα που
τρέχει με το διπλό κλικ.

Δες όμως μια λίγο διαφορετική προσέγγιση στο συνημμένο:
Καλή συνέχεια!

.

Ευχαριστώ για την βοήθεια
 

...Ευχαριστώ πολύ για την βοήθεια σας....