Ιδού η λίστα με φωτογραφίες

Άλλη μια λίστα…

Συχνά σε ονομαστικές λίστες που χειρίζομαι προκύπτει η ανάγκη να συμπεριλάβω και φωτογραφίες των αντίστοιχων προσώπων. Κι όταν δουλεύεις κατά κανόνα σε excel1 η ανάγκη αυτή γίνεται συχνά ενόχληση.

Το να αφιερώσεις κάποια στήλη για να ρίξεις πάνω της αρχεία jpeg ως αντικείμενα στο εξελόφυλλο, σου κάνει την κάθε γραμμή τεράστια σε ύψος, όσο μικρή κι αν είναι η φωτογραφία. Και το κυριότερο, δεν έχεις παρά ένα ψεύτικο πεδίο, στην πραγματικότητα η στήλη είναι άδεια από δεδομένα. Ο χειρισμός είναι μπελάς, με την παραμικρή απροσεξία μπορεί να γίνει μπάχαλο.

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

Και κάπου εδώ μπορεί ν’ ακούσεις και τον ξύπνιο της δουλειάς, που θα θυμηθεί να στην πει ότι και καλά τόλεγε αυτός, να δουλεύατε με μια βάση, αφού έχετε την Access, ή, αν είναι πιο πιτσιρικάς, να μιλάει για MySQL. Δεν έχει κανένα νόημα να πιάσεις κουβέντα ότι δεν φτιάχνεις μπαζούκας για κουνούπια, ούτε βάση για δεδομένα που δεν φωνάζουν για κανονικοποίηση, αλλά, αντίθετα, για υπολογισμούς επί υπολογισμών.

Η λύση, λοιπόν, που ακολουθώ χρόνια, είναι να βάζω τις φωτογραφίες ως υπόβαθρο σε άδεια σχόλια, πάνω στα κελιά μιας υπάρχουσας στήλης -συνήθως, αλλά όχι απαραίτητα, «κλειδιού».

Πάρε τη λίστα σου…

Μαζεύω τα αρχεία των φωτογραφιών σε ένα φάκελλο, πες στον c:\pics. Τις φέρνω σε κοινό μέγεθος, πες 160×200 pixel. Τις μετονομάζω2 βάσει κάποιας απαρίθμησης, συμβατής με την αρίθμηση των γραμμών στο εξελόφυλλο, π.χ., photo1, photo2, κλπ.

Ας υποθέσουμε 700 γραμμές -από την 2 ως την 701- με τις εγγραφές της λίστας, και έστω A η στήλη όπου θα βάλω τα σχόλια-φωτογραφίες -απ’ το A2 ως το A701). Στο εξελόφυλλο φτιάχνω (κοπιάρω κι αλλάζω από προγενέστερο φύλλο) τη μακροεντολή:

Sub getpics()
' getpics Macro

Dim i As Long
For i = 2 To 701
  With Range("A" & i)
    .AddComment
    .Comment.Shape.Width = 160
    .Comment.Shape.Height = 200
    .Comment.Shape.Fill.UserPicture "C:\pics\photo" & i - 1 & ".jpg";
  End With
Next i

End Sub

Τρέχω τη μακροεντολή και τέλειωσα. Όποτε περνάω το ποντίκι απ’ το σημάδι του σχολίου, βλέπω τη φωτογραφία που ψάχνω. Αντιγραφή και μετακίνηση των κελιών, μεταφέρουν μαζί και τα σχόλια-φωτογραφίες. Το αρχείο σου μεγάλωσε, έχει μέσα και τις φωτογραφίες-σχόλια· δεν χρειάζεσαι πια το C:\pics.

Περιμένω πότε θα παίρνουν ως υπόβαθρο αρχείο εικόνας τα σχόλια στο Google Spreadsheet -μάλλον ποτέ.

 
1 καλό το ΕΛ/ΛΑΚ εκεί που πράγματι είναι, το calc δεν πιάνει μία για σοβαρή δουλειά, κι ας μη μιλήσουμε για αισθητική…
2 δεκάδες τρόποι για μαζική μετονομασία αρχείων. Τσίμπα έναν με το ant.

Συντάκτης: Stazybο Hοrn

I am what I publish; so you are to me.

5 thoughts on “Ιδού η λίστα με φωτογραφίες”

  1. Εχμ, ναι αλλά τίποτα δεν σε εμποδίζει να χρησιμοποιήσεις την access για να φτιάξεις μια φόρμα της προκοπής, έχοντας το εξελόφυλλο σαν συνδεδεμένο πίνακα.

    Μου αρέσει!

    1. Εμένα ναι, αλλά μπορώ να θυμηθώ, π.χ., ότι η ακαδημαϊκή-οικιακή έκδοση του όφι δεν περιλαμβάνει άξες. Και η εισαγωγή δεν είναι το κυριότερο ζήτημα…

      Μου αρέσει!

  2. Ωραία λύση και πολύ βολικό αυτό το onHover.

    Συμφωνώ απόλυτα για το calc…Aν δεν το έχεις δεί, ρίξε μια ματιά στο gnumeric (όσο αφορά τη σοβαρή δουλειά, παρ’ όλα αυτά χάλια γραφικά :-( ). http://projects.gnome.org/gnumeric/

    Oύτε και με το gnumeric θα μπορούσες να αναπαράγεις ακριβώς το ίδιο αποτέλεσμα βέβαια.
    (Μόνο σαν hyperlink (τύπου external file) το οποίο θα προσπαθούσε να το ανοίξει με το application που έχει αντιστοιχηθεί απο το λειτουργικό)

    Μου αρέσει!

Τι είπες;

Εισάγετε τα παρακάτω στοιχεία ή επιλέξτε ένα εικονίδιο για να συνδεθείτε:

Λογότυπο WordPress.com

Σχολιάζετε χρησιμοποιώντας τον λογαριασμό WordPress.com. Αποσύνδεση / Αλλαγή )

Φωτογραφία Twitter

Σχολιάζετε χρησιμοποιώντας τον λογαριασμό Twitter. Αποσύνδεση / Αλλαγή )

Φωτογραφία Facebook

Σχολιάζετε χρησιμοποιώντας τον λογαριασμό Facebook. Αποσύνδεση / Αλλαγή )

Φωτογραφία Google+

Σχολιάζετε χρησιμοποιώντας τον λογαριασμό Google+. Αποσύνδεση / Αλλαγή )

Σύνδεση με %s