[發問] 取大寫字串

Dear

請問是否有可以取大寫字串的公法，我希望可以從全名中傳回此名稱的縮寫，所以也就是希望傳回其大寫，例如

知道American Accounting Association    傳回AAA
知道American Assembly of Collegiate Schools of Business    傳回AACSB
知道Adjusted Attributable Deposit Amount    傳回AADA
知道Compound Annual Return    傳回CAR
知道Cost Accounting Standards    傳回CAS
知道Community Accountancy Self Help    傳回CASH

再麻煩指教回答，謝謝，也希望可以多學一項技巧。

樓主熱帖

Hsieh

超級版主 Rank: 8 Rank: 8

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 209
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2024-9-23

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

2^#

發表於 2012-3-25 23:45 | 只看該作者

回復 1# jj369963
1、選取B1
2、建立名稱m
=IF((CODE(MID(Sheet2!$A1,ROW(INDIRECT("A1:A"&LEN(Sheet2!$A1))),1))>=65)*(CODE(MID(Sheet2!$A1,ROW(INDIRECT("A1:A"&LEN(Sheet2!$A1))),1))<=90),ROW(INDIRECT("A1:A"&LEN(Sheet2!$A1))),"")
3、B1=MID($A1,SMALL(m,COLUMN(A$1)),1)

學海無涯_不恥下問

TOP

register313

　頭銜: 麻辣路人甲

大學生 Rank: 4

帖子: 967
主題: 0
精華: 0
積分: 1001
點名: 0
作業系統: WIN XP
軟體版本: OFFICE 2003
閱讀權限: 50
性別: 男
來自: 台北
註冊時間: 2010-11-29
最後登錄: 2022-5-17

2012龍年全勤獎章熱烈參與勳章

3^#

發表於 2012-3-26 00:35 | 只看該作者

回復 1# jj369963
使用循環參照(需勾選工具/選項計算勾選反覆運算最高次數200 )
B1=IF($D$1,IF($E$1,IF(OR(EXACT(MID(A1,$E$1,1),CHAR(ROW($65:$90)))),B1&MID(A1,$E$1,1),B1),B1),"") 陣列公式
D1=0(清除),1(反覆運算)
E1=IF(D1,IF(E1<F1,E1+1,E1),)
F1=200(反覆運算之次數)(A欄儲存格中最多之字元數)