[el-users] Σχετ: Σχετ: [el-users] Συντομεύσεις πλήκτρων

Καλημέρα Μαρία,
Για το τυπικό μέρος: πρέπει κάθε φορά που απαντάς σε μία συζήτηση του forum να επιλέγεις "Απάντηση 
σε όλους" ώστε να δημοσιεύεται η απάντηση και στο forum εκτός από τον αποδέκτη (δηλαδή να το 
στέλνεις οπωσδήποτε και στο users@el.libreoffice.org). 

Για το ουσιαστικό μέρος: Ποιο από τα βήματα δεν μπόρεσες να ολοκληρώσεις;
Νώντας.
 

    Στις 12:55 μ.μ. Κυριακή, 8 Ιανουαρίου 2017, ο/η MarLa <marilazar6@gmail.com> έγραψε:
 

  Αγαπητέ Επαμινόντα, καλημέρα. Σ' ευχαριστώ πάρα πολύ για την αναλυτικότατη απάντησή  σου αλλά 
δυστυχώς ενώ ακολούθησα τη διαδικασία όπως περιγράφεις, δεν κατάφερα να το δω στην πράξη. Είχα μια 
έκδοση, είπα μήπως ήταν παλιά, κατέβασα την 5.2.4 ελληνική, επανέλαβα τη διαδικασία, είχε 
αποθηκευμένες τις μακροεντολές αλλά και πάλι δε δούλεψαν. 
  Τι θα μου πρότεινες; Μαρία
  
 On 8/1/2017 12:39 πμ, Epaminondas Diamantopoulos wrote:
  
     Μπορείς να το πετύχεις με χρήση μακροεντολής την οποία και θα συνδέσεις με κάποιο συνδυασμό 
πλήκτρων. Η σχετική ερώτηση υπάρχει στο αγγλικό forum του LO στη διεύθυνση: Special characters 
[closed] - Ask LibreOffice 
    
|  
|  
|  
|  
  |  
  |

  |

  |
|  
|  
  |  
Special characters [closed] - Ask LibreOffice
 Is it possible for a LibreOffice (I'm using 3.6.0.0. beta2 version now) to configure specified 
special chara...  |  
  |

  |

  |

  
  
  Με απλά λόγια πρέπει να ακολουθήσεις τα εξής βήματα: 
   1. Εργαλεία -> Μακροεντολές -> Οργάνωση μακροεντολών -> Libreoffice basic 
  2. Επιλέγεις "Οι μακροεντολές μου" και μετά "Δημιουργία" και δημιουργείς ένα νέο αρχείο 
μακροεντολών με όνομα MyShortcuts. 
  3. Στο αρχείο Basic που θα ανοίξει (με το ανάλογο περιβάλλον) γράψε τις εξής μακροεντολές: 
  Sub insert_three_dots
     Dim oDoc as variant
     oDoc = ThisComponent
     Dim oCurrentController as variant
     oCurrentController = oDoc.getCurrentController()
     Dim oTextViewCursor as variant
     oTextViewCursor = oCurrentController.getViewCursor()
     Dim oText as variant
     If IsEmpty(oTextViewCursor.Cell) Then
         oText=oTextViewCursor.Text
     Else
         oText=oTextViewCursor.Cell.Text
     End If
     oText.insertString(oTextViewCursor,chr(clng("&H2026")),false)
 End Sub
   
  
  Sub insert_upper_dot
     Dim oDoc as variant
     oDoc = ThisComponent
     Dim oCurrentController as variant
     oCurrentController = oDoc.getCurrentController()
     Dim oTextViewCursor as variant
     oTextViewCursor = oCurrentController.getViewCursor()
     Dim oText as variant
     If IsEmpty(oTextViewCursor.Cell) Then
         oText=oTextViewCursor.Text
     Else
         oText=oTextViewCursor.Cell.Text
     End If
     oText.insertString(oTextViewCursor,chr(clng("&H00B7")),false)
 End Sub
  
   4. Μετά επιλέγεις Εργαλεία -> Προσαρμογή -> Πληκτρολόγιο. 
  
   5. Επιλέγεις από τη λίστα των συντομεύσεων μία που δεν έχει αντίστοιχη προκαθορισμένη ενέργεια 
(π.χ. την Alt + Ο) και μετά επιλέγεις από κάτω Κατηγορία: Μακροεντολές LibreOffice -> user -> 
Standard -> MyShortcuts, Λειτουργία: insert_three_dots και επιλέγεις "Τροποποίηση"
    
   6. Επιλέγεις από τη λίστα των συντομεύσεων μία ακόμα συντόμευση που δεν έχει αντίστοιχη 
προκαθορισμένη ενέργεια (π.χ. την Alt + R) και μετά επιλέγεις από κάτω Κατηγορία: Μακροεντολές 
LibreOffice -> user -> Standard -> MyShortcuts, Λειτουργία: insert_upper_dot και επιλέγεις 
"Τροποποίηση".  
    7. Επιλέγεις "Εντάξει" και χρησιμοποιείς τις νέες συντομεύσεις σε κάθε αρχείο κειμένου ή 
λογιστικό φύλλο. 
  Σημείωση: Οι παραπάνω μακροεντολές είναι σχεδιασμένες να ενεργούν στον κειμενογράφο Writer. Αν 
χρειάζεσαι στο Calc παρόμοια λειτουργικότητα θα πρέπει να βελτιωθούν ώστε να ελέγχουν το είδος της 
εφαρμογής που είναι ανοικτή. 
  Καλή συνέχεια.
   
   
 
         Στις 11:52 μ.μ. Σάββατο, 7 Ιανουαρίου 2017, ο/η MarLa <marilazar6@gmail.com> έγραψε:
  
 
 Αγαπητοί φίλοι, καλή χρονιά σε όλους, με υγεία και υπομονή.
 
 Δυο ερωτήσεις· πώς μπορώ να κάνω συντόμευση πλήκτρων τις τρεις 
 συνεχόμενες τελείες (αποσιωπητικά), για παράδειγμα στο MS Office είναι 
 ctrl+alt+., κι επίσης πώς μπορώ να κάνω συντόμευση πλήκτρων την άνω 
 τελεία, ώστε να αποφεύγω κάθε φορά τη διαδικασία της εισαγωγής συμβόλου.
 
 Σας ευχαριστώ πολύ,
 
 Μαρία
 
 
 -- 
 Maria K. Lazaridou
 Composer-Gutarist
 Music Teacher at Public Education
 Member of the Greek Composers' Union
 
 
 -- 
 Unsubscribe instructions: E-mail to users+unsubscribe@el.libreoffice.org
 Posting guidelines + more: http://wiki.documentfoundation.org/Netiquette
 List archive: http://listarchives.libreoffice.org/el/users/
 All messages sent to this list will be publicly archived and cannot be deleted
 
 
      
 
 -- 
Maria K. Lazaridou
Composer-Gutarist
Music Teacher at Public Education 
Member of the Greek Composers' Union 

   
-- 
Unsubscribe instructions: E-mail to users+unsubscribe@el.libreoffice.org
Posting guidelines + more: http://wiki.documentfoundation.org/Netiquette
List archive: http://listarchives.libreoffice.org/el/users/
All messages sent to this list will be publicly archived and cannot be deleted