Note: The other languages of the website are Google-translated. Back to English

 Πώς να εκτελέσετε μακροεντολή με βάση την τιμή κελιού στο Excel;

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

Εκτελέστε ή ενεργοποιήστε τη μακροεντολή εάν η τιμή κελιού είναι μεγαλύτερη ή μικρότερη από μια συγκεκριμένη τιμή με τον κώδικα VBA

Εκτελέστε ή ενεργοποιήστε μακροεντολή εάν η τιμή κελιού ισούται με συγκεκριμένο κείμενο με τον κώδικα VBA


βέλος μπλε δεξιά φούσκα Εκτελέστε ή ενεργοποιήστε τη μακροεντολή εάν η τιμή κελιού είναι μεγαλύτερη ή μικρότερη από μια συγκεκριμένη τιμή με τον κώδικα VBA

Για παράδειγμα, εάν η τιμή στο κελί A1 είναι μεταξύ 10 και 50, εκτελέστε το macro1 και εάν η τιμή είναι μεγαλύτερη από 50, εκτελέστε το macro2. Για να επιλύσετε αυτήν την εργασία στο Excel, εφαρμόστε τον ακόλουθο κώδικα VBA.

1. Κάντε δεξί κλικ στην καρτέλα φύλλων που θέλετε να εκτελέσετε τη μακροεντολή βάσει μιας τιμής κελιού και, στη συνέχεια, επιλέξτε Προβολή κωδικού από το μενού περιβάλλοντος και στο ανοιχτό Microsoft Visual Basic για εφαρμογές παράθυρο, αντιγράψτε και επικολλήστε τον ακόλουθο κώδικα στην κενή ενότητα:

Κωδικός VBA: Εκτέλεση μακροεντολής εάν η τιμή κελιού είναι μεγαλύτερη ή μικρότερη από:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    If Target.Cells.Count > 1 Then Exit Sub
    If IsNumeric(Target) And Target.Address = "$A$1" Then
        Select Case Target.Value
        Case 10 To 50: Macro1
        Case Is > 50: Macro2
        End Select
    End If
End Sub

doc run μακροεντολή με βάση την τιμή 1

Note: Στον παραπάνω κωδικό:

A1 είναι το κελί που περιέχει τη συγκεκριμένη τιμή στην οποία θέλετε να εκτελέσετε τη μακροεντολή.

Περίπτωση 10 έως 50: Macro1: σημαίνει ότι εάν η τιμή είναι μεταξύ 10 και 50, εκτελέστε το Macro1;

Περίπτωση είναι> 50: Macro2: σημαίνει ότι εάν η τιμή είναι μεγαλύτερη από 50, εκτελέστε το Macro2.

Αλλάξτε αυτά τα ονόματα και τα κριτήρια μακροεντολών ανάλογα με τις ανάγκες σας και μπορείτε επίσης να προσθέσετε περισσότερα κριτήρια μετά το Περίπτωση γραφή.

2. Στη συνέχεια, αποθηκεύστε και κλείστε αυτό το παράθυρο κώδικα, τώρα, όταν η τιμή που εισάγετε είναι μεταξύ 10 και 50 στο κελί A1, θα ενεργοποιηθεί το Macro1, εάν η τιμή που έχετε εισαγάγει είναι μεγαλύτερη από 50, εκτελείται το Macro2.


βέλος μπλε δεξιά φούσκα Εκτελέστε ή ενεργοποιήστε μακροεντολή εάν η τιμή κελιού ισούται με συγκεκριμένο κείμενο με τον κώδικα VBA

Εάν θέλετε να ενεργοποιήσετε τη μακροεντολή βάσει συγκεκριμένου κειμένου σε ένα κελί, για παράδειγμα, να εκτελέσετε τη μακροεντολή1 εάν εισαχθεί το κείμενο "Διαγραφή" και να εκτελέσετε τη μακροεντολή2 εάν πληκτρολογήσετε το κείμενο "Εισαγωγή". Ο παρακάτω κώδικας μπορεί να σας βοηθήσει.

1. Κάντε δεξί κλικ στο φύλλο που θέλετε να εκτελέσετε τη μακροεντολή με βάση την τιμή κελιού και, στη συνέχεια, επιλέξτε Προβολή κωδικού από το μενού περιβάλλοντος και στο ανοιχτό Microsoft Visual Basic για εφαρμογές παράθυρο, αντιγράψτε και επικολλήστε τον ακόλουθο κώδικα στην κενή ενότητα:

