EXCEL 中如何将数字转换成英文（5篇模版）

第一篇：EXCEL 中如何将数字转换成英文

一、网上下载的代码

1.创建一个模块：

在SHEET上，右键－》查看代码。选中“模块”－》插入模块。

2.写代码：

Option Explicit Dim StrNO(19)As String Dim Unit(8)As String Dim StrTens(9)As String Public Function NumberToString(Number As Double)As String Dim Str As String, BeforePoint As String, AfterPoint As String, tmpStr As String Dim Point As Integer Dim nBit As Integer Dim CurString As String Dim nNumLen As Integer Dim T As String Call Init Str = CStr(Round(Number, 2))' Str = Number If InStr(1, Str, “.”)= 0 Then BeforePoint = Str AfterPoint = “" Else BeforePoint = Left(Str, InStr(1, Str, ”.“)InStr(1, Str, ”.“))If Len(T)< 2 Then AfterPoint = Val(T)* 10 If Len(T)= 2 Then AfterPoint = Val(T)If Len(T)> 2 Then AfterPoint = Val(Left(T, 2))End If If Len(BeforePoint)> 12 Then NumberToString = ”Too Big.“ Exit Function End If Str = ”“ Do While Len(BeforePoint)> 0 nNumLen = Len(BeforePoint)If nNumLen Mod 3 = 0 Then CurString = Left(BeforePoint, 3)BeforePoint = Right(BeforePoint, nNumLen(nNumLen Mod 3))End If nBit = Len(BeforePoint)/ 3 tmpStr = DecodeHundred(CurString)If(BeforePoint = String(Len(BeforePoint), ”0“)Or nBit = 0)And Len(CurString)= 3 Then If CInt(Left(CurString, 1))<> 0 And CInt(Right(CurString, 2))<> 0 Then 'tmpStr = Left(tmpStr, InStr(1, tmpStr, Unit(4))+ Len(Unit(4)))& Unit(8)& ” “ & Right(tmpStr, Len(tmpStr)3))If BeforePoint = String(Len(BeforePoint), ”0“)Then Exit Do 'Debug.Print Str Loop BeforePoint = Str If Len(AfterPoint)> 0 Then AfterPoint =Unit(6)& ” “ & DecodeHundred(AfterPoint)& ” “ & Unit(5)Else AfterPoint = Unit(5)End If NumberToString = BeforePoint & ” “ & AfterPoint End Function Private Function DecodeHundred(HundredString As String)As String Dim tmp As Integer If Len(HundredString)> 0 And Len(HundredString)<= 3 Then Select Case Len(HundredString)Case 1 tmp = CInt(HundredString)If tmp <> 0 Then DecodeHundred = StrNO(tmp)Case 2 tmp = CInt(HundredString)If tmp <> 0 Then If(tmp < 20)Then DecodeHundred = StrNO(tmp)Else If CInt(Right(HundredString, 1))= 0 Then DecodeHundred = StrTens(Int(tmp / 10))Else DecodeHundred = StrTens(Int(tmp / 10))& ”-“ & StrNO(CInt(Right(HundredString, 1)))End If End If End If Case 3 If CInt(Left(HundredString, 1))<> 0 Then DecodeHundred = StrNO(CInt(Left(HundredString, 1)))& ” “ & Unit(4)& ” “ & DecodeHundred(Right(HundredString, 2))Else DecodeHundred = DecodeHundred(Right(HundredString, 2))End If Case Else End Select End If End Function Private Sub Init()If StrNO(1)<> ”One“ Then StrNO(1)= ”One“ StrNO(2)= ”Two“ StrNO(3)= ”Three“ StrNO(4)= ”Four“ StrNO(5)= ”Five“ StrNO(6)= ”Six“ StrNO(7)= ”Seven“ StrNO(8)= ”Eight“ StrNO(9)= ”Nine“ StrNO(10)= ”Ten“ StrNO(11)= ”Eleven“ StrNO(12)= ”Twelve“ StrNO(13)= ”Thirteen“ StrNO(14)= ”Fourteen“ StrNO(15)= ”Fifteen“ StrNO(16)= ”Sixteen“ StrNO(17)= ”Seventeen“ StrNO(18)= ”Eighteen“ StrNO(19)= ”Nineteen“ StrTens(1)= ”Ten“ StrTens(2)= ”Twenty“ StrTens(3)= ”Thirty“ StrTens(4)= ”Forty“ StrTens(5)= ”Fifty“ StrTens(6)= ”Sixty“ StrTens(7)= ”Seventy“ StrTens(8)= ”Eighty“ StrTens(9)= ”Ninety“ Unit(1)= ”Thousand“ '材熌

