Εμφάνιση ενός μόνο μηνύματος
  #1  
Παλιά 21-10-24, 09:40
George R Ο χρήστης George R δεν είναι συνδεδεμένος
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 25-06-2013
Μηνύματα: 221
Προεπιλογή Αυτόματη αρίθμηση στηλών με κώδικα VBA

Καλημέρα σε όλους

Έχω σε ένα φύλλο στο Excel κάποιες στήλες με δεδομένα, των οποίων ο αριθμός (το πλήθος των στηλών δηλαδή) μεταβάλλεται, βάσει κάποιων τύπων.


Ας πούμε π.χ. ότι τώρα έχω τις στήλες από την Ν κολώνα έως και την FS.

Οι στήλες ξεκινούν πάντα από την ίδια γραμμή (εδώ για παράδειγμα από την 7 σειρά Ν7, Ο7, P7....FS7), αλλά, το μήκος της κολώνας μπορεί να είναι διαφορετικό.

Θέλω με κώδικα VBA , 2 πράγματα:

1) Να μου αριθμεί τις στήλες μία μία αρχίζοντας από την πρώτη και σταματώντας στην τελευταία αυτόματα. Να βάζει τους αριθμούς 1,2,....162 σε 2 γραμμές πάνω από τις στήλες, δηλαδή το 1 στην Ν5, το 2 στην Ο5, το 3 στην P5 κλπ.


2) Να μου αριθμεί τις στήλες (δηλαδή πάλι ο ίδιος αριθμός ουσιαστικά), αλλά αυτή τη φορά να βάζει τους αριθμούς ακριβώς κάτω από την στήλη, εκεί που τελειώνουν τα δεδομένα. Θυμίζω ότι το μήκος των στηλών είναι μεταβλητό.

Ευχαριστώ πολύ.
Απάντηση με παράθεση