Κωδικός VBA: Εκτελέστε τη μακροεντολή εάν η τιμή του κελιού είναι ένα συγκεκριμένο κείμενο

Sub worksheet_change(ByVal target As Range)
Set target = Range("A1")
If target.Value = "Delete" Then
 Call Macro1
End If
If target.Value = "Insert" Then
Call Macro2
End If
End Sub 

doc run μακροεντολή με βάση την τιμή 2

Note: Στον παραπάνω κώδικα, "Διαγραφή"Και"Κύριο θέμαΕίναι τα κείμενα κελιού στα οποία θέλετε να εκτελέσετε μακροεντολές βάσει και Μακροεντολή1 και Μακροεντολή2 είναι οι μακροεντολές που θέλετε να εκτελέσετε βάσει κειμένου. Αλλάξτε τα ανάλογα με τις ανάγκες σας.

2. Στη συνέχεια, αποθηκεύστε αυτόν τον κωδικό και κλείστε το παράθυρο, τώρα, όταν εισαγάγετε το κείμενο "Διαγραφή" στο κελί A1, ενεργοποιείται η μακροεντολή1, εάν εισαχθεί το κείμενο "Εισαγωγή", θα εκτελεστεί η μακροεντολή2.


Σχετικά άρθρα:

Πώς να εκτελέσετε μακροεντολή όταν αλλάζει η τιμή κελιού στο Excel;

Πώς να εκτελέσετε αυτόματα τη μακροεντολή πριν από την εκτύπωση στο Excel;

Πώς να εκτελέσετε μακροεντολή με βάση την τιμή που επιλέγεται από την αναπτυσσόμενη λίστα στο Excel;

Πώς να εκτελέσετε μακροεντολή κάνοντας κλικ στους υπερσυνδέσμους στο Excel;

Πώς να εκτελέσετε μακροεντολή όταν το φύλλο έχει επιλεγεί από ένα βιβλίο εργασίας;


Τα καλύτερα εργαλεία παραγωγικότητας του Office

Το Kutools για Excel λύνει τα περισσότερα από τα προβλήματά σας και αυξάνει την παραγωγικότητά σας κατά 80%

  • Επαναχρησιμοποίηση: Εισαγάγετε γρήγορα σύνθετοι τύποι, γραφήματα και οτιδήποτε έχετε χρησιμοποιήσει στο παρελθόν. Κρυπτογράφηση κυττάρων με κωδικό πρόσβασης Δημιουργία λίστας αλληλογραφίας και στείλτε email ...
  • Super Formula Bar (επεξεργαστείτε εύκολα πολλές γραμμές κειμένου και τύπου). Διάταξη ανάγνωσης (εύκολη ανάγνωση και επεξεργασία μεγάλου αριθμού κελιών). Επικόλληση σε φιλτραρισμένο εύρος...
  • Συγχώνευση κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων · Περιεχόμενο διαχωρισμού κελιών Συνδυάστε διπλές σειρές / στήλες... Αποτροπή διπλών κυττάρων; Συγκρίνετε τα εύρη...
  • Επιλέξτε Διπλότυπο ή Μοναδικό Σειρές; Επιλέξτε Κενές σειρές (όλα τα κελιά είναι κενά). Σούπερ εύρεση και ασαφής εύρεση σε πολλά βιβλία εργασίας. Τυχαία επιλογή ...
  • Ακριβές αντίγραφο Πολλαπλά κελιά χωρίς αλλαγή της αναφοράς τύπου. Αυτόματη δημιουργία αναφορών σε πολλαπλά φύλλα? Εισαγωγή κουκκίδων, Πλαίσια ελέγχου και άλλα ...
  • Εξαγωγή κειμένου, Προσθήκη κειμένου, Κατάργηση κατά θέση, Αφαιρέστε το διάστημα; Δημιουργία και εκτύπωση υποσύνολων σελιδοποίησης. Μετατροπή περιεχομένου και σχολίων μεταξύ κελιών...
  • Σούπερ φίλτρο (αποθηκεύστε και εφαρμόστε σχήματα φίλτρων σε άλλα φύλλα). Προηγμένη ταξινόμηση ανά μήνα / εβδομάδα / ημέρα, συχνότητα και άλλα. Ειδικό φίλτρο με έντονη, πλάγια ...
  • Συνδυάστε βιβλία εργασίας και φύλλα εργασίας; Συγχώνευση πινάκων βάσει βασικών στηλών. Διαχωρίστε τα δεδομένα σε πολλά φύλλα; Μαζική μετατροπή xls, xlsx και PDF...
  • Περισσότερα από 300 ισχυρά χαρακτηριστικά. Υποστηρίζει Office / Excel 2007-2021 και 365. Υποστηρίζει όλες τις γλώσσες. Εύκολη ανάπτυξη στην επιχείρηση ή τον οργανισμό σας. Πλήρεις δυνατότητες δωρεάν δοκιμής 30 ημερών. Εγγύηση επιστροφής χρημάτων 60 ημερών.