Unit(2)= ”Million“ '材熌

Unit(3)= ”Billion“ '材熌

Unit(4)= ”Hundred“ Unit(5)= ”Only“ Unit(6)= ”Point“ Unit(7)= ”Cents“ Unit(8)= ”And“ End If End Sub 保存此代码到本地

3.模块中已经定义了函数名称：NumberToString

直接当作EXCEL本地函数使用，例如在A1=7,在B1中输入＝NumberToString（A1）就可以拉！很简单的吧？

二、以川改过的代码：

'功能模块：数字转英文(货币)大写

'Public Function NumberToString(Number As Double)As String '调用形式：debug.print NumberToString(1234.32)'说明：最大支持12位数字，小数点后精确两位 '程序：杨鑫光（Volitation）Dim StrNO(19)As String Dim Unit(8)As String Dim StrTens(9)As String

Public Function NumberToString(Number As Double)As String Dim Str As String, BeforePoint As String, AfterPoint As String, tmpStr As String Dim Point As Integer Dim nBit As Integer Dim CurString As String Call Init '//开始处理

Str = CStr(Round(Number, 2))' Str = Number If InStr(1, Str, ”.“)= 0 Then BeforePoint = Str AfterPoint = ”“ Else BeforePoint = Left(Str, InStr(1, Str, ”.“)InStr(1, Str, ”.“))End If

If Len(BeforePoint)> 12 Then NumberToString = ”Too Big.“ Exit Function End If Str = ”“ Do While Len(BeforePoint)> 0 nNumLen = Len(BeforePoint)If nNumLen Mod 3 = 0 Then CurString = Left(BeforePoint, 3)BeforePoint = Right(BeforePoint, nNumLen(nNumLen Mod 3))End If nBit = Len(BeforePoint)/ 3 tmpStr = DecodeHundred(CurString)If(BeforePoint = String(Len(BeforePoint), ”0“)Or nBit = 0)And Len(CurString)= 3 Then If CInt(Left(CurString, 1))<> 0 And CInt(Right(CurString, 2))<> 0 Then tmpStr = Left(tmpStr, InStr(1, tmpStr, Unit(4))+ Len(Unit(4)))& Unit(8)& ” “ & Right(tmpStr, Len(tmpStr)3))If BeforePoint = String(Len(BeforePoint), ”0“)Then Exit Do 'Debug.Print Str Loop BeforePoint = Str

NumberToString = BeforePoint & ” “ End Function Private Function DecodeHundred(HundredString As String)As String Dim tmp As Integer If Len(HundredString)> 0 And Len(HundredString)<= 3 Then Select Case Len(HundredString)Case 1 tmp = CInt(HundredString)If tmp <> 0 Then DecodeHundred = StrNO(tmp)Case 2 tmp = CInt(HundredString)If tmp <> 0 Then If(tmp < 20)Then DecodeHundred = StrNO(tmp)Else If CInt(Right(HundredString, 1))= 0 Then DecodeHundred = StrTens(Int(tmp / 10))Else DecodeHundred = StrTens(Int(tmp / 10))& ”-“ & StrNO(CInt(Right(HundredString, 1)))End If End If End If Case 3 If CInt(Left(HundredString, 1))<> 0 Then DecodeHundred = StrNO(CInt(Left(HundredString, 1)))& ” “ & Unit(4)& DecodeHundred(Right(HundredString, 2))Else DecodeHundred = DecodeHundred(Right(HundredString, 2))End If Case Else End Select End If

End Function Private Sub Init()If StrNO(1)<> ”One“ Then

” “ & StrNO(1)= ”One“ StrNO(2)= ”Two“ StrNO(3)= ”Three“ StrNO(4)= ”Four“ StrNO(5)= ”Five“ StrNO(6)= ”Six“ StrNO(7)= ”Seven“ StrNO(8)= ”Eight“ StrNO(9)= ”Nine“ StrNO(10)= ”Ten“ StrNO(11)= ”Eleven“ StrNO(12)= ”Twelve“ StrNO(13)= ”Thirteen“ StrNO(14)= ”Fourteen“ StrNO(15)= ”Fifteen“ StrNO(16)= ”Sixteen“ StrNO(17)= ”Seventeen“ StrNO(18)= ”Eighteen“ StrNO(19)= ”Nineteen“

