临时语法VBA
来源:互联网 发布:康佳液晶电视网络连接 编辑:程序博客网 时间:2024/05/16 16:18
Sub dy()
'Dim str$
'startname:
'str = InputBox("输入用户名")
'InputBox ("dddd")
'If str <> "admin" Then GoTo startname
'Dim dt As Date
'dt = Now
'Range("A1").Value = dt
'Dim rng As Range
'For Each rng In Sheet1.Range("a2:a10")
'If rng = "good" Then rng.Interior.ColorIndex = 3
'Next
'
'
'Dim wsh As Worksheet
'On Error Resume Next
'For Each wsh In Worksheets
'n = n + 1
' Sheet1.Cells(n, 2) = wsh.Name
'
'Next
'-----------------
Dim aa
On Error GoTo 0
aa = Range("g8").Value
bb = Range("g7").Value
'If aa = "--" Then
'Range("A8").Value = aa - bb
On Error GoTo 100
Range("A9").Value = aa - bb
100:
Range("A9").Value = "未打卡"
'dds:
Exit Sub
'End If
End Sub
0 0
- 临时语法VBA
- VBA语法
- VBA语法-基础语法
- VBA语法基础(上)
- VBA语法基础(下)
- VBA语法概述
- VBA语法基础(上)
- VBA语法基础(下)
- VBA语法概述
- VBA语法概述
- VBA语法基础(上)
- VBA语法基础(下)
- VBA语法基础
- Excel VBA 基础语法
- VBA语法提要
- VBA的常见语法整理
- Excel VBA一些操作语法
- vba excel学习系列(二)---vba基本语法
- 来自 W3School 的 HTML 快速参考。可以打印它,以备日常使用。
- VBA学习记忆点小记:www.51zxw.net
- mongoDB & Nodejs 访问mongoDB (一)
- EXCEL密码VBA解决
- EXCEL自定义考勤函数
- 临时语法VBA
- VB封装Excel_VBA代码为Dll
- 按钮事件
- C#题目总结
- 工作薄、工作表所有事件一览表
- 搬圆桌
- 考勤加列及引用自定义函数
- Protocol Buffer技术详解(语言规范)
- Dagger2 入门介绍