Μετάβαση στο κύριο περιεχόμενο

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

Είναι εύκολο για εμάς να εισαγάγουμε μία εικόνα στο Excel, αλλά αν πρέπει να εισαγάγετε πολλές εικόνες ταυτόχρονα ώστε να εξοικονομήσετε πολύ χρόνο, πώς θα μπορούσατε να το κάνετε;


Εισαγάγετε πολλές εικόνες και αλλάξτε το μέγεθός τους μαζικά με τη λειτουργία Εισαγωγή εικόνας

Μπορούμε να εισαγάγουμε πολλές εικόνες μαζικά από τη δυνατότητα (Εισαγωγή) εικόνας στο Excel και, στη συνέχεια, να αλλάξουμε το μέγεθος ταυτόχρονα Κάντε τα εξής:

1. Στο φύλλο εργασίας, κάντε κλικ στο Κύριο θέμα > Εικόνα.

2. Στο παράθυρο διαλόγου Εισαγωγή εικόνας, ανοίξτε το φάκελο που περιέχει εικόνες που θα εισαγάγετε, επιλέξτε πολλές εικόνες όπως χρειάζεστε και κάντε κλικ στο Κύριο θέμα κουμπί. Δείτε το στιγμιότυπο οθόνης:
Note: Κράτημα Ctrl κλειδί, μπορείτε να επιλέξετε πολλές μη γειτονικές εικόνες κάνοντας κλικ σε αυτές μία προς μία. κράτημα αλλαγή κλειδί, μπορείτε να επιλέξετε πολλές παρακείμενες εικόνες κάνοντας κλικ στην πρώτη και την τελευταία.

Τώρα οι εικόνες εισάγονται μαζικά και στοιβάζονται στο φύλλο εργασίας.

3. Διατηρήστε αυτές τις εικόνες επιλεγμένες και αλλάξτε το μέγεθος μαζικά εισάγοντας νέο αριθμό και στις δύο Πλάτος και Ύψος κουτιά στο Μέγεθος ομάδα για το Μορφή αυτί. Δείτε το στιγμιότυπο οθόνης:

Τώρα όλες οι εικόνες που έχουν εισαχθεί αλλάζουν ταυτόχρονα στο ίδιο μέγεθος ταυτόχρονα.

4. Προς το παρόν πρέπει να μετακινήσετε χειροκίνητα κάθε εικόνα ξεχωριστά σε κατάλληλο μέρος.

Note: Εάν υπάρχουν δεκάδες εικόνες στοίβαξης, θα είναι πολύ χρονοβόρο να τις μετακινήσετε χειροκίνητα σε μέρη.

Μαζική εισαγωγή πολλαπλών εικόνων που ταιριάζουν με τα περιεχόμενα κελιού στο Excel

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


Εισαγωγή αντιστοίχισης φωτογραφιών 01

Kutools για Excel - Supercharge Excel με πάνω από 300 βασικά εργαλεία. Απολαύστε μια ΔΩΡΕΑΝ δοκιμή 30 ημερών με πλήρεις δυνατότητες χωρίς να απαιτείται πιστωτική κάρτα! Παρ'το Τώρα

Εισαγάγετε πολλές εικόνες και αλλάξτε το μέγεθος μαζικά με το OneNote

Για να αποφύγετε τη μετακίνηση στοίβας εικόνων μία προς μία, αυτή η μέθοδος εισάγει ένα άλλο κόλπο για την εισαγωγή πολλαπλών εικόνων με τη βοήθεια του OneNote. Κάντε τα εξής:

1. Εκκινήστε το OneNote και δημιουργήστε μια νέα σελίδα. Και μετά κάντε κλικ Κύριο θέμα > Εικόνα.

2. Στο παράθυρο διαλόγου Εισαγωγή εικόνας, ανοίξτε το φάκελο που περιέχει εικόνες που θα εισαγάγετε, επιλέξτε πολλές εικόνες όπως χρειάζεστε και κάντε κλικ στο Κύριο θέμα κουμπί. Δείτε το στιγμιότυπο οθόνης:
Note: Κράτημα Ctrl κλειδί, μπορείτε να επιλέξετε πολλές μη γειτονικές εικόνες κάνοντας κλικ σε αυτές μία προς μία. κράτημα αλλαγή κλειδί, μπορείτε να επιλέξετε πολλές παρακείμενες εικόνες κάνοντας κλικ στην πρώτη και την τελευταία.

