Πώς να δημιουργήσετε ένα από τα δύο περιεχόμενα κελιών στο Excel
Το Excel προσφέρει τη δυνατότητα σύνοψης κελιών. Με τη συνάρτηση FORMAT - CELLS - ALIGNMENT - COBB CELLS, μπορείτε να συνδυάσετε δύο κελιά σε μία μονάδα. Τι κάνετε όμως όταν υπάρχει περιεχόμενο και στα δύο κελιά που δεν θέλετε να χάσετε; Χρησιμοποιήστε το VBA για να λύσετε το πρόβλημα.
Το παράδειγμα στο παρακάτω σχήμα δείχνει μια σύντομη λίστα με τα ονόματα:
Θέλετε να συνδυάσετε τα δύο περιεχόμενα από τις στήλες Α και Β στην πρώτη στήλη Α και, στη συνέχεια, να συνδυάσετε τα δύο κελιά από τις στήλες Α και Β σε ένα κελί. Η ακόλουθη μακροεντολή κάνει αυτήν τη δουλειά:
Συγχώνευση υποκυττάρων ()
Dim line ως ακέραιος
Σειρά = 1
Ενώ όχι (IsEmpty (Κελιά (γραμμή, 1)))
Κελιά (σειρά, 1) = Κελιά (σειρά, 1) & "" & Κελιά (σειρά, 2)
Κελιά (γραμμή, 2). ClearContent
Εύρος (Κελιά (σειρά, 1), Κελιά (σειρά, 2)). Συγχώνευση
Γραμμή = γραμμή + 1
Διευθύνω
Στήλες (1) .AutoFit
Τέλος υπο
Η μακροεντολή εκτελείται από τις γραμμές από τη γραμμή 1 έως ότου η στήλη Α είναι κενή. Για κάθε μη κενό περιεχόμενο, τα περιεχόμενα των Α και Β συνδέονται μεταξύ τους (χωρίζονται με κενό). Στη συνέχεια, τα δύο κελιά Α και Β συνδέονται για να σχηματίσουν ένα κελί. Το παρακάτω σχήμα δείχνει το αποτέλεσμα:
