[VBA] Αντιγραφή κελιού σε άλλο φύλλο υπό προϋπόθεση

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

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

Στο Sheet!2D2, βάλε αυτόν τον τύπο.

=IF(A2=Sheet1!$G$1;COUNT(D$1:D1)+1;"")

Αντέγραψε, προς τα κάτω.

Στο Ε2, Βάλε αυτόν τον τύπο

=MAX(D:D)

Στο Sheet1!A1,βάλε αυτόν τον τύπο και αντέγραψε προς τα κάτω και προς δεξιά.

=IF(ROWS($A$1:$A1)>Sheet2!$E$2;"";INDEX(Sheet2!A:A;MATCH(ROWS($A$1:$A1);Sheet2!$D:$D)))

Νομίζω, πως έγινε.

[jose]

καλησπέρα Λευτέρη ,

μιά χαρά "δουλεύει"

σε ευχαριστώ για την άμεση ανταπόκριση

[dikatsu]

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

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

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

Στο Sheet!2D2, βάλε αυτόν τον τύπο.

=IF(A2=Sheet1!$G$1;COUNT(D$1:D1)+1;"")

Αντέγραψε, προς τα κάτω.

Στο Ε2, Βάλε αυτόν τον τύπο

=MAX(D:D)

Στο Sheet1!A1,βάλε αυτόν τον τύπο και αντέγραψε προς τα κάτω και προς δεξιά.

=IF(ROWS($A$1:$A1)>Sheet2!$E$2;"";INDEX(Sheet2!A:A;MATCH(ROWS($A$1:$A1);Sheet2!$D:$D)))

Νομίζω, πως έγινε.

Καλημέρα αγαπητές Λευτέρη. Θα χρειαστώ την βοήθεια σου.Έχω φτιάξει ένα excel με 5.000 διαφορετικά κελιά. Και θέλω από το κελί C να αντιγραφούν στο κελί D. Υπάρχει κάποιος τρόπος? Σε ευχαριστώ πολύ εκ των προτέρων. Σου στέλνω ένα συνημμένο για να δεις :). Μαζί με την αντιγραφή θέλω όμως να αντιγράφετε και η συνάρτηση.