Ανανέωση ιστοσελίδας

[alexc]

Καλημέρα και καλή χρονιά σε όλους.

Προσπαθώ να αυτοματοποιήσω μια διαδικασία που κάνω σχεδόν καθημερινά στη δουλειά μου.
Καθημέρινά "τραβάω" ένα αρχείο excel το οποίο περιέχει 3 στήλες: Κωδικός, τεμάχια, αξία.

Το αρχείο αυτό αποθηκεύεται σε ένα φάκελο με τη εξής μορφή: 2020-01-08.xlsx.

Αυτό που προσπαθώ να κάνω είναι να μεταφέρω τα δεδομένα του αρχείου αυτού σε ένα άλλο, όπου είναι συνολικό του έτους και τα δεδομένα να αποθηκεύονται σε στήλες βάσει ημερομηνίας, η οποία αναγράφεται στη γραμμή 1 του αρχείου (βλέπε συνημμένο αρχείο).
Δηλαδή στη στήλη που το πρώτο κελί γράφει 07-01, να μεταφέρονται τα δεδομένα της 7ης Ιανουρίου από το αντίστοιχο αρχείο (2020-01-07.xlsx).

Προσπάθησα να το κάνω με vlookup αλλά τζίφος. Νομίζω ότι χρειάζεται VBA, αλλά δυστυχώς δεν την κατέχω.

Είμαι ανοικτός σε όλες τις προτάσεις.

Ευχαριστώ εκ των προτέρων για το χρόνο σας.

[ChrisGT7]

Καλησπέρα και Καλή Χρονιά Αλέξανδρε,

Για ταχύτερα αποτελέσματα η VBA είναι η πιο καλή λύση.

Χρειάζομαι όμως μια διευκρίνηση για το συγκεντρωτικό αρχείο: Αναφέρεις πως τα ημερήσια αρχεία περιέχουν τρεις στήλες (Κωδικός, Τεμάχια, Αξία). Το συγκεντρωτικό αρχείο όμως έχει μία στήλη ανά ημέρα. Αναλυτικότερα:

1. Αν όντως πρέπει να υπάρχει μία στήλη στο συγκεντρωτικό αρχείο ανά ημέρα, ποιο πεδίο θέλεις να μεταφέρεται στη στήλη ημέρας: τα τεμάχια ή η αξία; Ή μήπως μέσα στο ίδιο κελί να συνυπάρχουν και οι δύο αριθμοί (τεμάχια και αξία);
2. Μήπως πρέπει να υπάρχουν δύο στήλες ανά ημέρα έτσι ώστε τα τεμάχια και η αξία να μεταφέρονται στην αντίστοιχη στήλη τους;

[alexc]

Καλημέρα.

Πρώτα από όλα ευχαριστώ για το χρόνο σου @ChrisGT7.
Όσον αφορά τις ερωτήσεις σου, πρέπει να σου πω ότι είναι εύλογες, αλλά τις μόνες τιμές που θέλω να περνάνε στο συγκρεντωρικό αρχείο είναι οι αξίες κι όχι τα τεμάχια, πάντα βέβαια ανά ημέρα.

Δεν ξέρω πόσο εύκολο ή δύσκολο είναι να γίνει σε VBA, αλλά εκτιμώ την ενασχόλησή σου με το θέμα μου. Ελπίζω να βρεθεί μια λύση.

[ChrisGT7]

Καλησπέρα Αλέξανδρε,

Ελπίζω να σε καλύπτει το συνημμένο αρχείο.

Με το κουμπί ΕΠΙΛΟΓΗ ΑΡΧΕΙΩΝ επιλέγεις τα αρχεία των ημερομηνιών (μέγιστη επιλογή 15 αρχεία).

Έτσι, στο φύλλο ΣΥΝΟΛΑ θα προστεθούν στην πρώτη στήλη οι κωδικοί του κάθε αρχείου και στις διπλανές στήλες οι αξίες.

Τέλος, δημιουργείται ένας συγκεντρωτικός πίνακας σε νέο φύλλο που αθροίζει τις αξίες ανά κωδικό, έτσι ώστε οι κωδικοί να είναι μοναδικοί στην πρώτη στήλη.

[lcharal]

Καλημέρα και από εμένα,

