İçeriğe Yönlendir

Macbook Numbers'da Metin Dikey Yazmak ?


Mustafa Şimşek

Recommended Posts

Mustafa Şimşek

merhaba,

 

apple macbook kullanıcısı varsa,

 

numbers'da metin dikey yazmak nasıl olur ?

 

birkaç arkadaşa sorduk başarılı olamadık, internetten bakındık birşey bulamadık,

 

bilen varsa destek rica edeceğim.

 

 

örnek; (excel'de basit amma mac'de öyle değil maalesef)

 

1zpgnxd.jpg

Yorum bağlantısı
Mustafa Şimşek

yapamadık, pages'daki işlemleri tarif ediyor sanırım...

Yorum bağlantısı
Murat Dere
(düzenlendi)

Şöyle bir şey var, kendin çözecen...  :spiteful:


Birisi de script yazmış bu iş için... Apple'cıların işi harbi zor be! Aahahahahahaaaa...

 

 

on run

  (*

Clear the clipboard *)

  set the clipboard to ""

  (*

Copy the selection in the clipboard *)

          my raccourci("Numbers", "c", "c")

  (*

Loop waiting that the clipboard is really filled *)

          repeat

                    try

                              if (the clipboard as textis not "" then exit repeat

                    on error

                              --

                    end try

          end repeat

  (*

Extract the clipboard's content *)

  the clipboard as text

  (*

Insert return between every characters *)

          my recolle(every character of resultreturn)

  (*

Fill the clipboard with the edited string *)

  set the clipboard to result

  (*

Paste in the cell *)

          my raccourci("Numbers", "v", "cas")

end run

 

--=====

 

on recolle(ld)

          local oTIDst

          set oTIDs to AppleScript's text item delimiters

          set AppleScript's text item delimiters to d

          set t to l as text

          set AppleScript's text item delimiters to oTIDs

          return t

end recolle

 

--=====

 

on activateGUIscripting()

  (* to be sure than GUI scripting will be active *)

          tell application "System Events"

                    if not (UI elements enabledthen set (UI elements enabledto true

          end tell

end activateGUIscripting

 

--=====

(*

==== Uses GUIscripting ====

*)

(*

This handler may be used to 'type' text, invisible characters if the third parameter is an empty string.

It may be used to 'type' keyboard raccourcis if the third parameter describe the required modifier keys.

 

I changed its name « shortcut » to « raccourci » to get rid of a name conflict in Smile.

*)

on raccourci(atd)

          local k

          tell application a to activate

          tell application "System Events" to tell application process a

                    set frontmost to true

                    try

                              t * 1

                              if d is "" then

  key code t

                              else if d is "c" then

  key code t using {command down}

                              else if d is "a" then

  key code t using {option down}

                              else if d is "k" then

  key code t using {control down}

                              else if d is "s" then

  key code t using {shift down}

                              else if d is in {"ac", "ca"} then

  key code t using {command downoption down}

                              else if d is in {"as", "sa"} then

  key code t using {shift downoption down}

                              else if d is in {"sc", "cs"} then

  key code t using {command downshift down}

                              else if d is in {"kc", "ck"} then

  key code t using {command downcontrol down}

                              else if d is in {"ks", "sk"} then

  key code t using {shift downcontrol down}

                              else if (d contains "c") and (d contains "s") and d contains "k" then

  key code t using {command downshift downcontrol down}

                              else if (d contains "c") and (d contains "s") and d contains "a" then

  key code t using {command downshift downoption down}

                              end if

                    on error

                              repeat with k in t

                                        if d is "" then

  keystroke (k as text)

                                        else if d is "c" then

  keystroke (k as textusing {command down}

                                        else if d is "a" then

  keystroke k using {option down}

                                        else if d is "k" then

  keystroke (k as textusing {control down}

                                        else if d is "s" then

  keystroke k using {shift down}

                                        else if d is in {"ac", "ca"} then

  keystroke (k as textusing {command downoption down}

                                        else if d is in {"as", "sa"} then

  keystroke (k as textusing {shift downoption down}

                                        else if d is in {"sc", "cs"} then

  keystroke (k as textusing {command downshift down}

                                        else if d is in {"kc", "ck"} then

  keystroke (k as textusing {command downcontrol down}

                                        else if d is in {"ks", "sk"} then

  keystroke (k as textusing {shift downcontrol down}

                                        else if (d contains "c") and (d contains "s") and d contains "k" then

  keystroke (k as textusing {command downshift downcontrol down}

                                        else if (d contains "c") and (d contains "s") and d contains "a" then

  keystroke (k as textusing {command downshift downoption down}

                                        end if

                              end repeat

                    end try

          end tell

end raccourci

 

--=====

--[/sCRIPT]

--{code}

tarihinde Murat Dere tarafından düzenlendi
Yorum bağlantısı
Burak Gülnar

Metin Kutusu ekleyip yazınızı yazın, daha sonra cmd+shift yapıp kutunun köşelerinde dik pozisyona getirebilirsiniz.

  • Beğen 3
Yorum bağlantısı
Mustafa Şimşek

Metin Kutusu ekleyip yazınızı yazın, daha sonra cmd+shift yapıp kutunun köşelerinde dik pozisyona getirebilirsiniz.

 

şimdi oldu :)

 

teşekkür ederim.

Yorum bağlantısı
Burak Gülnar

abi nefret ediyorum :) allah linux umuze zeval vermesin.

 

Buralarda Linux'cu görmek paha biçilemez :)

Yorum bağlantısı
  • Konuyu Görüntüleyenler   0 kullanıcı

    Sayfayı görüntüleyen kayıtlı kullanıcı bulunmuyor.

×
×
  • Yeni Oluştur...