Θέμα: VBA Αντιγραφή.

Εμφάνιση ενός μόνο μηνύματος
  #8  
Παλιά 08-09-19, 19:16
Το avatar του χρήστη Spirosgr
Spirosgr Ο χρήστης Spirosgr δεν είναι συνδεδεμένος
Συντονιστής
Όνομα: Σπύρος Τσιλιγιάννης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010, Ms-Office 2013, Ms-Office 2016, Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 22-11-2011
Περιοχή: Αθήνα
Μηνύματα: 2.321
Προεπιλογή

Το αρχικό ζητούμενο, δεν έχει καμία σχέση με το τελευταίο αρχείο.

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

Από την στιγμή που καταργείς τον προορισμό_2, αυτό:
Κώδικας:
If Mtch1 = 0 And Mtch2 = 0 Then
δεν παίζει...
Πρέπει να καταργηθούν και κάποιες άλλες γραμμές και μεταβλητές και να γίνει:
Κώδικας:
If Mtch1 = 0 Then
Αυτό δεν σημαίνει ότι όλα θα πάνε καλά...

Το βιβλίο που ανεβάζω, (Book1) είναι το αρχικό ζητούμενο συν τα αθροίσματα.
Όλα πάνε καλά...

Το βιβλίο σου το τελευταίο, (Book2), με κάποιες διορθώσεις, σε 'μένα δουλεύει.

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

Αν το ζητούμενο από την αρχή ήταν το τελευταίο, θα έγραφα άλλο κώδικα
παρόμοιο μεν αλλά και με κάποιους ελέγχους...αλλάζοντας και το layout.
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsm Book1.xlsm (32,9 KB, 10 εμφανίσεις)
Τύπος Αρχείου: xlsm Book2.xlsm (45,5 KB, 17 εμφανίσεις)
Απάντηση με παράθεση