Μεταφόρτωση δεδομένων στο Excel με ρύθμιση διαφόρων παραμέτρων. Μεταφόρτωση δεδομένων στο Excel με ρύθμιση διαφόρων παραμέτρων Μεταφόρτωση στοιχείων από το 1s 8.3 στο excel

Για παράδειγμα, ας δημιουργήσουμε Ισολογισμός κύκλου εργασιών (Αναφορές - πρότυπο - Ισολογισμός).

Καθορίστε το φάκελο όπου θα αποθηκεύσετε το έγγραφο, ορίστε το όνομα αρχείου και επιλέξτε Τύπος αρχείου — Φύλλο Excel (*.xls)ή Φύλλο excel2007- ... (*. XLSX)- Αυτές είναι διαφορετικές εκδόσεις του Excel. Μπορείτε να αποθηκεύσετε και στις δύο μορφές και να δείτε ποια σας ταιριάζει καλύτερα. Επίσης, κατά την αποθήκευση, είναι διαθέσιμες άλλες μορφές αρχείων. πάτα το κουμπί Αποθηκεύσετε .

Στο παράδειγμά μας, επιλέξαμε το φάκελο Έγγραφα από το 1C και ορίστε το όνομα του αρχείου - Αλάτι για 9 μήνες. Για παράδειγμα, αποθηκεύουμε σε διαφορετικές μορφές Excel.

Μετά την αποθήκευση, τα έγγραφα θα βρίσκονται στον καθορισμένο φάκελο.

Και τα δύο αρχεία θα ανοίξουν, γιατί Οι προηγούμενες εκδόσεις των εγγράφων υποστηρίζονται από νεότερες εκδόσεις προγραμμάτων.

Πώς να αποθηκεύσετε ένα έγγραφο στο Excel σε 1C

Ας δούμε την αποθήκευση χρησιμοποιώντας ένα έγγραφο ως παράδειγμα Σειρά ΠΛΗΡΩΜΗΣ . Ας δημιουργήσουμε την έντυπη μορφή του και ανάμεσα στα κουμπιά στη γραμμή εργαλείων βλέπουμε ένα κουμπί με δισκέτα.

Όταν κάνετε κλικ, ανοίγει ένα παράθυρο για την αποθήκευση του εγγράφου, όπου καθορίζουμε το φάκελο που θα το αποθηκεύσουμε και επιλέγουμε την επιθυμητή μορφή. Στην περίπτωσή μας είναι - Φύλλο Microsoft Excel. Επιλέξτε το πλαίσιο και πατήστε το κουμπί Ετοιμος. Το έγγραφο αποθηκεύεται σε φάκελο.

Μεταφόρτωση πινάκων από 1C στο Excel

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

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

Για να επιλέξετε έγγραφα, μπορείτε να τα επιλέξετε κρατώντας πατημένο το κουμπί Ctrlή Βάρδια, και χρησιμοποιείται επίσης για την επιλογή ομάδων γραμμών. Στη συνέχεια πατήστε το κουμπί Περισσότεροκαι επιλέξτε μια ομάδα Λίστα .

Στο παράθυρο που ανοίγει, διαμορφώνουμε ποιες στήλες πρέπει να εμφανίσουμε και να επιλέξουμε - εμφάνιση σε έγγραφο υπολογιστικού φύλλου . Εάν έχουμε επιλέξει μια ομάδα γραμμών στη λίστα, τότε τσεκάρουμε το πλαίσιο - εμφάνιση Μόνο επιλεγμένα . Κάντε κλικ ΕντάξειΚαι η λίστα είναι έτοιμη.

Μοιάζει με αυτό:

Η αναφορά που προκύπτει μπορεί να αποθηκευτεί σε οποιαδήποτε μορφή, συμπεριλαμβανομένων Excel - *.xls. Για να το κάνετε αυτό (όπως περιγράφεται παραπάνω), επιλέξτε την εντολή Αποθηκεύσετε(ή Αποθήκευση ως ) στο μενού Αρχείοκαι ρυθμίστε τις παραμέτρους.

Αυτές οι ενέργειες μπορούν να εκτελεστούν με οποιεσδήποτε λίστες του προγράμματος 1C.