doc εισάγετε πολλές εικόνες OneNote 032

3. Τύπος Ctrl + A για να επιλέξετε όλες τις εισηγμένες εικόνες στο OneNote και, στη συνέχεια, πατήστε Ctrl + C κλειδιά για να τα αντιγράψετε.

4. Μεταβείτε στο φύλλο εργασίας στο Excel και πατήστε Ctrl + V πλήκτρα για να επικολλήσετε τις εικόνες στο φύλλο εργασίας. Τώρα όλες οι εικόνες επικολλούνται κάθετα όπως φαίνεται στο αριστερό στιγμιότυπο οθόνης.

5. Επιλέξτε οποιαδήποτε από τις εικόνες και πατήστε Ctrl + A για να επιλέξετε όλα αυτά. Στη συνέχεια, αλλάξτε το μέγεθος των φωτογραφιών μαζικά εισάγοντας νέους αριθμούς και στα δύο Πλάτος και Ύψος κουτιά στο Μέγεθος ομάδα για το Μορφή αυτί. Δείτε το στιγμιότυπο οθόνης:

Τώρα όλες οι καθορισμένες εικόνες εισάγονται στο Excel και αλλάζουν μέγεθος στο ίδιο μέγεθος μαζικά.


Εισαγάγετε πολλές εικόνες στο Excel με κωδικό VBA

Με τον ακόλουθο κώδικα VBA, μπορείτε να εισαγάγετε πολλές εικόνες στο κελί αρχείων Excel ανά κελί.

1. Επιλέξτε το πρώτο κελί της περιοχής προορισμού που θέλετε να εισαγάγετε εικόνες.

2. Κρατήστε πατημένο το ALT + F11 και ανοίγει το Microsoft Visual Basic για εφαρμογές παράθυρο.

3. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε την ακόλουθη μακροεντολή στο Παράθυρο ενότητας.

Sub InsertPictures()
'Update 20140513
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub

4. Στη συνέχεια πατήστε το F5 κλειδί για την εκτέλεση αυτού του κώδικα.

5. Στο παράθυρο διαλόγου Άνοιγμα, ανοίξτε το φάκελο που περιέχει τις εικόνες που θέλετε να εισαγάγετε, επιλέξτε πολλές εικόνες που θα εισαγάγετε και κάντε κλικ στο Ανοικτό κουμπί. Και όλες οι επιλεγμένες εικόνες έχουν εισαχθεί στην επιλογή σας με βάση το μέγεθος του κελιού. Δείτε το στιγμιότυπο οθόνης:


Εισαγάγετε πολλές εικόνες και προσαρμόστε τις αυτόματα με το Kutools για Excel

Kutools για Excel'S Εισαγωγή εικόνων Το βοηθητικό πρόγραμμα μπορεί να σας βοηθήσει να εισαγάγετε γρήγορα πολλές εικόνες στο Excel με βάση το μέγεθος του κελιού ή το μέγεθος της εικόνας. Μπορείτε επίσης να καθορίσετε το ύψος και το πλάτος των εικόνων όπως χρειάζεστε.

Kutools για Excel - Supercharge Excel με πάνω από 300 βασικά εργαλεία. Απολαύστε μια ΔΩΡΕΑΝ δοκιμή 30 ημερών με πλήρεις δυνατότητες χωρίς να απαιτείται πιστωτική κάρτα! Παρ'το Τώρα

1. Κλίκ Kutools Plus > Εισαγωγή εξαγωγή > Εισαγωγή εικόνων, δείτε το στιγμιότυπο οθόνης:

2. Στην Εισαγωγή εικόνων πλαίσιο διαλόγου, κάντε τα εξής:
(1) Καθορίστε τη σειρά εμφάνισης των εικόνων από το Εισαγωγή παραγγελίας αναπτυσσόμενη λίστα, μπορείτε να επιλέξετε Γεμίστε κάθετα κελί μετά κελί or Γεμίστε οριζόντια κελί μετά κελί.
(2) Κάντε κλικ Πρόσθεση για να επιλέξετε τα αρχεία εικόνας ή το φάκελο για να προσθέσετε τις εικόνες στη λίστα εικόνων. Και όλες οι επιλεγμένες φωτογραφίες σας θα εμφανίζονται στο πλαίσιο λίστας.
(3) Κάντε κλικ στο Μέγεθος εισαγωγής κουμπί;

