Excel - Για όσους θέλουν να ψάξουν παραπέρα ...

[apostolos55]

Θέμα με Sum/Count κλπ όταν προστίθεται γραμμή/στήλη ανάμεσα στο αποτέλεσμα και την πράξη και ...παραμένει εκτός πράξης

 

Λύση:

έστω ότι στο κελί B31 θέλουμε να προσθέσουμε τα κελιά Β5 ως Β30, αντι για το εύκολο και γνωστό

=sum(B5:B30)

γράφουμε

=Sum(B5:offset(B31;-1;0)

και ιδού... τώρα προσθέτωντας γραμμές ακριβώς πάνω από το άθροισμα (ή και οπουδήποτε μέσα) το άθροισμα παραμένει σωστό...

[filanthi]

καλημέρα σας, ειμαι καινούργια στο φορουμ...εχω μια απορία αν μπορείτε να με βοηθήσετε.

Στο ecxell εγραψα μια λιστα ονοματων με ελληνικους χαρακτηρες και κατοπιν ηθελα να τα κανω ταξινομηση. Τα μισα ονοματα τα εκανε ταξινομιση και μετα τα αλλα μισα τα ξαναεκανε ταξινομιση απο το Α-Ω οτι και να εκανα δεν τα καταφερνα και αναγκαστικα να τα κανω χειροκινητα. Σε καθε κελι ξεχωριστα ειχα το επιθετο και το ονομα....τι να εχει γινει μπορειτε να με βοηθησετε? Ευχαριστω...

[Gousgounis]

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

Θα πρέπει να κάνεις μία αντικατάσταση (Ctrl+H) πχ όλα τα Αγγλικά "Ν" με τα Ελληνικά "Ν"

[gmazanakis]

Κατά λάθος έχεις γράψει κάποια αρχικά σε αγγλικά . δοκίμασε να αλλάξεις ένα δύο και να ξανακάνεις ταξινόμηση

 

gousgounis με προλαβες

Edited September 7, 2012 at 11:49 πμ by gmazanakis

[filanthi]

Ναι ειχατε δικιο ευχαριστω....το σκεφτηκα και αλλαξα γραμματοσειρα ....δεν ηταν αυτο ομως επρεπε να τα γραψω απο την αρχη...!!! ευχαριστω πολυ παιδια με βοηθησατε πολυ....

Edited September 18, 2012 at 08:01 μμ by Gousgounis
Μετατροπή απο Κεφαλαία σε πεζά

[Samdreamth]

Για να μην παιδεύεστε με το χέρι, δείτε την παρακάτω συνάρτηση:

 

>
Option Explicit
Function UKtoGRcharacters(TheWord As String)
 
   'Substitutes the english charachters with
   'the corresponding greek ones
 
Dim UKChar() As String
Dim GrChar() As String
Dim i As Integer
  
UKChar() = Split("A a B b E e H h I i K k M m N n O o P p T t Y y", " ")
GrChar() = Split("Α α Β β Ε ε Η η Ι ι Κ κ Μ μ Ν ν Ο ο Ρ ρ Τ τ Υ υ", " ")
 
On Error Resume Next
For i = LBound(UKChar) To UBound(UKChar)
	TheWord = WorksheetFunction.Substitute(TheWord, UKChar(i), GrChar(i))
Next i
 
UKtoGRcharacters = TheWord

End Function

 

Αλλάζει αυτόματα τους όμοιους χαρακτήρες από αγγλικά σε ελληνικά...

Edited September 8, 2012 at 09:15 μμ by Samdreamth

[gvarth]

Καλημέρες !

 

Πολύτιμη η βοήθειά σου φίλε μου .

 

+1 από μένα .

[st2]

εψαψνα να βρω ενα τροπο να φτιαξω μια function για να βγαζει το ελαχιστο (MIN) αλλα να αγνοεί το μηδεν

 

σε εμενα δουλευει αυτό

 

=SMALL(E1:E10;COUNTIF(E1:E10;0)+COUNTIF(E1:E10;"<0")+1)

[Samdreamth]

Ή εναλλακτικά:

 

=IF(SMALL(B1:B7;1)=0;SMALL(B1:B7;2);SMALL(B1:B7;1))

 

Θεωρώντας ότι το range που σε ενδιαφέρει είναι το B1:B7.

Edited September 12, 2012 at 11:22 πμ by Samdreamth

[gvarth]

Εδώ θα βρείτε ένα δωρεάν χρήσιμο πρόσθετο για το Excel , σαν "βοηθό" στην δημιουργία διαγραμμάτων GANTT

 

 

Περισσότερα μπορείτε να διαβάσετε εδώ .