Όταν εργάζεστε με μεγάλες λίστες, για παράδειγμα, έναν κατάλογο Ονοματολογία , μπορείτε να εγκαταστήσετε πρόσθετη επιλογή και ομαδοποίηση, να ορίσετε τη σειρά ταξινόμησης των δεδομένων.

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

Πώς να αποθηκεύσετε δεδομένα κελιών πίνακα από 1C στο Excel

Μερικές φορές χρειάζεται να αντιγράψουμε μέρος των δεδομένων από μια αναφορά ή ένα έγγραφο. Αυτό μπορεί να γίνει με τακτική αντιγραφή. Για να το κάνετε αυτό, επιλέξτε μερικά από τα απαιτούμενα κελιά και κάντε δεξί κλικ και επιλέξτε την εντολή αντίγραφο(ή Ctrl+C).

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

Βοήθησε το άρθρο;
Λάβετε άλλο ένα μυστικό μπόνους και πλήρη πρόσβαση στο σύστημα βοήθειας BukhExpert8 για 14 ημέρες δωρεάν

Στο τελευταίο μάθημα που εξετάσαμε.

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

Το μόνο που χρειαζόμαστε είναι να ξεφορτώνουμε περιοδικά από τον μισθό στο λογιστήριο.

Ας εξετάσουμε τη διαδικασία λήψης δεδομένων από το 1C.

Αρχές μεταφόρτωσης και λήψης δεδομένων 1C

Στη Λογιστική, το έγγραφο Πωλήσεις αγαθών και υπηρεσιών μπορεί να έχει 30 πεδία. Αυτή είναι η λογιστική, έχει τους δικούς της στόχους, πολλά πεδία είναι αφιερωμένα στο λογιστικό σχέδιο και στους υπολογαριασμούς.

Στο Trade Management, το ίδιο έγγραφο Πωλήσεις αγαθών μπορεί να έχει 25. Αυτή είναι η λειτουργική λογιστική, έχει τους δικούς της στόχους. Αλλά οι λογαριασμοί από το λογιστικό σχέδιο δεν αναφέρονται εκεί.

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

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

Είναι ένα αρχείο με επέκταση XML. Για να το δημιουργήσετε, υπάρχει μια ειδική διαμόρφωση 1C που ονομάζεται "Μετατροπή δεδομένων".

Για ανταλλαγή μεταξύ τυπικών διαμορφώσεων, υπάρχουν τυπικοί κανόνες για την ανταλλαγή δεδομένων, οι οποίοι είναι ενσωματωμένοι σε τυπικές ρυθμίσεις ανταλλαγής (Service/Exchange with xxx) ή παρέχονται ξεχωριστά.

Ξεφορτώστε το BU-ZP 1C

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

Για να είναι εφικτό αυτό θα πρέπει πρώτα να ανεβάσετε τις ρυθμίσεις από τη Λογιστική στο μισθολόγιο.

Για να ανεβάσετε 1C από Λογιστική 1C σε Μισθός 1C - επιλέξτε το στοιχείο μενού Υπηρεσία/Ανταλλαγή δεδομένων με μισθό/Μεταφόρτωση δεδομένων στη Λογιστική.

Κατά τη μεταφόρτωση 1C για πρώτη φορά, μην ξεχάσετε να επιλέξετε το πλαίσιο "Πληροφορίες για τη μεταφόρτωση 1C σε μια νέα βάση πληροφοριών".

Πώς να ανεβάσετε τις αρχικές πληροφορίες στο Μισθός - δείτε το επόμενο άρθρο Μεταφόρτωση 1C.

Εκφόρτωση ZP-Bu 1C

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

Στο Μισθός, επιλέξτε το μενού Υπηρεσία/Ανταλλαγή δεδομένων/Λήψη δεδομένων σε λογιστικό πρόγραμμα.

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

Η μορφή μεταφόρτωσης 1C εμφανίζεται ως υπερσύνδεσμος - σε μπλε κείμενο. Μπορείτε να το αλλάξετε κάνοντας κλικ στον υπερσύνδεσμο και επιλέγοντας διαφορετική λογιστική διαμόρφωση.

Εκφόρτωση bu-ut 1c

Για να ανεβάσετε το 1C από το Accounting στη Διαχείριση εμπορίου, πρέπει να δημιουργήσετε ρυθμίσεις ανταλλαγής. Αυτό θα σας επιτρέψει όχι μόνο να κάνετε εφάπαξ μεταφορτώσεις 1C, αλλά και να δημιουργήσετε μια πλήρη περιοδική ανταλλαγή, όπως στο.

