Πώς να ελέγξετε εάν ένα κελί περιέχει εικόνα στο Excel;

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

Ελέγξτε εάν ένα κελί περιέχει εικόνα με κωδικό VBA

Ελέγξτε εάν ένα κελί περιέχει εικόνα με κωδικό VBA

Ο παρακάτω κώδικας VBA μπορεί να σας βοηθήσει να ελέγξετε εάν ένα κελί περιέχει μια εικόνα. Κάντε τα εξής:

1. Ανοίξτε το φύλλο εργασίας όπου πρέπει να ελέγξετε εάν υπάρχει μια εικόνα σε ένα συγκεκριμένο κελί και, στη συνέχεια, πατήστε το άλλος + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε κλικ στην επιλογή Κύριο θέμα > Μονάδα μέτρησης. Στη συνέχεια, αντιγράψτε και επικολλήστε τον κώδικα VBA στο παράθυρο Code.

Κωδικός VBA: Ελέγξτε εάν ένα κελί περιέχει εικόνα στο Excel

Sub CellHasPicture()
    Dim xRg As Range
    Dim xShape As Shape
    Dim xFlag As Boolean
    On Error Resume Next
    Set xRg = Application.InputBox("Please enter the cell address:", "KuTools For Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xFlag = False
    For Each xShape In ActiveSheet.Shapes
        If xShape.TopLeftCell.Address = xRg.Address Then
            xFlag = True
        End If
    Next
    If xFlag Then
        MsgBox "Image exists!"
    Else
        MsgBox "Image does not exist"
    End If
End Sub

3. Πάτα το F5 κλειδί για την εκτέλεση του κώδικα. Στο αναδυόμενο Kutools για Excel στο παράθυρο διαλόγου, πληκτρολογήστε τη διεύθυνση του κελιού που θέλετε να ελέγξετε για μια εικόνα και, στη συνέχεια, κάντε κλικ στο OK κουμπί. Δείτε το στιγμιότυπο οθόνης:

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

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

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