kte καρτέλα 201905

Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
κάτω μέρος γραφείου
Σχόλια (18)
Βαθμολογήθηκε το 5 από το 5 · αξιολογήσεις 1
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια, τι θα λέγατε αν θέλετε να εκτελέσετε μια μακροεντολή που βασίζεται σε δύο κελιά; Το ένα κελί βασίζεται σε κείμενο και το άλλο κελί έχει αριθμητικές τιμές; Στη συνέχεια, θα θέλατε να καλέσετε μια μακροεντολή εάν τα δύο κελιά δείχνουν ακριβώς αυτό που θέλετε, όπως "ΝΑΙ" για το πρώτο κελί και 1 για το δεύτερο κελί, εάν όχι, ένα αναδυόμενο πλαίσιο θα εμφανιζόταν λέγοντας "Δεν βρέθηκε".
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Απαίτηση:
Με βάση την επιλογή
Θα υπάρχει μια αναπτυσσόμενη λίστα για να ακολουθήσετε τρεις ιδιότητες της ίδιας διάστασης όπως παρακάτω.
Και θα υπάρχουν τρία παράγωγα κύτταρα που θα προέρχονται από τα κύτταρα (G46, G47 και G48)

Σενάριο:
Εάν επιλέξω μια τιμή από την αναπτυσσόμενη λίστα του κέντρου κόστους , το κελί που προέρχεται από το κέντρο κόστους (K46) θα πρέπει να συμπληρωθεί με την τιμή που έχει επιλεγεί από την αναπτυσσόμενη λίστα κέντρου κόστους (H46) και τα άλλα δύο παράγωγα κελιά (K47 και k48) θα πρέπει να είναι κενά.

Ομοίως, εάν επιλέξω τιμή από την αναπτυσσόμενη λίστα Διαχείριση προϋπολογισμού, το κελί που προέρχεται από τον Διαχειριστή προϋπολογισμού θα πρέπει να συμπληρωθεί με την τιμή που έχει επιλεγεί από την αναπτυσσόμενη λίστα Διαχείριση προϋπολογισμού (H47) και τα άλλα δύο παράγωγα κελιά (K45 και k48) θα πρέπει να είναι κενά.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Δουλεύω με ανάλυση αποτελεσμάτων. Σε αυτήν την περίπτωση, τα δεδομένα στο excel θα είναι όπως αυτό το Όνομα, το δευτερεύον όνομα , το Crade. Τώρα, θέλω να βρω τους αριθμούς όλων των επιτυχιών ή επιτυχών υποψηφίων από το αποτέλεσμα. Πώς μπορώ να το αποκτήσω. Επειδή, έχω 6 διαφορετικά θέματα και τα αποτελέσματά τους σε ένα φύλλο excel. Εάν ο μαθητής αποτύχει σε ένα μάθημα δεν είναι επιτυχημένος μαθητής. Πώς να αφαιρέσετε το όνομά τους σε όλα τα θέματα.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Διορθώστε τον κωδικό και για το ίδιο φύλλο εργασίας.
ΠΡΩΤΟΣ ΚΩΔΙΚΟΣ ΛΕΙΤΟΥΡΓΕΙ ΤΕΛΕΙΑ
Προσωπικό φύλλο εργασίας Sub_change (ByVal Target As Range)
If Not Intersect(Target, Range("D1")) Is Nothing then
Επιλέξτε εύρος πεζών ("D1")
Περίπτωση «0.5»: Μισό
Περίπτωση «1»: Μία
Περίπτωση "1.25": OneTwentyFive
Επιλέξτε Τερματισμός
End If
Sub End

Ο ΔΕΥΤΕΡΟΣ ΚΩΔΙΚΟΣ ΔΕΝ ΛΕΙΤΟΥΡΓΕΙ (διορθώστε το παρακάτω)
Ιδιωτική δευτερεύουσα αλλαγή (ByVal Στόχος ως εύρος)
If Not Intersect(Target, Range("D2")) Is Nothing then
Επιλέξτε εύρος πεζών ("D2")
Υπόθεση «9.53»: εννέα σημεία πέντε τρία
Επιλέξτε Τερματισμός
End If
Sub End
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Olá, quero fazer o seguinte:
Na Celula A1, assim que ela estiver preenchida passe para a celula de baixo, no caso A2.
Eu uso um leitor de codigo de barras para cadastrar produtos, e ele lê os numeros automaticos, ai tenho que ficar apertando ENTER para ir para celula de baixo.