Για να κάνετε ρυθμίσεις, επιλέξτε το στοιχείο μενού Υπηρεσία/Ανταλλαγή δεδομένων με Διαχείριση συναλλαγών/Ρύθμιση ανταλλαγής δεδομένων στη Λογιστική.

Οι ρυθμίσεις δημιουργούνται χρησιμοποιώντας έναν "μάγο".

Δεν θα ακολουθήσουμε την εύκολη διαδρομή και θα ελέγξουμε μόνοι μας όλες τις ρυθμίσεις· για αυτό πρέπει να επιλέξετε τον τρόπο λειτουργίας Expert.

Εφόσον δημιουργούμε μια εγκατάσταση από την αρχή, θα επιλέξουμε "Δημιουργία ρύθμισης ανταλλαγής" (ανάλογα, μπορείτε να "συνεχίσετε" εάν διακόψατε τον οδηγό νωρίτερα ή να αλλάξετε εάν ο οδηγός έχει ολοκληρωθεί).

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

Αντίστοιχα, θα επιλέξουμε «Δημιουργία με χρήση αρχείου» εάν ξεκινήσατε να φτιάχνετε ένα νέο από την αρχή στο Trade Management και εδώ πρέπει να ολοκληρώσετε τη ρύθμιση (ομοίως, εάν ξεκινήσετε στη Λογιστική, θα πρέπει να το ολοκληρώσετε στη Διαχείριση εμπορίου) .

Οι ρυθμίσεις για τις ανταλλαγές "μέσω αρχείου" είναι απλές και δεν εμφανίζονται εδώ στις εικόνες. Αλλά για μια "άμεση" σύνδεση COM υπάρχουν παραδείγματα εδώ.

Για παράδειγμα, εάν η Διαχείριση Εμπορίου είναι "αρχείο" - βρίσκεται στο δίσκο. .

Παράδειγμα, εάν η Διαχείριση Εμπορίου βρίσκεται στον διακομιστή 1C. Το όνομα του διακομιστή και της βάσης δεδομένων είναι .

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

Εδώ πρέπει να υποδείξετε εάν σκοπεύετε να κατεβάσετε κάτι από το Trade Management. Αν ναι, τότε αυτή είναι μια «αμφίδρομη» ανταλλαγή.

Μπορούμε να καθορίσουμε φίλτρα για τα μεταφορτωμένα έγγραφα. Για παράδειγμα, όσον αφορά τους οργανισμούς.

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

Αυτό ολοκληρώνει το πρώτο μέρος της ρύθμισης. Με βάση τα αποτελέσματά του, το 1C δημιουργεί ένα αρχείο ρυθμίσεων. Τώρα πρέπει να μεταβείτε στη Διαχείριση εμπορίου και να συνεχίσετε τη ρύθμιση εκεί, επιλέγοντας την επιλογή «Συνέχεια χρήσης αρχείου» και προσδιορίζοντας αυτό το αρχείο.

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

Προσοχή σε αυτό το σημείο, αν το Trade Management δεν είναι μια άδεια βάση δεδομένων, έχει τους δικούς του καταλόγους, ειδικά αν έχουν διατηρηθεί για μεγάλο χρονικό διάστημα.

Εάν δεν είστε σίγουροι για αυτό το σημείο:

Δημιουργήστε αντίγραφα ασφαλείας και των δύο βάσεων δεδομένων (ειδικά αν η ανταλλαγή είναι αμφίδρομη)
Ζητήστε από τους χρήστες να μην εργάζονται σε αυτές τις βάσεις δεδομένων ενώ κάνετε την αρχική εκφόρτωση του 1C (σαββατοκύριακα και βράδια :)
Ξεφορτώστε το 1C, ελέγξτε ότι οι κατάλογοι δεν είναι διπλότυποι
Εάν κάτι δεν πάει καλά, επιστρέψτε στο αντίγραφο ασφαλείας.

Εκφόρτωση ut-retail 1c

Η τυπική διαμόρφωση 1C Retail χρησιμοποιείται συχνά σε συνδυασμό με τη διαμόρφωση Trade Management. Συνήθως, το UT χρησιμοποιείται σε καταστήματα λιανικής και το Λιανικό στο γραφείο.