StrTens(1)= ”Ten“ StrTens(2)= ”Twenty“ StrTens(3)= ”Thirty“ StrTens(4)= ”Forty“ StrTens(5)= ”Fifty“ StrTens(6)= ”Sixty“ StrTens(7)= ”Seventy“ StrTens(8)= ”Eighty“ StrTens(9)= ”Ninety“

Unit(1)= ”Thousand“ '第一个三位 Unit(2)= ”Million“ '第二个三位 Unit(3)= ”Billion“ '第三个三位 Unit(4)= ”Hundred“

Unit(8)= ”And“ End If End Sub

三、是我改过的代码：

Option Explicit Dim StrNO(19)As String Dim Unit(8)As String Dim StrTens(9)As String Public Function NumberToString(Number As Double)As String

Dim Str As String, BeforePoint As String, AfterPoint As String, tmpStr As String

Dim Point As Integer

Dim nBit As Integer

Dim CurString As String

Dim nNumLen As Integer

Dim T As String

Call Init

Str = CStr(Round(Number, 2))

' Str = Number

If InStr(1, Str, ”.“)= 0 Then

BeforePoint = Str

AfterPoint = ”“

Else

BeforePoint = Left(Str, InStr(1, Str, ”.“)InStr(1, Str, ”.“))

If Len(T)< 2 Then AfterPoint = Val(T)* 10

If Len(T)= 2 Then AfterPoint = Val(T)

If Len(T)> 2 Then AfterPoint = Val(Left(T, 2))

End If

If Len(BeforePoint)> 12 Then

NumberToString = ”Too Big.“

Exit Function

End If

Str = ”“

Do While Len(BeforePoint)> 0

nNumLen = Len(BeforePoint)

If nNumLen Mod 3 = 0 Then

CurString = Left(BeforePoint, 3)

BeforePoint = Right(BeforePoint, nNumLen(nNumLen Mod 3))

End If

nBit = Len(BeforePoint)/ 3

tmpStr = DecodeHundred(CurString)

If(BeforePoint = String(Len(BeforePoint), ”0“)Or nBit = 0)And Len(CurString)= 3 Then

If CInt(Left(CurString, 1))<> 0 And CInt(Right(CurString, 2))<> 0 Then

'tmpStr = Left(tmpStr, InStr(1, tmpStr, Unit(4))+ Len(Unit(4)))& Unit(8)& ” “ & Right(tmpStr, Len(tmpStr)3))

If BeforePoint = String(Len(BeforePoint), ”0“)Then Exit Do

'Debug.Print Str

Loop

BeforePoint = Str

If Len(AfterPoint)> 0 Then

AfterPoint = Unit(6)& ” “ & DecodeHundred(AfterPoint)

Else

AfterPoint = Unit(5)

End If

NumberToString = BeforePoint & ” “ & AfterPoint End Function Private Function DecodeHundred(HundredString As String)As String

Dim tmp As Integer

If Len(HundredString)> 0 And Len(HundredString)<= 3 Then

Select Case Len(HundredString)

Case 1

tmp = CInt(HundredString)

If tmp <> 0 Then DecodeHundred = StrNO(tmp)

Case 2

tmp = CInt(HundredString)

If tmp <> 0 Then

If(tmp < 20)Then

DecodeHundred = StrNO(tmp)

Else

If CInt(Right(HundredString, 1))= 0 Then

DecodeHundred = StrTens(Int(tmp / 10))

Else

DecodeHundred = StrTens(Int(tmp / StrNO(CInt(Right(HundredString, 1)))

End If

End If

10))& ”-“ &

End If

Case 3

If CInt(Left(HundredString, 1))<> 0 Then

DecodeHundred = StrNO(CInt(Left(HundredString, 1)))& ” “ & Unit(4)& ” “ & DecodeHundred(Right(HundredString, 2))

Else

DecodeHundred = DecodeHundred(Right(HundredString, 2))

End If

Case Else

End Select

End If End Function Private Sub Init()

If StrNO(1)<> ”One“ Then

StrNO(1)= ”One“

StrNO(2)= ”Two“

StrNO(3)= ”Three“

StrNO(4)= ”Four“

StrNO(5)= ”Five“

StrNO(6)= ”Six“

StrNO(7)= ”Seven“

StrNO(8)= ”Eight“

StrNO(9)= ”Nine“

StrNO(10)= ”Ten“

StrNO(11)= ”Eleven“

StrNO(12)= ”Twelve“

StrNO(13)= ”Thirteen“

StrNO(14)= ”Fourteen“

StrNO(15)= ”Fifteen“

StrNO(16)= ”Sixteen“

StrNO(17)= ”Seventeen“

StrNO(18)= ”Eighteen“

StrNO(19)= ”Nineteen“

StrTens(1)= ”Ten“

StrTens(2)= ”Twenty“

StrTens(3)= ”Thirty“

StrTens(4)= ”Forty“

StrTens(5)= ”Fifty“

StrTens(6)= ”Sixty“

StrTens(7)= ”Seventy“

StrTens(8)= ”Eighty“

StrTens(9)= ”Ninety“

Unit(1)= ”Thousand“ '材熌

Unit(2)= ”Million“ '材熌

Unit(3)= ”Billion“ '材熌

Unit(4)= ”Hundred“

Unit(5)= ”Only“

Unit(6)= ”Point“

Unit(7)= ”Cents“

Unit(8)= ”And"

End If End Sub

第二篇：EXCEL表格中将数字金额转换为英文

Excel表格中如何将数字金额转换为英文

（如B1列写162890元，自动转换为英文

ONE HUNDRED SIXTY TWO THOUSAND EIGHT HUNDRED NINETY DOLLARS AND NO CENTS）

1、新建Excel表格

2、按住“Alt+F11”打开VBA编辑器

3、在VBA编辑器中单击菜单栏“插入”——模块

4、在打开的模块中输入如下代码： Option Explicit Function 数字转英文(ByValMyNumber)Dim Dollars, Cents, Temp Dim DecimalPlace, Count ReDimPlace(9)As String Place(2)= “ Thousand ” Place(3)= “ Million ” Place(4)= “ Billion ” Place(5)= “ Trillion ” MyNumber = Trim(Str(MyNumber))DecimalPlace = InStr(MyNumber, “.”)If DecimalPlace> 0 Then Cents = GetTens(Left(Mid(MyNumber, DecimalPlace + 1)& _

“00”, 2))MyNumber = Trim(Left(MyNumber, DecimalPlace3)Else MyNumber = “" End If Count = Count + 1 Loop Select Case Dollars Case ”“ Dollars = ”No Dollars“ Case ”One“ Dollars = ”One Dollar“ Case Else Dollars = Dollars &” Dollars“ End Select Select Case Cents Case ”“ Cents = ” and No Cents“ Case ”One“ Cents = ” and One Cent“ Case Else Cents = ” and “ & Cents & ” Cents“ End Select 数字转英文 = Dollars & Cents End Function Function GetHundreds(ByValMyNumber)Dim Result As String If Val(MyNumber)= 0 Then Exit Function MyNumber = Right(”000“ &MyNumber, 3)If Mid(MyNumber, 1, 1)<> ”0“ Then Result = GetDigit(Mid(MyNumber, 1, 1))& ” Hundred “ End If If Mid(MyNumber, 2, 1)<> ”0“ Then Result = Result &GetTens(Mid(MyNumber, 2))Else Result = Result &GetDigit(Mid(MyNumber, 3))End If GetHundreds = Result End Function Function GetTens(TensText)Dim Result As String Result = ”“ If Val(Left(TensText, 1))= 1 Then Select Case Val(TensText)Case 10: Result = ”Ten“ Case 11: Result = ”Eleven“ Case 12: Result = ”Twelve“ Case 13: Result = ”Thirteen“ Case 14: Result = ”Fourteen“ Case 15: Result = ”Fifteen“ Case 16: Result = ”Sixteen“ Case 17: Result = ”Seventeen“ Case 18: Result = ”Eighteen“ Case 19: Result = ”Nineteen“ Case Else End Select Else Select Case Val(Left(TensText, 1))Case 2: Result = ”Twenty “ Case 3: Result = ”Thirty “ Case 4: Result = ”Forty “ Case 5: Result = ”Fifty “ Case 6: Result = ”Sixty “ Case 7: Result = ”Seventy “ Case 8: Result = ”Eighty “ Case 9: Result = ”Ninety “ Case Else End Select Result = Result &GetDigit _(Right(TensText, 1))End If GetTens = Result End Function

Function GetDigit(Digit)Select Case Val(Digit)Case 1: GetDigit = ”One“ Case 2: GetDigit = ”Two“ Case 3: GetDigit = ”Three“ Case 4: GetDigit = ”Four“ Case 5: GetDigit = ”Five“ Case 6: GetDigit = ”Six“ Case 7: GetDigit = ”Seven“ Case 8: GetDigit = ”Eight“ Case 9: GetDigit = ”Nine“ Case Else: GetDigit = ”" End Select End Function

5/现在回到Excel表格中，单击“B1”单元格，在菜单栏选择“插入”——函数。6/在打开的“插入函数”对话框的“或选择类别”中选择“用户定义”，然后选择函数“数字转英文”，单击“确定”按钮。

7/在打开的“函数参数”对话框中输入“A1”，单击“确定”按钮。8/ 然后用填充手柄向下填充公式，现在就可以看到转换好的英文了。

第三篇：英文1-33数字

春节 the Sprlng Festival（New

Yearls Day of the Chinese lunar calendar）农历正月初一元宵节（灯节)the Lantern Festival 农历正月十五清明节 the Qing Ming Festival 四月五日前后