3. Τώρα στο Εισαγωγή μεγέθους εικόνας διαλόγου, μπορείτε να επιλέξετε το μέγεθος της εικόνας που ταιριάζει στις ανάγκες σας. Δείτε το στιγμιότυπο οθόνης:

4. Αφού καθορίσετε το μέγεθος της εικόνας, κάντε κλικ OK για να κλείσετε αυτό το παράθυρο διαλόγου και να επιστρέψετε στο Εισαγωγή εικόνων κάντε κλικ στο πλαίσιο διαλόγου εισαγωγή για να εισαγάγετε τις εικόνες.

5. Στο νέο παράθυρο διαλόγου Εισαγωγή εικόνων, επιλέξτε το πρώτο κελί της περιοχής προορισμού που θα εισαγάγετε εικόνες και κάντε κλικ στο OK κουμπί.

Προς το παρόν, όλες οι επιλεγμένες εικόνες σας έχουν εισαχθεί στα κελιά σας από το ενεργό κελί κάθετα ή οριζόντια. Δείτε το σωστό στιγμιότυπο οθόνης:

Η Εισαγωγή εικόνων Η δυνατότητα του Kutools για Excel έχει σχεδιαστεί για να εισάγει μια παρτίδα εικόνων ταυτόχρονα με αντίστοιχο μέγεθος κελιού, καθορισμένο μέγεθος ή μεγέθη εικόνων στο Excel. Κάντε μια δωρεάν δοκιμή!


Εισαγάγετε πολλές εικόνες που ταιριάζουν με τα ονόματά τους με το Kutools για Excel

Το Kutools για Excel υποστηρίζει επίσης μια δραματική Ταίριασμα εικόνων εισαγωγής δυνατότητα για αντιστοίχιση εικόνων και περιεχομένων κελιού και εισαγωγή ταιριασμένων εικόνων μόνο χύμα στο Excel.

Kutools για Excel - Supercharge Excel με πάνω από 300 βασικά εργαλεία. Απολαύστε μια ΔΩΡΕΑΝ δοκιμή 30 ημερών με πλήρεις δυνατότητες χωρίς να απαιτείται πιστωτική κάρτα! Παρ'το Τώρα

1. Επιλέξτε τα κελιά με το όνομα της εικόνας που θέλετε να εισαγάγετε τις αντίστοιχες εικόνες τους και κάντε κλικ στο Kutools Plus > Εισαγωγή εξαγωγή > Ταίριασμα εικόνων εισαγωγής. δείτε το στιγμιότυπο οθόνης:

2. Στο αναδυόμενο παράθυρο διαλόγου Match Import Pictures, κάντε τα εξής:
(1) Καθορίστε τη σειρά εμφάνισης των εικόνων από το Εισαγωγή παραγγελίας αναπτυσσόμενη λίστα
(2) Κάντε κλικ Πρόσθεση κουμπί για να προσθέσετε τις εικόνες στο πλαίσιο λίστας εικόνων. Για ενημέρωσή σας, θα εμφανίζονται μόνο οι αντίστοιχες φωτογραφίες.
(3) Στη συνέχεια κάντε κλικ Μέγεθος εισαγωγής κουμπί.

3. Τώρα στο Εισαγωγή μεγέθους εικόνας διαλόγου, μπορείτε να επιλέξετε το μέγεθος της εικόνας που ταιριάζει στις ανάγκες σας και να κάνετε κλικ στο Ok κουμπί. Δείτε το στιγμιότυπο οθόνης:

4. Τώρα επιστρέφετε στο Εισαγωγή εικόνων κάντε κλικ στο πλαίσιο διαλόγου εισαγωγή για να εισαγάγετε τις εικόνες.

5. Στο αναδυόμενο παράθυρο διαλόγου Match Import Pictures, προσδιορίστε το πρώτο κελί του εύρους προορισμού που θα εισαγάγετε εικόνες και κάντε κλικ στο OK κουμπί. Δείτε το στιγμιότυπο οθόνης:

Μέχρι στιγμής, όλες οι εικόνες έχουν εισαχθεί στα κελιά με βάση τα σχετικά ονόματά τους. Δείτε το σωστό στιγμιότυπο οθόνης:

Η Ταίριασμα εικόνων εισαγωγής Η δυνατότητα Kutools για Excel μπορεί να βοηθήσει τους χρήστες του Excel να φιλτράρουν γρήγορα εικόνες με βάση τις τιμές των κυττάρων και στη συνέχεια να εισάγουν αυτές τις εικόνες μαζικά. Επιπλέον, αυτές οι αντιστοιχισμένες εικόνες μπορούν να αλλάξουν το μέγεθος στο καθορισμένο μέγεθος ή το μέγεθος του κελιού αυτόματα. Κάντε μια δωρεάν δοκιμή!


Επίδειξη: Εισαγάγετε πολλές εικόνες και αλλάξτε το μέγεθος ταυτόχρονα στο Excel

Kutools για Excel περιλαμβάνει περισσότερα από 300 εύχρηστα εργαλεία για το Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες. Δωρεάν δοκιμή τώρα!      Αγοράστε τώρα!


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

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

🤖 Kutools AI Aide: Επανάσταση στην ανάλυση δεδομένων με βάση: Ευφυής Εκτέλεση   |  Δημιουργία κώδικα  |  Δημιουργία προσαρμοσμένων τύπων  |  Αναλύστε δεδομένα και δημιουργήστε γραφήματα  |  Επίκληση Λειτουργιών Kutools...
Δημοφιλή χαρακτηριστικά: Εύρεση, επισήμανση ή αναγνώριση διπλότυπων   |  Διαγραφή κενών γραμμών   |  Συνδυάστε στήλες ή κελιά χωρίς απώλεια δεδομένων   |   Γύρος χωρίς φόρμουλα ...
Σούπερ Αναζήτηση: VLookup πολλαπλών κριτηρίων    VLookup πολλαπλών τιμών  |   VLookup σε πολλά φύλλα   |   Ασαφής αναζήτηση ....
Σύνθετη αναπτυσσόμενη λίστα: Γρήγορη δημιουργία αναπτυσσόμενης λίστας   |  Εξαρτημένη αναπτυσσόμενη λίστα   |  Πολλαπλή αναπτυσσόμενη λίστα ....
Διαχειριστής στήλης: Προσθέστε έναν συγκεκριμένο αριθμό στηλών  |  Μετακίνηση στηλών  |  Εναλλαγή κατάστασης ορατότητας κρυφών στηλών  |  Συγκρίνετε εύρη και στήλες ...
Επιλεγμένα Χαρακτηριστικά: Εστίαση πλέγματος   |  Προβολή σχεδίου   |   Μεγάλη Formula Bar    Διαχείριση βιβλίου εργασίας & φύλλου   |  Βιβλιοθήκη πόρων (Αυτόματο κείμενο)   |  Επιλογή ημερομηνίας   |  Συνδυάστε φύλλα εργασίας   |  Κρυπτογράφηση/Αποκρυπτογράφηση κελιών    Αποστολή email ανά λίστα   |  Σούπερ φίλτρο   |   Ειδικό φίλτρο (φίλτρο με έντονη γραφή/πλάγια γραφή/διαγραφή...) ...
Κορυφαία 15 σύνολα εργαλείων12 Κείμενο Εργαλεία (Προσθήκη κειμένου, Κατάργηση χαρακτήρων, ...)   |   50 + Διάγραμμα Τύποι (Gantt διάγραμμα, ...)   |   40+ Πρακτικό ΜΑΘΗΜΑΤΙΚΟΙ τυποι (Υπολογίστε την ηλικία με βάση τα γενέθλια, ...)   |   19 Εισαγωγή Εργαλεία (Εισαγωγή κωδικού QR, Εισαγωγή εικόνας από το μονοπάτι, ...)   |   12 Μετατροπή Εργαλεία (Αριθμοί σε λέξεις, Μετατροπή Συναλλάγματος, ...)   |   7 Συγχώνευση & διαχωρισμός Εργαλεία (Σύνθετες σειρές συνδυασμού, Διαίρεση κελιών, ...)   |   ... κι αλλα

Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου.  Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...