Εξετάζουμε ένα παράδειγμα ρύθμισης της ανταλλαγής της έκδοσης UT 11 με το Retail.

Επιλέξτε Διαχείριση στη διεπαφή και, στη συνέχεια, Ανταλλαγές δεδομένων, Προσθήκη/Δημιουργία Exchange με διαμόρφωση λιανικής.

Η ρύθμιση της ανταλλαγής γίνεται σε δύο βάσεις δεδομένων - πρώτα στη μία και μετά στην άλλη.

Αντίστοιχα, θα επιλέξουμε "Συνέχεια" εάν ξεκινήσατε να φτιάχνετε ένα νέο από την αρχή στο Retail και εδώ πρέπει να ολοκληρώσετε τη ρύθμιση (ομοίως, εάν ξεκινήσετε στη Διαχείριση εμπορίου, θα πρέπει να το ολοκληρώσετε στο Retail).

Σε αυτήν την καρτέλα, επιλέγετε τη μέθοδο μεταφοράς πληροφοριών μεταξύ δύο βάσεων δεδομένων - μέσω ενός αρχείου (κοινή χρήση). Παραλείψτε αυτήν τη σελίδα εάν θέλετε να χρησιμοποιήσετε άλλη επιλογή.

Σε αυτήν την καρτέλα, επιλέγετε τη μέθοδο μεταφοράς πληροφοριών μεταξύ δύο βάσεων δεδομένων - μέσω αρχείου (FTP). Παραλείψτε αυτήν τη σελίδα εάν θέλετε να χρησιμοποιήσετε άλλη επιλογή.

Τελική σελίδα ρυθμίσεων. Για να καθορίσετε διευκρινίσεις, κάντε κλικ στο κουμπί "Διαμόρφωση περιορισμών".

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

Στην καρτέλα αλληλογραφία, μπορείτε να διαμορφώσετε την αντιστοιχία ορισμένων καταλόγων (καταστήματα = τμήματα και ταμεία).

Αυτό ολοκληρώνει το πρώτο στάδιο της εγκατάστασης. Ως αποτέλεσμα, δημιουργήθηκε ένα αρχείο ρυθμίσεων. Πρέπει να ολοκληρώσετε τη ρύθμιση στη βάση δεδομένων Retail ορίζοντας Continue using the file.

Κωδικός 1C v 8.x // Η διαδικασία πραγματοποιεί λήψη δεδομένων από τον καθορισμένο κατάλογο σε λειτουργία εξαγωγής σε αρχείο σε μορφή Microsoft Excel
// με το καθορισμένο όνομα, χρησιμοποιώντας μετατροπή δεδομένων σε τύπο αριθμού και τύπο συμβολοσειράς.
Διαδικασία BasicActionsFormsExport(Button)
Απόπειρα
Απόπειρα
// Φόρτωση αντικειμένου Microsoft Excel
Κατάσταση ("Μεταφόρτωση δεδομένων από 1C στο Microsoft Excel...");
ExcelApplication = Νέο COMObject("Excel.Application");
Εξαίρεση
Αναφορά ("Σφάλμα έναρξης του Microsoft Excel."
+ Symbols.PS + ErrorDescription(), MessageStatus.Attention);
ΕΠΙΣΤΡΟΦΗ;
EndAttempt;

// Δημιουργία βιβλίου, από προεπιλογή έχει ήδη φύλλα
Βιβλίο = ExcelApplication.WorkBooks.Add();

// Χρησιμοποιήστε το πρώτο φύλλο του βιβλίου εργασίας του Excel
Φύλλο = Βιβλίο.Φύλλα εργασίας(1);

// Δημιουργήστε μια κεφαλίδα εγγράφου στην πρώτη γραμμή του φύλλου
Στήλη = 1;
Για κάθε σελίδα από τον κύκλο TP
Αν σελίδα.Αφαίρεση Στη συνέχεια
Sheet.Cells(1, Column).Value = page.AttributeName;
Στήλη = Στήλη + 1;
τέλος εαν;
EndCycle;

// Μεταφόρτωση δεδομένων καταλόγου
selection = Κατάλογοι [Όνομα καταλόγου].Select();
SheetString = 2;
Κατά τη δειγματοληψία.Επόμενο() Βρόχος
Στήλη = 1;
Για κάθε σελίδα από τον κύκλο TP