Σας ευχαριστούμε!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Hola, una konsulta, como se haría si por ejemplo dado un numero se pueda ejecutar las dos macros
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σου, Γκουστάβο
Για να λύσετε το πρόβλημά σας, εφαρμόστε τον ακόλουθο κώδικα:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    If Target.Cells.Count > 1 Then Exit Sub
    If IsNumeric(Target) And Target.Address = "$A$1" Then
        If Target.Value > 10 And Target.Value < 50 Then
         macro1
         macro2
        End If
    End If
End Sub

Παρακαλώ δοκιμάστε, ελπίζω ότι μπορεί να σας βοηθήσει!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σας,
je souhaiterais appliquer cette macro à mon κωδικός. Le problème est que la cellule s'incrémente via une toupie et le code ne reconnais pas le changement de valeur de la cellule.
Quand je saisie la valeur manuellement celà fonctionne διόρθωση.

Merci d'Avance
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σου, Gilles,
Θα πρέπει να εισάγετε ένα Κουμπί περιστροφής (Control ActiveX) πρώτα, και μετά κάντε δεξί κλικ, επιλέξτε Προβολή κωδικού, στη συνέχεια, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα ανάμεσα στα υπάρχοντα σενάρια,
Dim xWSh As Worksheet
Dim xOL As OLEObject
Dim xRg As Range
Set xWSh = Application.ActiveSheet
Set xOL = xWSh.OLEObjects("SpinButton1") 'The name of the spin button
Set xRg = xWSh.Range(xOL.LinkedCell)
If IsNumeric(xRg) And xRg.Address = "$A$1" Then
        Select Case xRg.Value
        Case 10 To 50: Macro1
        Case Is > 50: Macro2
        End Select
End If

https://www.extendoffice.com/images/stories/comments/comment-skyyang/DOC-RUN-CODE.png

Παρακαλώ δοκιμάστε, ελπίζω ότι μπορεί να σας βοηθήσει!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σας!

Είμαι πολύ νέος στη VBA και δοκίμασα αυτή τη λύση για ένα φύλλο excel που έχω. Βασικά έχω απλώς μια μεγάλη λίστα στο excel, όπου εσείς στη στήλη T θα πρέπει να πληκτρολογήσετε Ναι ή Όχι, και θα ήθελα, εάν πληκτρολογήσετε Ναι, εκτελέστε μια μακροεντολή... Δοκίμασα πολλούς διαφορετικούς τρόπους για να ορίσω το εύρος, αλλά τίποτα δεν λειτουργεί.

Subsheet_change (ByVal target As Range)

Ορισμός στόχου = Εύρος ("T:T")
Αν στόχος.Τιμή = "Ναι" Τότε
Καλέστε το Macro1
End If

Sub End

Επισημαίνω αυτό το πρόβλημα (σφάλμα χρόνου εκτέλεσης- ασυμφωνία τύπου): Αν target.Value = "Yes" Τότε

Μπορεί κανείς να βοηθήσει;

Με εκτίμηση, Ισαβέλλα
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σου, Westergaard
Ίσως ο ακόλουθος κώδικας VBA μπορεί να σας βοηθήσει: (Σημείωση: Αλλάξτε το όνομα του Μακροεντολή1 στο δικό σας κωδικό όνομα)
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("T:T")) Is Nothing Then
If Target.Value = "Yes" Then
      Call Macro1
    End If
    End If
End Sub

Παρακαλώ δοκιμάστε, ελπίζω ότι μπορεί να σας βοηθήσει!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Ευχαριστώ πολύ! Τώρα λειτουργεί :)
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σας,
Τρόπος τροποποίησης αυτής της βάσης κώδικα στο αποτέλεσμα υπολογισμού του τύπου Α1 του κελιού
Subsheet_Calculate()
Παρακαλώ βοηθήστε