ήθελα τη βοήθειά σας στο δικό μου προβληματισμό.

Έχω δημιουργήσει αρκετά αρχεία excel, με το ίδιο σχεδιασμό πίνακα, με διαφορετική ονομασία.
Αυτό που θέλω είναι, να δημιουργήσω ένα αρχείο, που να μεταφέρονται συνολικά η ονομασία των όλων αρχείων, και η τιμή ενός συγκεκριμένου κελιού. Το νέο αρχείο θα έχει τη μορφή δύο στηλών, στη 1η θα είναι η ονομασία του αρχείου, στη 2η θα είναι η τιμή ενός συγκεκριμένου κελιού, από την ομάδα των αρχείων που έχω δημιουργήσει, και να ενημερώνεται αυτόματα.

Πως μπορώ να το κάνω αυτο?

[kapetang]

Καλησπέρα

Δες μια πρόταση στο συνημμένο.

Πατώντας το σχετικό κουμπί, ο κώδικας που εκτελείται, βρίσκει τα αρχεία του Excel που υπάρχουν στο φάκελο που καθορίζουμε, ανοίγει ένα ένα τα αρχεία και αντιγράφει την τιμή του κελιού που θέλουμε μαζί με το πλήρες όνομα του αρχείου.

[lcharal]

Αρχική Δημοσίευση από kapetang

Καλησπέρα

Δες μια πρόταση στο συνημμένο.

Πατώντας το σχετικό κουμπί, ο κώδικας που εκτελείται, βρίσκει τα αρχεία του Excel που υπάρχουν στο φάκελο που καθορίζουμε, ανοίγει ένα ένα τα αρχεία και αντιγράφει την τιμή του κελιού που θέλουμε μαζί με το πλήρες όνομα του αρχείου.

Σε ευχαριστώ για την απάντηση.
Υπάρχει κάτι που πρέπει να προσέξω, όπως π.χ. στην ονομασία του αρχείου? Σε μενα δε δουλεύει, ενώ οι παράμετροι είναι σωστοί. Δεν εμφανίζει ούτε καν το όνομα του αρχείου.
Από ότι μπορώ να καταλάβω, υπάρχει πρόβλημα με τη διαδρομή του αρχείου. Αν δημιουργήσω ένα route οπως του παραδείγματος, τότε δουλεύει κανονικά.
Θα μπορούσα να έχω τη βοήθειά σας παρακαλώ?

Ευχαριστώ

[kapetang]

Καλησπέρα

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

Πήγαινε στην εξερεύνηση αρχείων και άνοιξε το φάκελο που έχει τα αρχεία σου.

Κάνε δεξί κλικ σε ένα αρχείο και διάλεξε ιδιότητες.

Από το παράθυρο που θα ανοίξει, επίλεξε και κάνε copy τη θέση (διαδρομή) του αρχείου.

Τη διαδρομή αυτή επικόλλησέ την στο excel και στο τέλος πρόσθεσε μία ανάστροφη κάθετο (\).

Αν δε δουλέψει ανέβασε το αρχείο με τα στοιχεία που συμπληρώνεις.

[lcharal]

Αρχική Δημοσίευση από kapetang

Καλησπέρα

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

Πήγαινε στην εξερεύνηση αρχείων και άνοιξε το φάκελο που έχει τα αρχεία σου.

Κάνε δεξί κλικ σε ένα αρχείο και διάλεξε ιδιότητες.

Από το παράθυρο που θα ανοίξει, επίλεξε και κάνε copy τη θέση (διαδρομή) του αρχείου.

Τη διαδρομή αυτή επικόλλησέ την στο excel και στο τέλος πρόσθεσε μία ανάστροφη κάθετο (\).

Αν δε δουλέψει ανέβασε το αρχείο με τα στοιχεία που συμπληρώνεις.

Ευχαριστώ κύριε Γιώργο.

Το λάθος ήταν η τελευταία κάθετος στο route του φακέλου.
Δούλεψε άψογα το αρχείο.
Σε ευχαριστώ πολύ!

[kapetang]

Λευτέρη να είσαι καλά και καλή συνέχεια.

Στο συνημμένο βελτίωσα τον κώδικα για να λειτουργεί και χωρίς την προσθήκη της ανάστροφης καθέτου στη διαδρομή του φακέλου.