Αν σελίδα.Αφαίρεση Στη συνέχεια
Απόπειρα
// Ορίστε την τιμή σε γραμμή και στήλη
Αν TypeValue(selection[page.AttributeName])=Type("Number") Τότε
// Ορίστε τη μορφή για τον τύπο αριθμού
Sheet.Cells(SheetRow, Column).NumberFormat = "0.00";

Μορφή(επιλογή[page.AttributeName],"CH=0");
σε διαφορετική περίπτωση
// Για όλους τους άλλους τύπους, ορίστε τη μορφή σε "Κείμενο"
Sheet.Cells(SheetRow, Column).NumberFormat = "@";
Sheet.Cells(SheetRow, Column).Τιμή =
Γραμμή (επιλογή [page.attributename]);
τέλος εαν;
εξαίρεση
// σε περίπτωση σφάλματος, εμφανίστε τον αριθμό της γραμμής και της στήλης
Αναφορά ("Τιμή ρύθμισης σφαλμάτων για:" +
επιλογή [pageattributename]);
Αναφορά ("Σελίδα:" + Sheetline + "Count:" +
Στήλη + "rec:" + page.name των στηρίξεων);
EndAttempt;
Στήλη = Στήλη + 1;
τέλος εαν;

EndCycle;
SeetString = SheetString + 1;
Κράτος ("Εξαγωγή από 1C έως Excel" + SheetString);
EndCycle;

// Αποθηκεύστε το δημιουργημένο βιβλίο σε ένα αρχείο XLS
Book.SaveAs(Όνομα αρχείου);

// Φροντίστε να κλείσετε τη σύνδεση με το αντικείμενο COM για να ελευθερώσετε μνήμη
ExcelApplication.Quit();

Ειδοποίηση ("Το αρχείο μεταφορτώθηκε με επιτυχία: " + Όνομα αρχείου);

Εξαίρεση
// Χειρισμός σφαλμάτων κατά την εξαγωγή δεδομένων από το 1C στο Excel
Αναφορά ("Σφάλμα γραφής αρχείων αρχείων:" + όνομα αρχείου);
Αναφορά (errordescription ());
Απόπειρα
ExcelApplication.Quit();
Εξαίρεση
EndAttempt;
EndAttempt;
Τέλος Διαδικασίας
Κωδικός 1C v 7.x //Το απλούστερο παράδειγμα εξόδου από 1C:Enterprise 7.7 σε MS Excel. Διασφάλιση ότι το βιβλίο εργασίας έχει ένα μόνο φύλλο,
//ορίστε το μέγεθος, την έντονη γραφή και το χρώμα της γραμματοσειράς, το πλάτος των στηλών, τα πλαίσια και το γέμισμα κελιών. Στοίχιση κειμένου
//κελιά, ομαδοποίηση σειρών, ρύθμιση της μορφής αριθμού των κελιών, πάγωμα της περιοχής.

Έξοδος διαδικασίας()
Απόπειρα
Application=CreateObject("Excel.Application");
Εξαίρεση
Αναφορά(ErrorDescription(),"!!!");
Αναφορά ("Το MS Excel ενδέχεται να μην είναι εγκατεστημένο σε αυτόν τον υπολογιστή.");
ΕΠΙΣΤΡΟΦΗ;
EndAttempt;

//Δημιουργία βιβλίου εργασίας

WorkBook=Application.WorkBooks.Add();
//Λήψη παραθύρου

Window=WorkBook.Windows(1);
//Ρυθμίστε το παράθυρο αόρατο για να επιταχύνετε την έξοδο

Window.Visible=0;
//Διασφάλιση ότι το βιβλίο εργασίας έχει ένα μόνο φύλλο

Αν WorkBook.Worksheets.Count=0 Τότε
Workbook.Worksheets.Add();
Σε διαφορετική περίπτωση
Application.DisplayAlerts=0;//μην εκδίδετε προειδοποιήσεις

Ενώ Βιβλίο Εργασίας.Φύλλα εργασίας.Αριθμός>1 Κύκλος
Workbook.Worksheets(1).Delete();
EndCycle;
Application.DisplayAlerts=-1;//επαναφορά της προειδοποιητικής σημαίας

τέλος εαν;
//Λήψη φύλλου εργασίας

Φύλλο εργασίας=WorkBook.Worksheets(1);
//Ορίστε το όνομα του φύλλου εργασίας