Περιγραφή


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

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
Comments (47)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hello community,

Thank you very much - this is a great tool!
But for my request, I should keep the sizes of the images, which are different. Is there any way to keep the format of the images but keep the functions with this code?

Many thanks in advance.
Elias
This comment was minimized by the moderator on the site
Respected sir, i want to One image paste on specific cell more than one in a time.
This comment was minimized by the moderator on the site
Hello, Sarfraz

If you want to insert one image into multiple cells, you just need to insert one image and resize it, and then copy and paste it to the other cells as you need.

Thank you!
This comment was minimized by the moderator on the site
mình cảm ơn vì bài viết. mình có làm danh sách sản phẩm hàng hóa mất rất nhiều thời gian nhưng chợt thấy chenanhexcel.com có bán add-in thì công việc của mình dễ dàng hơn nhiều.
This comment was minimized by the moderator on the site
Hi, i have 10 images i want to insert all 10 inside ONE CELL in excel. is this possible and if so pls help me out with some code pls...
This comment was minimized by the moderator on the site
Hi Vind,
First, adjust the cell and make it big enough to contain the 10 images.
Then Click Insert > Picture to open the Insert Picture dialog. In the dialog, select the 10 images together (if they are in the same folder), and click the OK button.
Now all images are inserted. If necessary, resize them simultaneously in the Size group on the Picture Format tab.
These images are inserted in the diagonal line of the cell as attached picture, and you need to adjust their positions manually.
This comment was minimized by the moderator on the site
I am using the following code, which came from Funzone, to add my photos but i need to be able to skip a column, leaving a blank column between photos, can someone help?

Sub InsertPictures()
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)

xColIndex = Application.ActiveCell.Column
xRowIndex = Application.ActiveCell.Row

If IsArray(PicList) Then

For lLoop = LBound(PicList) To UBound(PicList)
Set Rng = Cells(xRowIndex, xColIndex)
Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
xColIndex = xColIndex + 1
If xColIndex = 4 Then GoTo Continue1 Else GoTo Continue2

Continue1:
xRowIndex = xRowIndex + 2
xColIndex = xColIndex - 3

Continue2:
Next
End If
End Sub
This comment was minimized by the moderator on the site
I was finally able to figure it out on my own.

The code below will insert 3 pictures horizontally in the columns then move down a row and insert 3 more horizontally it will repeat this process until it runs out of the selected pictures.



Sub InsertPictures()
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)

xColIndex = Application.ActiveCell.Column
xRowIndex = Application.ActiveCell.Row

If IsArray(PicList) Then

For lLoop = LBound(PicList) To UBound(PicList)
Set Rng = Cells(xRowIndex, xColIndex)
Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
xColIndex = xColIndex + 1
If xColIndex = 4 Then GoTo Continue1 Else GoTo Continue2

Continue1:
xRowIndex = xRowIndex + 1
xColIndex = xColIndex - 3

Continue2:
Next
End If
End Sub
This comment was minimized by the moderator on the site
I would really like to use this VBA code to fill an array of cells with picture like 5 across then move to next row and 5 across until you run out of selected pictures but I just can't wrap my head around how to do it. Is this at all possible?


If you know how to do this please post the code. Thank you In advance!

Similar to https://www.extendoffice.com/documents/excel/3360-excel-transpose-every-5-rows.html
except by selecting pictures and pasting the output in an array.
This comment was minimized by the moderator on the site
I would really like to use this VBA code to fill an array of cells with picture like 5 across then move to next row and 5 across until you run out of selected pictures but I just can't wrap my head around how to do it. Is this at all possible?

Similar to https://www.extendoffice.com/documents/excel/3360-excel-transpose-every-5-rows.html
except by selecting pictures and pasting the output in an array
This comment was minimized by the moderator on the site
les agradezco mucho realmente ayudan muchisimo con el trabajo y el tiempo. Me sirvio perfecto para un inventario con fotos.
reitero mi agradecimiento
This comment was minimized by the moderator on the site
Tried this code and in all honesty is amazing and fast, however is there any chance of amending this to make it resize the pictures to a custom size.
I cannot seem to get my head around it.
Thanks
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations