全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:4332
推到 Plurk!
推到 Facebook!

Excel檔中同一個cell要怎麼設定不同的字體呢?

尚未結案
firecat
一般會員


發表:5
回覆:4
積分:1
註冊:2004-02-17

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-04-14 21:33:12 IP:220.130.xxx.xxx 未訂閱
在同一個cell中,user要求中文字要標楷體,英文字型則要用Times New Roman,請問要怎麼實現這個願望呢?請大家指點迷津囉! 另外在表裡面有特殊符號,分別是 1.Wingdings 2字型的 R -->看起來是一個方框裡有一個勾 2.Wingdings 2字型的 £ -->看起來是一個方框裡面為空白 方框加勾我用 xls.workbooks[1].cells[1,1].Font.Name:='Wingdings 2'; xls.workbooks[1].cells[1,1]:='R'; 解決了 但是 £ 在Delphi裡顯示不出來 怎麼辦哩 @_@
chris_shieh
高階會員


發表:46
回覆:308
積分:240
註冊:2004-04-26

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-04-15 00:08:03 IP:218.167.xxx.xxx 未訂閱
中英文字形各設定一次就可以同時顯示(因為Times New Roma只對英文有作用) xls.workbooks[1].cells[1,1].Font.Name:="標楷體"; xls.workbooks[1].cells[1,1].Font.Name:="Times New Roman"; £應該是你要顯示英鎊貨幣單位吧 只要更改cell儲存格格式為貨幣 貨幣符號選 "£英語(大英國協)" , cell資料只要填單純的數字即可 Selection.NumberFormatLocal := "[$£-809]#,##0.00" @瞭解越多.懂得越少@
firecat
一般會員


發表:5
回覆:4
積分:1
註冊:2004-02-17

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-04-15 11:39:20 IP:220.130.xxx.xxx 未訂閱
第一個問題已經順利解決了,感恩 :)    第二個問題我想我表達得不清楚,我想弄出來的效果是 所以得把字型設為 Wingdings 2 但是半型的 £ 我在Delphi打不出來,所以沒辦法用'£'塞進去cell裡
firecat
一般會員


發表:5
回覆:4
積分:1
註冊:2004-02-17

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-04-15 11:45:38 IP:220.130.xxx.xxx 未訂閱
對不起,貼的圖怪怪的,重貼一次
系統時間:2024-07-03 5:56:56
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!