新手小白求问为什么照着P18打出的代码无法运行？

跨时代123

Dim lLastRow As Long
Sub myMain()
  Dim rng As Range
  lLastRow = Range("A" & Cells.Rows.Count).End(xlUp).Row
  Range("D3:E" & lLastRow).Clear
  '调用获取加班系数的过程'
  Call GetExtraNum
  '调用计算加班费的刚才'
  Call CalculateExtra
  Set rng = Range("E3:E" & lastRow)
  '调用设置加班费列格式的过程
  Call SetFormat(rng)
  End Sub


望高手指点，谢谢！

山中老人

呵呵！
   【GetExtraNum】【CalculateExtra】。。。 这些都是自定义的程序过程或函数名称。是自己写的程序代码。
你只给个名字叫电脑如何运行？
除非调用的是系统函数或过程，否则你必须提供函数或过程的程序代码。
就像你在家里，学老总发号施令：“让张秘书给我泡杯茶！”{:soso_e104:}
你老婆一耳光给你：“家里没有张秘书！要找张秘书滚出去！.....”{:soso_e111:}

跨时代123

山中老人 发表于 2015-8-17 08:29
呵呵！
   【GetExtraNum】【CalculateExtra】。。。 这些都是自定义的程序过程或函数名称。是自己写的程 ...

谢谢你的耐心指导，并且很形象生动，感谢！