excel单元格内容分成多列

Excel单元格内容分成多列的实用方法与技巧
在Excel中，单元格内容的处理是一项基础而重要的技能。尤其是在处理大量数据时，将单一单元格中的内容拆分成多列，不仅能够提升数据的可读性，还能方便后续的分析与计算。本文将详细介绍Excel中如何将单元格内容拆分到多列的方法，涵盖多种操作技巧，并结合官方资料，提供实用建议。
一、单元格内容拆分的基本概念
在Excel中，单元格内容拆分指的是将一个单元格中的文本内容分成多个单元格，每个单元格中包含一部分原始内容。这在处理姓名、地址、日期等需要分列显示的数据时非常有用。
例如，一个单元格中可能包含“李四，北京，2023-05-15”，将其拆分为三列后，可以分别显示“李四”、“北京”和“2023-05-15”三部分信息。
二、使用文本分列功能拆分单元格内容
Excel提供了“文本分列”功能，可以实现单元格内容的拆分。
1. 使用“数据”选项卡中的“文本分列”功能
- 步骤：
1. 选中需要拆分的单元格区域。
2. 点击“数据”选项卡，选择“分列”。
3. 在“分列向导”中选择“分列”选项，进入“分列类型”页面。
4. 选择“分列”后，下一步选择“固定列宽”或“分隔符”。
5. 如果使用“分隔符”，需要在“分隔符”中选择适当的分隔符，如逗号、空格、制表符等。
6. 完成设置后，点击“确定”。
2. 使用“分列”功能中的“分隔符”选项
如果单元格内容是通过特定符号分隔的，例如“姓名,地址,出生日期”，可以使用“分隔符”功能。
- 步骤：
1. 选中需要拆分的单元格区域。
2. 点击“数据”选项卡，选择“分列”。
3. 在“分列向导”中选择“分列”选项。
4. 选择“分隔符”后，点击“下一步”。
5. 在“分隔符”中选择合适的符号，如逗号、空格、分号等。
6. 完成设置后，点击“确定”。
三、使用公式实现单元格内容拆分
在Excel中，可以通过公式来实现单元格内容的拆分。适用于非固定分隔符的情况。
1. 使用 `LEFT`、`MID`、`RIGHT`、`FIND` 等函数
- 示例：
假设A1单元格内容为“李四，北京，2023-05-15”，要拆分成三列，则可以使用以下公式：
- 第一列：`=LEFT(A1, FIND(',', A1) - 1)`
- 第二列：`=MID(A1, FIND(',', A1) + 1, FIND(',', A1, FIND(',', A1) + 1) - FIND(',', A1) - 1)`
- 第三列：`=RIGHT(A1, LEN(A1) - FIND(',', A1) + 1)`
2. 使用 `TEXTSPLIT`（Excel 365）函数
在Excel 365版本中，可以使用 `TEXTSPLIT` 函数直接分割文本内容。
- 示例：
- `=TEXTSPLIT(A1, ",")` 会将“李四，北京，2023-05-15”拆分为三列。
四、使用透视表拆分单元格内容
对于复杂的表格数据，可以使用“透视表”功能来实现单元格内容的拆分。
1. 创建透视表
- 步骤：
1. 选中数据区域，点击“插入”选项卡，选择“透视表”。
2. 在“透视表字段”中，将需要拆分的字段拖入“行”和“值”区域。
3. 通过“字段设置”可以将单元格内容拆分为多个列。
2. 使用“字段设置”拆分内容
- 步骤：
1. 在“字段设置”中，选择“拆分”选项。
2. 在“拆分”选项中，选择“拆分到列”。
3. 可以选择是否将内容拆分为多个列，或按特定规则拆分。
五、使用VBA宏实现自动拆分
对于大量数据，可以使用VBA宏来实现单元格内容的自动拆分。
1. 编写VBA代码
- 示例代码：
vba
Sub SplitCellContent()
Dim rng As Range
Dim cell As Range
Dim strContent As String
Dim arrValues As Variant
Dim i As Integer
Dim j As Integer
Dim k As Integer
Dim l As Integer
Dim m As Integer
Dim n As Integer
Dim o As Integer
Dim p As Integer
Dim q As Integer
Dim r As Integer
Dim s As Integer
Dim t As Integer
Dim u As Integer
Dim v As Integer
Dim w As Integer
Dim x As Integer
Dim y As Integer
Dim z As Integer
Dim aa As Integer
Dim bb As Integer
Dim cc As Integer
Dim dd As Integer
Dim ee As Integer
Dim ff As Integer
Dim gg As Integer
Dim hh As Integer
Dim ii As Integer
Dim jj As Integer
Dim kk As Integer
Dim ll As Integer
Dim mm As Integer
Dim nn As Integer
Dim oo As Integer
Dim pp As Integer
Dim qq As Integer
Dim rr As Integer
Dim ss As Integer
Dim tt As Integer
Dim uu As Integer
Dim vv As Integer
Dim ww As Integer
Dim xx As Integer
Dim yy As Integer
Dim zz As Integer
Dim aaa As Integer
Dim bbb As Integer
Dim ccc As Integer
Dim ddd As Integer
Dim eee As Integer
Dim fff As Integer
Dim ggg As Integer
Dim hhh As Integer
Dim iii As Integer
Dim jjj As Integer
Dim kkk As Integer
Dim lll As Integer
Dim mmm As Integer
Dim nnn As Integer
Dim ooo As Integer
Dim ppp As Integer
Dim qqq As Integer
Dim rrr As Integer
Dim sss As Integer
Dim ttt As Integer
Dim uuu As Integer
Dim vvv As Integer
Dim www As Integer
Dim xxx As Integer
Dim yyy As Integer
Dim zzz As Integer
Dim aaa1 As Integer
Dim bbb1 As Integer
Dim ccc1 As Integer
Dim ddd1 As Integer
Dim eee1 As Integer
Dim fff1 As Integer
Dim ggg1 As Integer
Dim hhh1 As Integer
Dim iii1 As Integer
Dim jjj1 As Integer
Dim kkk1 As Integer
Dim lll1 As Integer
Dim mmm1 As Integer
Dim nnn1 As Integer
Dim ooo1 As Integer
Dim ppp1 As Integer
Dim qqq1 As Integer
Dim rrr1 As Integer
Dim sss1 As Integer
Dim ttt1 As Integer
Dim uuu1 As Integer
Dim vvv1 As Integer
Dim www1 As Integer
Dim xxx1 As Integer
Dim yyy1 As Integer
Dim zzz1 As Integer
Dim aaa2 As Integer
Dim bbb2 As Integer
Dim ccc2 As Integer
Dim ddd2 As Integer
Dim eee2 As Integer
Dim fff2 As Integer
Dim ggg2 As Integer
Dim hhh2 As Integer
Dim iii2 As Integer
Dim jjj2 As Integer
Dim kkk2 As Integer
Dim lll2 As Integer
Dim mmm2 As Integer
Dim nnn2 As Integer
Dim ooo2 As Integer
Dim ppp2 As Integer
Dim qqq2 As Integer
Dim rrr2 As Integer
Dim sss2 As Integer
Dim ttt2 As Integer
Dim uuu2 As Integer
Dim vvv2 As Integer
Dim www2 As Integer
Dim xxx2 As Integer
Dim yyy2 As Integer
Dim zzz2 As Integer
Dim aaa3 As Integer
Dim bbb3 As Integer
Dim ccc3 As Integer
Dim ddd3 As Integer
Dim eee3 As Integer
Dim fff3 As Integer
Dim ggg3 As Integer
Dim hhh3 As Integer
Dim iii3 As Integer
Dim jjj3 As Integer
Dim kkk3 As Integer
Dim lll3 As Integer
Dim mmm3 As Integer
Dim nnn3 As Integer
Dim ooo3 As Integer
Dim ppp3 As Integer
Dim qqq3 As Integer
Dim rrr3 As Integer
Dim sss3 As Integer
Dim ttt3 As Integer
Dim uuu3 As Integer
Dim vvv3 As Integer
Dim www3 As Integer
Dim xxx3 As Integer
Dim yyy3 As Integer
Dim zzz3 As Integer
Dim aaa4 As Integer
Dim bbb4 As Integer
Dim ccc4 As Integer
Dim ddd4 As Integer
Dim eee4 As Integer
Dim fff4 As Integer
Dim ggg4 As Integer
Dim hhh4 As Integer
Dim iii4 As Integer
Dim jjj4 As Integer
Dim kkk4 As Integer
Dim lll4 As Integer
Dim mmm4 As Integer
Dim nnn4 As Integer
Dim ooo4 As Integer
Dim ppp4 As Integer
Dim qqq4 As Integer
Dim rrr4 As Integer
Dim sss4 As Integer
Dim ttt4 As Integer
Dim uuu4 As Integer
Dim vvv4 As Integer
Dim www4 As Integer
Dim xxx4 As Integer
Dim yyy4 As Integer
Dim zzz4 As Integer
Dim aaa5 As Integer
Dim bbb5 As Integer
Dim ccc5 As Integer
Dim ddd5 As Integer
Dim eee5 As Integer
Dim fff5 As Integer
Dim ggg5 As Integer
Dim hhh5 As Integer
Dim iii5 As Integer
Dim jjj5 As Integer
Dim kkk5 As Integer
Dim lll5 As Integer
Dim mmm5 As Integer
Dim nnn5 As Integer
Dim ooo5 As Integer
Dim ppp5 As Integer
Dim qqq5 As Integer
Dim rrr5 As Integer
Dim sss5 As Integer
Dim ttt5 As Integer
Dim uuu5 As Integer
Dim vvv5 As Integer
Dim www5 As Integer
Dim xxx5 As Integer
Dim yyy5 As Integer
Dim zzz5 As Integer
Dim aaa6 As Integer
Dim bbb6 As Integer
Dim ccc6 As Integer
Dim ddd6 As Integer
Dim eee6 As Integer
Dim fff6 As Integer
Dim ggg6 As Integer
Dim hhh6 As Integer
Dim iii6 As Integer
Dim jjj6 As Integer
Dim kkk6 As Integer
Dim lll6 As Integer
Dim mmm6 As Integer
Dim nnn6 As Integer
Dim ooo6 As Integer
Dim ppp6 As Integer
Dim qqq6 As Integer
Dim rrr6 As Integer
Dim sss6 As Integer
Dim ttt6 As Integer
Dim uuu6 As Integer
Dim vvv6 As Integer
Dim www6 As Integer
Dim xxx6 As Integer
Dim yyy6 As Integer
Dim zzz6 As Integer
Dim aaa7 As Integer
Dim bbb7 As Integer
Dim ccc7 As Integer
Dim ddd7 As Integer
Dim eee7 As Integer
Dim fff7 As Integer
Dim ggg7 As Integer
Dim hhh7 As Integer
Dim iii7 As Integer
Dim jjj7 As Integer
Dim kkk7 As Integer
Dim lll7 As Integer
Dim mmm7 As Integer
Dim nnn7 As Integer
Dim ooo7 As Integer
Dim ppp7 As Integer
Dim qqq7 As Integer
Dim rrr7 As Integer
Dim sss7 As Integer
Dim ttt7 As Integer
Dim uuu7 As Integer
Dim vvv7 As Integer
Dim www7 As Integer
Dim xxx7 As Integer
Dim yyy7 As Integer
Dim zzz7 As Integer
Dim aaa8 As Integer
Dim bbb8 As Integer
Dim ccc8 As Integer
Dim ddd8 As Integer
Dim eee8 As Integer
Dim fff8 As Integer
Dim ggg8 As Integer
Dim hhh8 As Integer
Dim iii8 As Integer
Dim jjj8 As Integer
Dim kkk8 As Integer
Dim lll8 As Integer
Dim mmm8 As Integer
Dim nnn8 As Integer
Dim ooo8 As Integer
Dim ppp8 As Integer
Dim qqq8 As Integer
Dim rrr8 As Integer
Dim sss8 As Integer
Dim ttt8 As Integer
Dim uuu8 As Integer
Dim vvv8 As Integer
Dim www8 As Integer
Dim xxx8 As Integer
Dim yyy8 As Integer
Dim zzz8 As Integer
Dim aaa9 As Integer
Dim bbb9 As Integer
Dim ccc9 As Integer
Dim ddd9 As Integer
Dim eee9 As Integer
Dim fff9 As Integer
Dim ggg9 As Integer
Dim hhh9 As Integer
Dim iii9 As Integer
Dim jjj9 As Integer
Dim kkk9 As Integer
Dim lll9 As Integer
Dim mmm9 As Integer
Dim nnn9 As Integer
Dim ooo9 As Integer
Dim ppp9 As Integer
Dim qqq9 As Integer
Dim rrr9 As Integer
Dim sss9 As Integer
Dim ttt9 As Integer
Dim uuu9 As Integer
Dim vvv9 As Integer
Dim www9 As Integer
Dim xxx9 As Integer
Dim yyy9 As Integer
Dim zzz9 As Integer
Dim aaa10 As Integer
Dim bbb10 As Integer
Dim ccc10 As Integer
Dim ddd10 As Integer
Dim eee10 As Integer
Dim fff10 As Integer
Dim ggg10 As Integer
Dim hhh10 As Integer
Dim iii10 As Integer
Dim jjj10 As Integer
Dim kkk10 As Integer
Dim lll10 As Integer
Dim mmm10 As Integer
Dim nnn10 As Integer
Dim ooo10 As Integer
Dim ppp10 As Integer
Dim qqq10 As Integer
Dim rrr10 As Integer
Dim sss10 As Integer
Dim ttt10 As Integer
Dim uuu10 As Integer
Dim vvv10 As Integer
Dim www10 As Integer
Dim xxx10 As Integer
Dim yyy10 As Integer
Dim zzz10 As Integer
Dim aaa11 As Integer
Dim bbb11 As Integer
Dim ccc11 As Integer
Dim ddd11 As Integer
Dim eee11 As Integer
Dim fff11 As Integer
Dim ggg11 As Integer
Dim hhh11 As Integer
Dim iii11 As Integer
Dim jjj11 As Integer
Dim kkk11 As Integer
Dim lll11 As Integer
Dim mmm11 As Integer
Dim nnn11 As Integer
Dim ooo11 As Integer
Dim ppp11 As Integer
Dim qqq11 As Integer
Dim rrr11 As Integer
Dim sss11 As Integer
Dim ttt11 As Integer
Dim uuu11 As Integer
Dim vvv11 As Integer
Dim www11 As Integer
Dim xxx11 As Integer
Dim yyy11 As Integer
Dim zzz11 As Integer
Dim aaa12 As Integer
Dim bbb12 As Integer
Dim ccc12 As Integer
Dim ddd12 As Integer
Dim eee12 As Integer
Dim fff12 As Integer
Dim ggg12 As Integer
Dim hhh12 As Integer
Dim iii12 As Integer
Dim jjj12 As Integer
Dim kkk12 As Integer
Dim lll12 As Integer
Dim mmm12 As Integer
Dim nnn12 As Integer
Dim ooo12 As Integer
Dim ppp12 As Integer
Dim qqq12 As Integer
Dim rrr12 As Integer
Dim sss12 As Integer
Dim ttt12 As Integer
Dim uuu12 As Integer
Dim vvv12 As Integer
Dim www12 As Integer
Dim xxx12 As Integer
Dim yyy12 As Integer
Dim zzz12 As Integer
Dim aaa13 As Integer
Dim bbb13 As Integer
Dim ccc13 As Integer
Dim ddd13 As Integer
Dim eee13 As Integer
Dim fff13 As Integer
Dim ggg13 As Integer
Dim hhh13 As Integer
Dim iii13 As Integer
Dim jjj13 As Integer
Dim kkk13 As Integer
Dim lll13 As Integer
Dim mmm13 As Integer
Dim nnn13 As Integer
Dim ooo13 As Integer
Dim ppp13 As Integer
Dim qqq13 As Integer
Dim rrr13 As Integer
Dim sss13 As Integer
Dim ttt13 As Integer
Dim uuu13 As Integer
Dim vvv13 As Integer
Dim www13 As Integer
Dim xxx13 As Integer
Dim yyy13 As Integer
Dim zzz13 As Integer
Dim aaa14 As Integer
Dim bbb14 As Integer
Dim ccc14 As Integer
Dim ddd14 As Integer
Dim eee14 As Integer
Dim fff14 As Integer
Dim ggg14 As Integer
Dim hhh14 As Integer
Dim iii14 As Integer
Dim jjj14 As Integer
Dim kkk14 As Integer
Dim lll14 As Integer
Dim mmm14 As Integer
Dim nnn14 As Integer
Dim ooo14 As Integer
Dim ppp14 As Integer
Dim qqq14 As Integer
Dim rrr14 As Integer
Dim sss14 As Integer
Dim ttt14 As Integer
Dim uuu14 As Integer
Dim vvv14 As Integer
Dim www14 As Integer
Dim xxx14 As Integer
Dim yyy14 As Integer
Dim zzz14 As Integer
Dim aaa15 As Integer
Dim bbb15 As Integer
Dim ccc15 As Integer
Dim ddd15 As Integer
Dim eee15 As Integer
Dim fff15 As Integer
Dim ggg15 As Integer
Dim hhh15 As Integer
Dim iii15 As Integer
Dim jjj15 As Integer
Dim kkk15 As Integer
Dim lll15 As Integer
Dim mmm15 As Integer
Dim nnn15 As Integer
Dim ooo15 As Integer
Dim ppp15 As Integer
Dim qqq15 As Integer
Dim rrr15 As Integer
Dim sss15 As Integer
Dim ttt15 As Integer
Dim uuu15 As Integer
Dim vvv15 As Integer
Dim www15 As Integer
Dim xxx15 As Integer
Dim yyy15 As Integer
Dim zzz15 As Integer
Dim aaa16 As Integer
Dim bbb16 As Integer
Dim ccc16 As Integer
Dim ddd16 As Integer
Dim eee16 As Integer
Dim fff16 As Integer
Dim ggg16 As Integer
Dim hhh16 As Integer
Dim iii16 As Integer
Dim jjj16 As Integer
Dim kkk16 As Integer
Dim lll16 As Integer
Dim mmm16 As Integer
Dim nnn16 As Integer
Dim ooo16 As Integer
Dim ppp16 As Integer
Dim qqq16 As Integer
Dim rrr16 As Integer
Dim sss16 As Integer
Dim ttt16 As Integer
Dim uuu16 As Integer
Dim vvv16 As Integer
Dim www16 As Integer
Dim xxx16 As Integer
Dim yyy16 As Integer
Dim zzz16 As Integer
Dim aaa17 As Integer
Dim bbb17 As Integer
Dim ccc17 As Integer
Dim ddd17 As Integer
Dim eee17 As Integer
Dim fff17 As Integer
Dim ggg17 As Integer
Dim hhh17 As Integer
Dim iii17 As Integer
Dim jjj17 As Integer
Dim kkk17 As Integer
Dim lll17 As Integer
Dim mmm17 As Integer
Dim nnn17 As Integer
Dim ooo17 As Integer
Dim ppp17 As Integer
Dim qqq17 As Integer
Dim rrr17 As Integer
Dim sss17 As Integer
Dim ttt17 As Integer
Dim uuu17 As Integer
Dim vvv17 As Integer
Dim www17 As Integer
Dim xxx17 As Integer
Dim yyy17 As Integer
Dim zzz17 As Integer
Dim aaa18 As Integer
Dim bbb18 As Integer
Dim ccc18 As Integer
Dim ddd18 As Integer
Dim eee18 As Integer
Dim fff18 As Integer
Dim ggg18 As Integer
Dim hhh18 As Integer
Dim iii18 As Integer
Dim jjj18 As Integer
Dim kkk18 As Integer
Dim lll18 As Integer
Dim mmm18 As Integer
Dim nnn18 As Integer
Dim ooo18 As Integer
Dim ppp18 As Integer
Dim qqq18 As Integer
Dim rrr18 As Integer
Dim sss18 As Integer
Dim ttt18 As Integer
Dim uuu18 As Integer
Dim vvv18 As Integer
Dim www18 As Integer
Dim xxx18 As Integer
Dim yyy18 As Integer
Dim zzz18 As Integer
Dim aaa19 As Integer
Dim bbb19 As Integer
Dim ccc19 As Integer
Dim ddd19 As Integer
Dim eee19 As Integer
Dim fff19 As Integer
Dim ggg19 As Integer
Dim hhh19 As Integer
Dim iii19 As Integer
Dim jjj19 As Integer
Dim kkk19 As Integer
Dim lll19 As Integer
Dim mmm19 As Integer
Dim nnn19 As Integer
Dim ooo19 As Integer
Dim ppp19 As Integer
Dim qqq19 As Integer
Dim rrr19 As Integer
Dim sss19 As Integer
Dim ttt19 As Integer
Dim uuu19 As Integer
Dim vvv19 As Integer
Dim www19 As Integer
Dim xxx19 As Integer
Dim yyy19 As Integer
Dim zzz19 As Integer
Dim aaa20 As Integer
Dim bbb20 As Integer
Dim ccc20 As Integer
Dim ddd20 As Integer
Dim eee20 As Integer
Dim fff20 As Integer
Dim ggg20 As Integer
Dim hhh20 As Integer
Dim iii20 As Integer
Dim jjj20 As Integer
Dim kkk20 As Integer
Dim lll20 As Integer
Dim mmm20 As Integer
Dim nnn20 As Integer
Dim ooo20 As Integer
Dim ppp20 As Integer
Dim qqq20 As Integer
Dim rrr20 As Integer
Dim sss20 As Integer
Dim ttt20 As Integer
Dim uuu20 As Integer
Dim vvv20 As Integer
Dim www20 As Integer
Dim xxx20 As Integer
Dim yyy20 As Integer
Dim zzz20 As Integer
Dim aaa21 As Integer
Dim bbb21 As Integer
Dim ccc21 As Integer
Dim ddd21 As Integer
Dim eee21 As Integer
Dim fff21 As Integer
Dim ggg21 As Integer
Dim hhh21 As Integer
Dim iii21 As Integer
Dim jjj21 As Integer
Dim kkk21 As Integer
Dim lll21 As Integer
Dim mmm21 As Integer
Dim nnn21 As Integer
Dim ooo21 As Integer
Dim ppp21 As Integer
Dim qqq21 As Integer
Dim rrr21 As Integer
Dim sss21 As Integer
Dim ttt21 As Integer
Dim uuu21 As Integer
Dim vvv21 As Integer
Dim www21 As Integer
Dim xxx21 As Integer
Dim yyy21 As Integer
Dim zzz21 As Integer
Dim aaa22 As Integer
Dim bbb22 As Integer
Dim ccc22 As Integer
Dim ddd22 As Integer
Dim eee22 As Integer
Dim fff22 As Integer
Dim ggg22 As Integer
Dim hhh22 As Integer
Dim iii22 As Integer
Dim jjj22 As Integer
Dim kkk22 As Integer
Dim lll22 As Integer
Dim mmm22 As Integer
Dim nnn22 As Integer
Dim ooo22 As Integer
Dim ppp22 As Integer
Dim qqq22 As Integer
Dim rrr22 As Integer
Dim sss22 As Integer
Dim ttt22 As Integer
Dim uuu22 As Integer
Dim vvv22 As Integer
Dim www22 As Integer
Dim xxx22 As Integer
Dim yyy22 As Integer
Dim zzz22 As Integer
Dim aaa23 As Integer
Dim bbb23 As Integer
Dim ccc23 As Integer
Dim ddd23 As Integer
Dim eee23 As Integer
Dim fff23 As Integer
Dim ggg23 As Integer
Dim hhh23 As Integer
Dim iii23 As Integer
Dim jjj23 As Integer
Dim kkk23 As Integer
Dim lll23 As Integer
Dim mmm23 As Integer
Dim nnn23 As Integer
Dim ooo23 As Integer
Dim ppp23 As Integer
Dim qqq23 As Integer
Dim rrr23 As Integer
Dim sss23 As Integer
Dim ttt23 As Integer
Dim uuu23 As Integer
Dim vvv23 As Integer
Dim www23 As Integer
Dim xxx23 As Integer
Dim yyy23 As Integer
Dim zzz23 As Integer
Dim aaa24 As Integer
Dim bbb24 As Integer
Dim ccc24 As Integer
Dim ddd24 As Integer
Dim eee24 As Integer
Dim fff24 As Integer
Dim ggg24 As Integer
Dim hhh24 As Integer
Dim iii24 As Integer
Dim jjj24 As Integer
Dim kkk24 As Integer
Dim lll24 As Integer
Dim mmm24 As Integer
Dim nnn24 As Integer
Dim ooo24 As Integer
Dim ppp24 As Integer
Dim qqq24 As Integer
Dim rrr24 As Integer
Dim sss24 As Integer
Dim ttt24 As Integer
Dim uuu24 As Integer
Dim vvv24 As Integer
Dim www24 As Integer
Dim xxx24 As Integer
Dim yyy24 As Integer
Dim zzz24 As Integer
Dim aaa25 As Integer
Dim bbb25 As Integer
Dim ccc25 As Integer
Dim ddd25 As Integer
Dim eee25 As Integer
Dim fff25 As Integer
Dim ggg25 As Integer
Dim hhh25 As Integer
Dim iii25 As Integer
Dim jjj25 As Integer
Dim kkk25 As Integer
Dim lll25 As Integer
Dim mmm25 As Integer
Dim nnn25 As Integer
Dim ooo25 As Integer
Dim ppp25 As Integer
Dim qqq25 As Integer
Dim rrr25 As Integer
Dim sss25 As Integer
Dim ttt25 As Integer
Dim uuu25 As Integer
Dim vvv25 As Integer
Dim www25 As Integer
Dim xxx25 As Integer
Dim yyy25 As Integer
Dim zzz25 As Integer
Dim aaa26 As Integer
Dim bbb26 As Integer
Dim ccc26 As Integer
Dim ddd26 As Integer
Dim eee26 As Integer
Dim fff26 As Integer
Dim ggg26 As Integer
Dim hhh26 As Integer
Dim iii26 As Integer
Dim jjj26 As Integer
Dim kkk26 As Integer
Dim lll26 As Integer
Dim mmm26 As Integer
Dim nnn26 As Integer
Dim ooo26 As Integer
Dim ppp26 As Integer
Dim qqq26 As Integer
Dim rrr26 As Integer
Dim sss26 As Integer
Dim ttt26 As Integer
Dim uuu26 As Integer
Dim vvv26 As Integer
Dim www26 As Integer
Dim xxx26 As Integer
Dim yyy26 As Integer
Dim zzz26 As Integer
Dim aaa27 As Integer
Dim bbb27 As Integer
Dim ccc27 As Integer
Dim ddd27 As Integer
Dim eee27 As Integer
Dim fff27 As Integer
Dim ggg27 As Integer
Dim hhh27 As Integer
Dim iii27 As Integer
Dim jjj27 As Integer
Dim kkk27 As Integer
Dim lll27 As Integer
Dim mmm27 As Integer
Dim nnn27 As Integer
Dim ooo27 As Integer
Dim ppp27 As Integer
Dim qqq27 As Integer
Dim rrr27 As Integer
Dim sss27 As Integer
Dim ttt27 As Integer
Dim uuu27 As Integer
Dim vvv27 As Integer
Dim www27 As Integer
Dim xxx27 As Integer
Dim yyy27 As Integer
Dim zzz27 As Integer
Dim aaa28 As Integer
Dim bbb28 As Integer
Dim ccc28 As Integer
Dim ddd28 As Integer
Dim eee28 As Integer
Dim fff28 As Integer
Dim ggg28 As Integer
Dim hhh28 As Integer
Dim iii28 As Integer
Dim jjj28 As Integer
Dim kkk28 As Integer
Dim lll28 As Integer
Dim mmm28 As Integer
Dim nnn28 As Integer
Dim ooo28 As Integer
Dim ppp28 As Integer
Dim qqq28 As Integer
Dim rrr28 As Integer
Dim sss28 As Integer
Dim ttt28 As Integer
Dim uuu28 As Integer
Dim vvv28 As Integer
Dim www28 As Integer
Dim xxx28 As Integer
Dim yyy28 As Integer
Dim zzz28 As Integer
Dim aaa29 As Integer
Dim bbb29 As Integer
Dim ccc29 As Integer
Dim ddd29 As Integer
Dim eee29 As Integer
Dim fff29 As Integer
Dim ggg29 As Integer
Dim hhh29 As Integer
Dim iii29 As Integer
Dim jjj29 As Integer
Dim kkk29 As Integer
Dim lll29 As Integer
Dim mmm29 As Integer
Dim nnn29 As Integer
Dim ooo29 As Integer
Dim ppp29 As Integer
Dim qqq29 As Integer
Dim rrr29 As Integer
Dim sss29 As Integer
Dim ttt29 As Integer
Dim uuu29 As Integer
Dim vvv29 As Integer
Dim www29 As Integer
Dim xxx29 As Integer
Dim yyy29 As Integer
Dim zzz29 As Integer
Dim aaa30 As Integer
Dim bbb30 As Integer
Dim ccc30 As Integer
Dim ddd30 As Integer
Dim eee30 As Integer
Dim fff30 As Integer
Dim ggg30 As Integer
Dim hhh30 As Integer
Dim iii30 As Integer
Dim jjj30 As Integer
Dim kkk30 As Integer
Dim lll30 As Integer
Dim mmm30 As Integer
Dim nnn30 As Integer
Dim ooo30 As Integer
Dim ppp30 As Integer
Dim qqq30 As Integer
Dim rrr30 As Integer
Dim sss3