端午节 the Dragon-Boat Festiva 农历五月初五

中秋节 the MidAutumn Festival

（the Moon Festival）农历八月十五

重阳节 the Double Ninth Festival 农历九月初九

元旦(1月1日)NewYear'sDay

春节(农历一月一日)theSpringFestival

元宵节(农历一月十五日)theLanternFestival

国际劳动妇女节(3月8日)InternationalWorkingWomen'sDay植树节(3月12日)ArborDay

邮政节(3月20日)PostalDay

世界气象节(3月23日)WorldMeteorologyDay

清明节(4月5日)ChingMingFestival;Tomb-sweepingFestival国际劳动节(5月1日)InternationalLabourDay

中国青年节(5月4日)ChineseYouthDay

护士节(5月12日)Nurses'Festival

端午节(农历五月初五)theDragonBoatFestival

国际儿童节(6月1日)InternationalChildren'sDay

中国共产党成立纪念日(7月1日)theParty'sBirthday建军节(8月1日)theArmy'sDay

中秋节(农历八月十五)Mid-autumn(Moon)Festival

教师节(9月10日)Teachers'Day

重阳节(农历九月九日)Double-ninthDay

国庆节(10月1日)NationalDay

除夕(农历十二月三十日)NewYear'sEve

阳历节日

1月1日元旦（New Year's Day)

2月2日世界湿地日(World Wetlands Day)

2月14日情人节(Valentine's Day)

3月3日全国爱耳日

3月5日青年志愿者服务日

3月8日国际妇女节(International Women' Day)

3月9日保护母亲河日

3月12日中国植树节(China Arbor Day)

3月14日白色情人节(White Day)

3月14日国际警察日(International Policemen' Day)

3月15日世界消费者权益日(World Consumer Right Day）3月21日世界森林日（World Forest Day)

3月21日世界睡眠日(World Sleep Day)

3月22日世界水日(World Water Day)

3月23日世界气象日(World Meteorological Day)

3月24日世界防治结核病日(World Tuberculosis Day)

4月1日愚人节(April Fools' Day)

4月5日清明节（Tomb-sweeping Day)

4月7日世界卫生日(World Health Day）

4月22日世界地球日(World Earth Day)

4月26日世界知识产权日(World Intellectual Property Day)

5月1日国际劳动节(International Labour Day)

5月3日世界哮喘日(World Asthma Day)

5月4日中国青年节（Chinese Youth Day)

5月8日世界红十字日(World Red-Cross Day)

5月12日国际护士节(International Nurse Day)

5月15日国际家庭日(International Family Day)

5月17日世界电信日(World Telecommunications Day)

5月20日全国学生营养日

5月23日国际牛奶日(International Milk Day)

5月31日 世界无烟日(World No-Smoking Day)

6月1日 国际儿童节(International Children's Day)

6月5日世界环境日(International Environment Day)

6月6日全国爱眼日

6月17日世界防治荒漠化和干旱日(World Day to combat desertification)6月23日国际奥林匹克日(International Olympic Day)

6月25日全国土地日

6月26日国际禁毒日(International Day Against Drug Abuse and Illicit Trafficking)

7月1日中国共产党诞生日(Anniversary of the Founding of the Chinese Communist Party)

7月1日国际建筑日（International Architecture Day)

7月7日中国人民抗日战争纪念日

7月11日世界人口日(World Population Day)

8月1日中国人民解放军建军节(Army Day)

8月12日国际青年节(International Youth Day)

9月8日国际扫盲日(International Anti-illiteracy Day)

9月10日中国教师节(Teacher's Day)

9月16日中国脑健康日

9月16日国际臭氧层保护日(International Day for the Preservation of the Ozone Layer)

9月20日全国爱牙日

9月21日世界停火日(World Cease-fire Day)

9月27日世界旅游日(World Tourism Day)

10月1日中华人民共和国国庆节(National Day)

10月1日国际音乐日(International Music Day)

10月1日国际老年人日(International Day of Older Persons)

10月4日世界动物日(World Animal Day)

10月5日世界教师日(World Teachers' Day)（联合国教科文组织确立）10月8日全国高血压日

10月9日世界邮政日(World Post Day)

10月10日世界精神卫生日(World Mental Health Day)

10月14日世界标准日(World Standards Day)

10月15日国际盲人节(International Day of the Blind)

10月15日世界农村妇女日(World Rural Women's Day)

10月16日世界粮食日(World Food Day)

10月17日国际消除贫困日(International Day for the Eradication of Poverty)10月24日联合国日(United Nations Day)

10月24日世界发展新闻日(World Development Information Day)

10月28日中国男性健康日

10月29日国际生物多样性日(International Biodiversity Day)

10月31日万圣节(Halloween)

11月8日中国记者节

11月9日消防宣传日

11月14日世界糖尿病日(World Diabetes Day)

11月17日国际大学生节

11月25日国际消除对妇女的暴力日(International Day For the elimination of Violence against Women)

12月1日世界爱滋病日(World AIDS Day)

12月3日世界残疾人日(World Disabled Day）

12月4日全国法制宣传日

12月9日世界足球日（World Football Day)

12月25日圣诞节(Christmas Day)

12月29日国际生物多样性日(International Biological Diversity Day)1月最后一个星期日国际麻风节

3月最后一个完整周的星期一中小学生安全教育日

春分月圆后的第一个星期日复活节(Easter Monday)(有可能是3月22-4月25日间的任一天)

5月第二个星期日母亲节(Mother's Day)

5月第三个星期日全国助残日

6月第三个星期日父亲节(Father's Day)

9月第三个星期二国际和平日(International Peace Day)

9月第三个星期六全国国防教育日

9月第四个星期日国际聋人节(International Day of the Deaf)

10月的第一个星期一世界住房日(World Habitat Day)

10月的第二个星斯一加拿大感恩节(Thanksgiving Day)

10月第二个星期三国际减轻自然灾害日(International Day for Natural Disaster Reduction)

10月第二个星期四世界爱眼日(World Sight Day)

11月最后一个星期四美国感恩节(Thanksgiving Day)

农历节日

农历正月初一春节(the Spring Festival)

农历正月十五元宵节(Lantern Festival)

农历五月初五端午节(the Dragon-Boat Festival)

农历七月初七乞巧节(中国情人节）(Double-Seventh Day)农历八月十五中秋节(the Mid-Autumn Festival)

农历九月初九重阳节(the Double Ninth Festival)

农历腊月初八腊八节(the laba Rice Porridge Festival)农历腊月二十四传统扫房日

1-one23-twenty-three 2-two24-twenty-four 3-three25-twenty-five 4-four26-twenty-six 5-five27-twenty-sever 6-six28-twenty-eight 7-seven29-twenty-nine 8-eight30-thirty 9-nine31-thirty-one 10-ten32-thirty-two 11-eleven33thirty-three12-twelve

13-thirteen

14-fourteen

15-fifteen

16-sixteen

17-seventeen

18-eighteen

19-nineteen

20-twenty

21-twenty-one

春节Springfestival

中秋节Mid-Autmnfestival

万圣节Halloween

元旦Newyear'sday

端午节Dragonboatfestival 复活节Easter

圣诞节Christmas

儿童节Children'sday

国庆节Nationalday

父亲节Father’s Day,父亲节：每年6月的第三个星期日 母亲节Mother's Day母亲节：每年5月的第二个星期日 五一国际劳动节：（the International Labor Day）

May Day

第四篇：如何帮助中学生听说英文数字

如何帮助中学生听说英文数字

山西省教育学院

中学英语教材中含有许多涉及到数字的内容，如：时间、年龄、价格、距离、号码、尺寸等。许多中学生 抱怨听不懂数字、说不出数字，这是因为对英文数字的组成、排列及读法不太熟悉而造成的。当碰到一个数字 时，不能作出迅速准确的反映，而往往要先在心里进行翻译、默读，这就大大影响了听说英文的能力。本文将 介绍一些数字在不同场合的表

达方式、发音特点及相应对策。

一、熟读牢记关键数字

迅速无误识别数字的前提是必须能够流利地读出数字。要从读两位数起，然后练习读三位和四位数乃至五 位或六位以上的数字。其中两位和三位数的读法是读所有数字的基础。英文数字中的每一个逗点的读法也要牢 记：有一个逗点读“thousand”，两个逗点读“million”，三个逗点读“billion”。还要清楚，每个逗点间 由三位数组成。英文数字中的第四位数、第七位数、第十位数是很关键的数位。

Examples：

1,234 读作：one thousand,two hundred and thirty-four

4,567,809 读作：four million,five hundred and sixty-seventhousand,eight hundred and

nine

5,678,120,000 读作：five billion,six hundred and seventy-eight million,one hundred and

twe nty thousand

二、“-teen和“-ty”的区别

“-teen”和“-ty”是比较容易混淆的一对读音。我们可以通过音和音素的差异来区别两者。含有“-t een ”的词有两个重音，即“-teen”要重读，且“-teen”中的元音为长元音[ti:n]，发音长而清晰；而含有 “-ty”的词只有一个重音，即“-ty”不重读，且“-ty ”中的元音为短元音[ti]，发音短而急促。

Examples：

fifteen['fif'ti:n] fifty['fifti]

nineteen['nai'ti:n] ninety['naiti]

三、英美数字读法的差异

有时，同样一个数字，英国人和美国人的读法也不尽相同，这无疑会使本来就棘手的数

字雪上加霜。如： 部分有一个逗点的数字（四位数），英国人用“thousand”表示，而美国人则多用“hundred”。再如，有三 个逗点的数字（十位数），美式读法为“billion”，而英式读法为“thousand million”。因此，熟悉英美 两种不同的读法对消除数字理解上的岐义是

十分必要的。请看下面的对照表

例词 英式 美式 1,900 one thousand,nine hundred nineteen hundred 4,000,000,000

four thousand million four billion

再者，英国英语在百位和十位之间加读“and”，而美国英语往往不用“and”。比如754这个数字。英国 英语读成seven hundred andfifty-four，而美国英语则读为seven hundred

fifty-four。

此外，在某些时间表达上，英美也有不同的读法，这点在下一部分具体说明。

四、时间的表达法

表达时间的方法有三种，其中最为普遍的一种是先说分，再加介词“past”或“to”，然后说小时。若分 数为15分、30分、45分，则用“quarter”、“half”代替具体的分数。习惯上，分数加在30分以内，用“pa st”，如过了30分，用“to”。美国英语中，常用“after ”代替“past”，用“before”（或till）代替“ to”。

Examples：

8:00 读作：eight o'clock或eight

9:15 读作：a qusrter past nine（英式）

或 a quarter after nine（美式）

11:30 读作：half past eleven（英式）

或 eleven thirty（美式）

7:50 读作：ten to eight（英式）

或 ten before eight（美式）

表达时间的另一种方法是不用介词，先说小时数，再说分数。这种表达法多用于与汽车、火车、轮船、飞 机等相关的情境中，如发车时间、到站时间等。

Examples：

4:30 p.m.读作：four-thirty p.m.5:45 p.m.读作：five-fourty-five p.m.最后一种方法是日常生活中最不常用的24小时制。如：用14:15（fourteen-fifteen）代替2:15 p.m，用 23:05（twenty-three-oh-five）代替11:05 p.m.。这种用法主要出现在官方的时刻表上和电台的正式报时中。

五、年、年代、世纪的表达法

年、年代、世纪的读法也给中学生带来不少麻烦，在此，我们将分别举例说明。

年的表达用基数词，一般有两种读法。

Examples：

541 B.C.读作：five four one B.C

或 five hundred fourty-one

B.C

1800 读作：eighteen hundred

1701 读作：seventeen oh one

或 seveteen hundred and one

2000 读作：two thousand

年代指十年（decade），采用“基数词加上十位数复数”的形式来表示，前面与介词“in”

和定冠词“th e”搭配。

Examples：

in the 1840's 读作：in the eighteen fourties（十九世纪四十年代）

in the 1950's 读作：in the nineteen fifties（二十世纪五十年代）

in the '60's 读作：in the sixties（本世纪六十年代）

如要表示一个年代的初期、中期、末期，可在年代前分别加“early，mid，late”。如：in

the early 1770's；in the late 1590's。

世纪指一百年（century），用“the＋序数词＋century”表示。

Examples：

in the 2nd century 在二世纪

in the mid 13th century 在十三世纪中叶

世纪给人们带来的一个麻烦是，怎样确定某年属于哪个世纪。我们可以简单地概括为：在百位数中加1，再 去掉两位尾数，即得世纪数。如：725年在百位数上加1，去掉两位尾数25，得8，因此725年属八世纪。再如： 1103年在百位数上加1去掉两位尾数03，得12，故1103 年属十二世纪。

六、序数词的特殊用法

序数词是用来表示顺序的数词。除了几个特殊的序数词（如first，second，third）外，它都是在与之相 应的基数词尾加“-th”构成的，前面一般要加定冠词，如the fourth，the

eighth，the tenth。

但在谈编了号的东西时，仍可用基数词来表示顺序。

如果数字较长，象电话号码、房间号、住址号、车牌号等，不仅可以用基数词代替序数词，而且读的方法 也常常简化，不用基数词通常的读法，而是将数字分别单独读出来。

Examples：

电话号码 505—6610 读作：telephone number five oh fivedouble six one oh

第344房间 读作：Room three four four

七、分数、小数、百分数的读法

分数词是由基数词的序数词合成的，分子用基数词表示，分母用序数词表示，除了分子

是“1”的情况外，序数词都要用复数形式。

Examples：

1/3 读作：one-third

7/12 读作：seven-twelfths

1/2 读作：a（one）half

3/4 读作：three quarters1/2 读作：two and a half

比较复杂的分数读法如下：

20/87 读作：twenty over eighty-seven

33/90 读作：thirty-three over ninety

小数的读法：小数点读作“point”，小数后各位数要分别读，小数点前的数若为“0”可略

去不读。

Examples：

2.468 读作：two point four six eight

0.157 读作：（zero）point one five seven

百分数由“per cent”表示

Examples：

20％ 读作：twenty per cent

16.09％ 读作：sixteen point zero nine per cent

第五篇：英文5位以上数字的读法

5位以上数字的读法

11，234读作：eleven thousand two hundred(and)，thirty—four

155,721读作：one hundred(and)fifty-five thou and seven hundred(and)twenty-one

6，155，702读作：six million one hundred(and)fifty-five thousand seven hundred and two

26，000，008读作：twenty-six million and eight

326，414，718读作：three hundred(and)twenty-six mil-lion，four hundred(and)four teen thousand，seven

hundred(and)eighteen

4，302，000，000读作：four billion three hundred(and)two million

由以上一组数字可以看出，多位数由右向左每3位有一逗号，这个逗号的作用非同小可，在记忆数字时，它可以帮我们很大的忙!

逆向第一个逗号读thousand；向左再推三位，第二个逗号读million；第三个逗号读billion；第四个逗号就是trillion。这几个逗号的作用在于，当我们听到若干thousand时，立即写下这个数，并在其后打一个逗号，并留出3位；当听到若干million，则写下数字，并在其后打一逗号，留出6位；听到若干billion，方法同

上，在后面留出9位，后面的million、thousand依此法类推，让所有数字各就其位。

例如，当你听到“twenty thousand and four'’写出20，“and four”意为后一组仅有个位，即：004，那么，这个数字完整地写下来就是20，004；若听到“six million twenty thousand four hundred and twenty—three，”则第一步先写：6，020，再将最后一组423写在第一个逗号后面。完整的翠字为6，020，423。若听到“One billion，one hundred and four million，twenty thousand four hundred and twenty-three”：主第一步写出1，104，第二步接下去写第三组020，第三步二写423，这样得到的完整数字便是1，104，020，423，由此：见这个三位一逗号的作用有多大。只要我们在平时的训练中加强对三位数读写的训练，能分辨“ty”与“teen'’，并能借助

这个不可缺少的“逗号”，无论数字多么大，也不会对我们造成障碍。