Ιδιωτικό δευτερεύον φύλλο εργασίας_Αλλαγή (ByVal Target As Excel.Range)
Εάν Target.Cells.Count > 1 Στη συνέχεια, πραγματοποιήστε έξοδο από το Sub
Αν IsNumeric(Target) And Target.Address = "$A$1" Τότε
Επιλέξτε Case Target.Value
Περίπτωση 10 έως 50: Macro1
Περίπτωση είναι> 50: Macro2
Επιλέξτε Τερματισμός
End If
Sub End
Βαθμολογήθηκε το 5 από το 5
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σου, FG,
Για να κάνετε τον κώδικα να λειτουργεί σε κελιά τύπου, εφαρμόστε τον παρακάτω κώδικα:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    On Error Resume Next
    If Target.Cells.Count > 1 Then Exit Sub
    If IsNumeric(Target) And Target.Address = "$A$1" Then
        Select Case Target.Value
        Case 10 To 50: macro1
        Case Is > 50: macro2
        End Select
    ElseIf (Not Intersect(Range("$A$1"), Target.Dependents) Is Nothing) Then
        Set Rg = Intersect(Range("$A$1"), Target.Dependents)(1)
        Select Case Rg.Value
        Case 10 To 50: macro1
        Case Is > 50: macro2
        End Select
    End If
End Sub

Παρακαλώ δοκιμάστε, ελπίζω να σας βοηθήσει!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Ciao skyyang. Spero tu possa aiutarmi. Ho un programmino in vba che basandosi su variazioni di prezzo di una cella (E1), collegata in DDE con una piattaforma di trading di borsa, fissa i prezzi: Massimo, Minimo, Apertura, Chiusura, per poi passare alla riga successiva στη βάση α un intervallo temporale impostato all'apertura del foglio elettronico. L'algoritmo da me sviluppato fa si che nelle colonne: "BH" και "BI" vengano visualizzati i prezzi di acquisto e di vendita, ma solo quando soddisfatte le condizioni date, altrimenti le celle non restituiscono nessun valore. Quello di cui avrei bisogno è di un avviso sonoro .wav che mi avvisi quando viene restituito un valore, di acquisto o di vendita, in modo di non dover fissare lo schermo per 14 ore al giorno. Ho provato a inserire un codice "SoundMe()" trovato on-line, ma suona ogni volta che c'è un nuovo massimo o un nuovo minimo nella riga in cui il programma sta aggiornando i prezzi. Το πρόβλημα είναι να λυθεί; Ευχαριστώ για την προσοχή
Stefano
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Καλημέρα,
ho provato il listato che permette di richiamare 2 macro al cambio del valore di una cella, se quel cambio deriva da una funzione "se" non funziona, se digito i valori (vero o falso) funziona.

Come posso ovviare;
Eventualmente come potrei evitare di utilizzare il condizionale sulla cella e far verificare al listato se la cella che deve far avviare le macro è compilata o meno?

grazie
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Καλημέρα,
vorrei eseguire una macro quando una in una cella viene inserito un controllo «εάν» o se viene inserita una data e non un numero.

Ad esempio se nella cella A1 inserisco: If(B2=0;vero;falso) e la macro leggendo vero mi nasconde lo sheet2 altrimenti mi scopre la sheet 2.

Come posso fare;
Riesco a far funzionare il tutto se inserisco in A1 manualmente un valore (in questo caso vero o falso).

Ευχαριστίες
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σου Κάρλο,
Στην πραγματικότητα, ο δεύτερος κώδικας σε αυτό το άρθρο μπορεί να λύσει το πρόβλημά σας.
Note: Απλώς πρέπει να αλλάξετε το κείμενο σε True και False στον κώδικα και να αλλάξετε το κωδικό όνομα σε δικό σας.
Sub worksheet_change(ByVal target As Range)
Set target = Range("A1")
If target.Value = "True" Then
 Call Macro1
End If
If target.Value = "False" Then
Call Macro2
End If
End Sub 


Παρακαλώ δοκιμάστε ξανά, σας ευχαριστώ!
Δεν υπάρχουν σχόλια δημοσιεύτηκε ακόμα
Αφήστε τα σχόλιά σας
Δημοσίευση ως επισκέπτης
×
Αξιολογήστε αυτήν την ανάρτηση:
0   Χαρακτήρες
Προτεινόμενες τοποθεσίες

Ακολουθησε μας

Πνευματικά δικαιώματα © 2009 - www.extendoffice.com. | Ολα τα δικαιώματα διατηρούνται. Τροφοδοτείται από ExtendOffice. | Sitemap
Το Microsoft και το λογότυπο του Office είναι εμπορικά σήματα ή σήματα κατατεθέντα της Microsoft Corporation στις Ηνωμένες Πολιτείες ή / και σε άλλες χώρες.
Προστατεύεται από το Sectigo SSL