Ms Office[鲜花]
技巧分享:Ctrl+g ppt组合
Alt+”=” 快速求和
课堂作业:
(1)用宏除去文本中的空格
用trim和mid函数
输入Sub Macrol 0
Macro1 Macrc快捷键: Ctrl+k Dim str As String Dim i As Integer Dim j As Integer Dim stu hs String Dim k As Integer Fork=1To 3
str=Cells(k, 1) i = Len(str)
Forj=1 To i
stu=stu + Trim Mid(str, j,10)
Next
Cells(k, 2) = stu=““ Next
End Sub
(2)用宏来制作九九乘法表
输入Sub Macrol ()
Macro1 Macrc快捷键: Ctrl+k Dim str As String Dim i As Integer Dim j As Integer Dim stu hs String Dim k As Integer Fork=1To 3
str=Cells(k, 1) i = Len(str)
Forj=1 To i
stu=stu + Trim Mid(str, j,10)
Next
Cells(k, 2) = stu=““ Next
End Sub
技巧分享:Ctrl+g ppt组合
Alt+”=” 快速求和
课堂作业:
(1)用宏除去文本中的空格
用trim和mid函数
输入Sub Macrol 0
Macro1 Macrc快捷键: Ctrl+k Dim str As String Dim i As Integer Dim j As Integer Dim stu hs String Dim k As Integer Fork=1To 3
str=Cells(k, 1) i = Len(str)
Forj=1 To i
stu=stu + Trim Mid(str, j,10)
Next
Cells(k, 2) = stu=““ Next
End Sub
(2)用宏来制作九九乘法表
输入Sub Macrol ()
Macro1 Macrc快捷键: Ctrl+k Dim str As String Dim i As Integer Dim j As Integer Dim stu hs String Dim k As Integer Fork=1To 3
str=Cells(k, 1) i = Len(str)
Forj=1 To i
stu=stu + Trim Mid(str, j,10)
Next
Cells(k, 2) = stu=““ Next
End Sub
【今日推荐】蕊诗秋冬性感吊带长袖睡衣女
【现价】178元,领40元券,只要【138元】秒杀,月销142件
【领券下单】https://t.cn/Rj6kcDE
【查看商品】:手机端复制这条信息¥1vlR0STU7j8¥,打开☞手机淘宝☜即可查看并下单!
【推荐理由】细腻丝滑的纯色衣料,点缀内搭吊带,领口性感迷人,复古典雅,气质升华。
【现价】178元,领40元券,只要【138元】秒杀,月销142件
【领券下单】https://t.cn/Rj6kcDE
【查看商品】:手机端复制这条信息¥1vlR0STU7j8¥,打开☞手机淘宝☜即可查看并下单!
【推荐理由】细腻丝滑的纯色衣料,点缀内搭吊带,领口性感迷人,复古典雅,气质升华。
#shopbop# 牛仔裤&墨镜还有一些刚才漏掉的……Citizens of Humanityhttps://t.cn/RqU5AVR J Brandhttps://t.cn/RLgDYZO Motherhttps://t.cn/RqU5Ux6 Framehttps://t.cn/Ri50MaN Levi'shttps://t.cn/Ri50Ma9 Karen Walkerhttps://t.cn/zO4w7wK Quayhttps://t.cn/Ri50Ma0 Acne Studioshttps://t.cn/RL54OeE MANU Atelierhttps://t.cn/Ri50MaC
✋热门推荐