Φύλλο εργασίας.Όνομα="Εξόδου Παράδειγμα";

//Τίτλος εγγράφου

Worksheet.Range("A1").Value="Example output from 1C:Enterprise in MS Excel";!}
Φύλλο εργασίας.Range("A2").Value="σήμερα"+ТекущаяДата();!}
Worksheet.Range("A1:A2").Font.Size=14;//μέγεθος γραμματοσειράς

Worksheet.Range("A1:A2").Font.Bold=-1;//bold font

//Ορισμός πλάτους στήλης

Φύλλο εργασίας.Columns(1).ColumnWidth=60;
Φύλλο εργασίας.Columns(2).ColumnWidth=15;
Φύλλο εργασίας.Columns(3).ColumnWidth=15;

//Κεφαλίδα εγγράφου

Φύλλο εργασίας.Range("A4").Value="Πρώτη στήλη";!}
Για s=7 έως 10 Κύκλος//πλαίσια

Φύλλο εργασίας.Range("A4").Borders.LineStyle=1;
Φύλλο εργασίας.Εύρος("A4").Περιγράμματα(α).Weight=-4138;//xlMedium

EndCycle;
Φύλλο εργασίας.Range("A4").Interior.ColorIndex=15;//fill with gray

Worksheet.Range("A4").HorizontalAlignment=-4108;//στοίχιση κειμένου στο κέντρο

Φύλλο εργασίας.Range("B4").Value="Second";!}
Για s=7 έως 10 κύκλους
Φύλλο εργασίας.Range("B4").Borders.LineStyle=1;
Φύλλο εργασίας.Εύρος("B4").Σύνορα(α).Βάρος=-4138;
EndCycle;
Φύλλο εργασίας.Range("B4").Interior.ColorIndex=15;
Φύλλο εργασίας.Range("B4").HorizontalAlignment=-4108;

Φύλλο εργασίας.Range("C4").Value="Third";!}
Για s=7 έως 10 κύκλους
Φύλλο εργασίας.Εύρος("C4").Σύνορα(α).LineStyle=1;
Φύλλο εργασίας.Εύρος("C4").Σύνορα(α).Βάρος=-4138;
EndCycle;
Φύλλο εργασίας.Εύρος("C4").Interior.ColorIndex=15;
Φύλλο εργασίας.Range("C4").HorizontalAlignment=-4108;

//Για ομαδοποίηση σειρών:
Φύλλο εργασίας.Outline.SummaryRow=0;//«σύνοψη» σειρές που εμφανίζονται στο επάνω μέρος (αν στο κάτω μέρος, τότε 1)

//Συμβολοσειρές εξόδου
Worksheet.Range("A5").Value="Analytics Object";!}
Φύλλο εργασίας.Εύρος("A5").Font.ColorIndex=5;//χρώμα γραμματοσειράς - μπλε

Φύλλο εργασίας.Εύρος("B5").Τιμή=123,45;
Φύλλο εργασίας.Εύρος("B5").Font.ColorIndex=5;
Φύλλο εργασίας.Εύρος("C5").Τιμή=678.9;
Φύλλο εργασίας.Εύρος("C5").Font.ColorIndex=5;

Worksheet.Range("A6").Value="Analytics Object";!}
Worksheet.Range("A6").Font.ColorIndex=3;//χρώμα γραμματοσειράς - κόκκινο

Φύλλο εργασίας.Εύρος("B6").Τιμή=123,45;
Φύλλο εργασίας.Εύρος("B6").Font.ColorIndex=3;
Φύλλο εργασίας.Εύρος("C6").Τιμή=678.9;
Φύλλο εργασίας.Εύρος("C6").Font.ColorIndex=3;

Worksheet.Range("A7").Value="Analytics Object";!}
Φύλλο εργασίας.Εύρος("B7").Τιμή=123,45;
Φύλλο εργασίας.Εύρος("C7").Τιμή=678.9;

Worksheet.Range("A8").Value="Analytics Object";!}
Φύλλο εργασίας.Εύρος("B8").Τιμή=123,45;
Φύλλο εργασίας.Εύρος("C8").Τιμή=678.9;

Φύλλο εργασίας.Range("A9").Value="Αντικείμενο Analytics";!}
Φύλλο εργασίας.Εύρος("A9").Font.ColorIndex=3;//χρώμα γραμματοσειράς - κόκκινο

