按键盘上方向键 ← 或 → 可快速上下翻页，按键盘上的 Enter 键可回到本书目录页，按键盘上方向键 ↑ 可回到本页顶部！
————未阅读完？加入书签已便下次继续阅读！
0709000309221004055 、金州支行 400301459508091
解答：1、用函数可以解决。 假如 A1 为 中行41785015110010091252
则 B1=LEFT（A1；（SEARCHB（〃？〃；A1；1）…1）/2）、C1=MID（A1；LEN（B1）＋1；50）、随后将B1、C1 的公
式往下复制。
2、Sub 分列（）
For Each jk In Sheet1。UsedRange。Columns（1）。Cells
For i = 1 To Len（jk。Formula）
If Abs（Asc（Mid（jk。Formula； i； 1））） 《 256 Then
Sheet1。Cells（jk。Row； （jk。Column ＋ 1））。Formula = 〃'〃 & Right（jk。Formula；
（Len（jk。Formula） i ＋ 1））
jk。Formula = Left（jk。Formula； （i 1））
Exit For
End If
Next i
Next
End Sub
3、是否将Asc（Mid（jk。Formula； i； 1）） 《 256 改成 47 《 Asc（Mid（jk。Formula； i； 1）） 《 58
会更好，因为它只将数字抽出，如果数字前有英文字的话将抽往数字列。
4、我看帮助中 instr 函数不错
配合循环速度应快些
500 个不连续的数之和的求法
我有一个表格，有一列数据是以 6 个单元格为一个单位做一次小计，我在小计中加入了公式
但是我还想求一下这个小计的总合，我想加入一个公式，但是我有 SUM 到了 50 多个时就加不
进去了，用加号连加也不行，不知这个问题怎么解决
解答：用 SubTotal（）解决即可
330
…………………………………………………………Page 331……………………………………………………………
如何使输入的英文单词第一个字母变成大写
解答：Private Sub Worksheet_Change（ByVal Target As Range）
Target。Value = Application。WorksheetFunction。Proper（Target。Text）
End Sub
在一个表中有两列日期型数字请问如何在第三列中得到其差 （两日期间的天数）
解答：=DATEDIF（A1；B1；〃d〃）
问：我用了 datedif 发现一个问题 、即当A 列B 列时出错了 、
请问用什么办法解决
答：=IF（A1》B1；DATEDIF（B1；A1；〃d〃）；DATEDIF（A1；B1；〃d〃））
重要的 EXCEL 文件坏了 （文件带密码）有没有 EXCEL 修复工具
解答：Excel 2000
数据》》取得外部数据》》新增数据库查询》》Excel File*》》找到档案》》
＇选项＇勾选所有选项》》 会找到所有未命名＇区块＇如 Sheet1
》》找到字段》》其它跟着查询精灵导引一步一步作
此中间层组件叫作 Microsoft Query
可以用来拯救＇毁损档案＇
只要求简单的把数据从分表直接追加到总表
解答：你可以用 Lookup；vlookup 等函数。
A1 中输入 11：22：22 要求每间隔一秒刷新一次
解答： sub mytime
range（〃a1〃）=now（）
Application。OnTime Now ＋ TimeValue（〃00：00：01〃）； 〃mytime〃
end sub
怎样用函数来显示某月的最后一天是几号
答：= DAY（DATE（年份；月份＋1；1）…1）
如何用 excel 求解联立方程
x…x（7/y）^z=68
x…x（20/y）^z=61
x…x（30/y）^z=38
解答：这是一个指数函数的联列方程。步骤如下
1、令 X/Y=W 则有
X（7W）^z=68
X（20W）^Z=61
X（30W）^Z=38
331
…………………………………………………………Page 332……………………………………………………………
2、消去 X
（20^Z…7^Z）W^Z=7
（30^Z…20^Z）W^Z=23
3、消去W
（30^Z…20^Z）/（20^Z…7^Z）=23/7
由此求得Z=3。542899
x=68。173955
y=781。81960
请问如何在函数中同时使用两个条件
例：在 IF 同时使用条件B1》0 和 B10；B1