Φύλλο εργασίας.Εύρος("B9").Τιμή=123,45;
Worksheet.Range("B9").Font.ColorIndex=3;
Worksheet.Range("C9").Value=678.9;
Φύλλο εργασίας.Εύρος("C9").Font.ColorIndex=3;

Worksheet.Range("A10").Value="Analytics Object";!}
Φύλλο εργασίας.Εύρος("B10").Τιμή=123,45;
Φύλλο εργασίας.Εύρος("C10").Τιμή=678.9;

Worksheet.Range("A11").Value="Analytics Object";!}
Φύλλο εργασίας.Εύρος("B11").Τιμή=123,45;
Φύλλο εργασίας.Εύρος("C11").Τιμή=678.9;

Worksheet.Range("A12").Value="Analytics Object";!}
Worksheet.Range("A12").Font.ColorIndex=5;//χρώμα γραμματοσειράς - μπλε

Φύλλο εργασίας.Εύρος("B12").Τιμή=123,45;
Φύλλο εργασίας.Εύρος("B12").Font.ColorIndex=5;
Φύλλο εργασίας.Εύρος("C12").Τιμή=678.9;
Φύλλο εργασίας.Εύρος("C12").Font.ColorIndex=5;

Worksheet.Range("A13").Value="Analytics Object";!}
Φύλλο εργασίας.Εύρος("A13").Font.ColorIndex=3;//χρώμα γραμματοσειράς - κόκκινο

Φύλλο εργασίας.Εύρος("B13").Τιμή=123,45;
Φύλλο εργασίας.Εύρος("B13").Font.ColorIndex=3;
Φύλλο εργασίας.Εύρος("C13").Τιμή=678.9;
Φύλλο εργασίας.Εύρος("C13").Font.ColorIndex=3;

Worksheet.Range("A14").Value="Analytics Object";!}
Φύλλο εργασίας.Εύρος("B14").Τιμή=123,45;
Φύλλο εργασίας.Εύρος("C14").Τιμή=678.9;

Worksheet.Range("A15").Value="Analytics Object";!}
Φύλλο εργασίας.Εύρος("B15").Τιμή=123,45;
Φύλλο εργασίας.Εύρος("C15").Τιμή=678.9;

Worksheet.Range("A16").Value="Analytics Object";!}
Φύλλο εργασίας.Εύρος("A16").Font.ColorIndex=3;//χρώμα γραμματοσειράς - κόκκινο

Φύλλο εργασίας.Εύρος("B16").Τιμή=123,45;
Φύλλο εργασίας.Εύρος("B16").Font.ColorIndex=3;
Φύλλο εργασίας.Εύρος("C16").Τιμή=678.9;
Φύλλο εργασίας.Εύρος("C16").Font.ColorIndex=3;

Worksheet.Range("A17").Value="Analytics Object";!}
Φύλλο εργασίας.Εύρος("B17").Τιμή=123,45;
Φύλλο εργασίας.Εύρος("C17").Τιμή=678,9;

Worksheet.Range("A18").Value="Analytics Object";!}
Φύλλο εργασίας.Εύρος("B18").Τιμή=123,45;
Φύλλο εργασίας.Εύρος("C18").Τιμή=678.9;

//Ρύθμιση πλαισίων

Για NomStr=5 έως 18 κύκλους
Για s=7 έως 10 κύκλους
Φύλλο εργασίας.Range("A"+LineNumber).Περιγράμματα(α).LineStyle=1;
Φύλλο εργασίας.Range("B"+LineNumber).Σύνορα(α).LineStyle=1;
Φύλλο εργασίας.Εύρος("C"+Αριθμός γραμμής).Περιγράμματα(α).LineStyle=1;
EndCycle;
EndCycle;

//Ομαδοποίηση σειρών

Worksheet.Range("7:8").Rows.Group();
Worksheet.Range("10:11").Rows.Group();
Φύλλο εργασίας.Range("14:15").Rows.Group();
Φύλλο εργασίας.Range("17:18").Rows.Group();
Worksheet.Range("6:11").Rows.Group();
Worksheet.Range("13:18").Rows.Group();

//Κατάρρευση ομαδοποιήσεων στο πρώτο επίπεδο

Φύλλο εργασίας.Outline.ShowLevels(1);

//Ορισμός μορφής αριθμού

Απόπειρα
Worksheet.Range("B5:C18").NumberFormat="# ##0.00";

Εξαίρεση
Απόπειρα
Worksheet.Range("B5:C18").NumberFormat="# ##0.00";

Εξαίρεση
EndAttempt;
EndAttempt;

//Ρυθμίστε την ορατότητα της εφαρμογής και του παραθύρου της

Application.Visible=-1;
Παράθυρο.Ορατό=-1;

//Καρφίτσωμα της περιοχής

Φύλλο εργασίας.Range("A5").S_elect();
Window.FreezePanes = -1;
EndProcedure //Έξοδος

Ήταν μια μικρή ανακάλυψη για μένα ότι οι χρήστες 1C δεν ξέρουν πώς να ανεβάζουν γρήγορα σχεδόν οποιαδήποτε δεδομένα από το 1C στο Excel. Πρόσφατα συνάντησα τι έκαναν οι συνάδελφοί μου και, στη συνέχεια, χρησιμοποιώντας το FineReader μετέφρασαν τα δεδομένα σε κείμενο από μια εικόνα, επειδή το κουμπί αποθήκευσης στο 1C δεν λειτουργούσε (βλ. εικόνα). Πολύ μακριά, έτσι δεν είναι; Υπάρχουν όμως πιο βολικοί τρόποι. Δεν υπάρχει μυστικό στην εκφόρτωση από το 1C, υπάρχουν πολλές δυνατότητες.

Ας δούμε σημείο προς σημείο πώς μπορούμε να αποθηκεύσουμε δεδομένα από το 1C στο Excel:

Ο ευκολότερος τρόπος για να αποθηκεύσετε δεδομένα από το 1C στο Excel είναι να επιλέξετε ένα κελί σε ένα έγγραφο ή ημερολόγιο και να κάνετε κλικ (αντιγραφή), στη συνέχεια στο Excel επιλέξτε το κελί όπου θέλετε να αποθηκεύσετε τα δεδομένα και κάντε κλικ v. Με αυτόν τον τρόπο θα αποθηκεύσετε τα περιεχόμενα αυτού του κελιού. Για την εικόνα του παραδείγματος θα είναι 42.289,23

Αυτή η μέθοδος λειτουργεί για οποιαδήποτε έκδοση του 1C.

2. Πώς να κατεβάσετε μεγάλο όγκο δεδομένων από το 1C στο Excel;

Η προηγούμενη μέθοδος είναι καλή, αλλά δεν μπορείτε να συγκεντρώσετε μεγάλο όγκο δεδομένων με αυτόν τον τρόπο. Επομένως, είναι καλύτερο να χρησιμοποιήσετε το εργαλείο Λίστα.

Σχεδόν σε οποιοδήποτε ημερολόγιο εγγράφων, βιβλίο αναφοράς ή έγγραφο, κάντε δεξί κλικ και αναζητήστε Λίστα.

Για τις εκδόσεις 8.3 και τη διεπαφή "Taxi", το κουμπί για την εμφάνιση της λίστας βρίσκεται στο μενού Περισσότερα

Μια λίστα με αυτά τα στοιχεία θα εμφανιστεί ως κείμενο (ίσως χρειαστεί να επιλέξετε ποιες στήλες θα επιλέξετε πρώτα). Αυτό το κείμενο μπορεί ήδη να αντιγραφεί σε οποιοδήποτε έγγραφο. Σας συμβουλεύω όμως να χρησιμοποιήσετε το μενού Αρχείο - Αποθήκευση ως (καθώς η επεξεργασία μεγάλων ποσοτήτων δεδομένων θα χρειαστεί πολύ χρόνο και μπορεί να προκύψει σφάλμα κατά την αντιγραφή στο buffer).

Στη συνέχεια, επιλέξτε την επιθυμητή μορφή αρχείου.

Όλα τα αρχεία αποθηκεύονται στην απαιτούμενη μορφή.

Αυτή η μέθοδος λειτουργεί επίσης για οποιαδήποτε έκδοση του 1C.

Για την έκδοση 1c 8.2 και νεότερη στη διεπαφή thin client ή Taxi, το εργαλείο File - Save As είναι διαθέσιμο στον πίνακα στην επάνω δεξιά γωνία με τη μορφή δισκέτας