返回列表 上一主題 發帖

[發問] 請教 =等號 與 Tab 的問題

回復 1# verify9k
  1. Sub test1()
  2.    
  3.     Range("a1").NumberFormatLocal = "@"
  4.     Range("a1") = "=+a7pin"
  5.    
  6. End Sub

  7. Sub test2()
  8.     Range("a2") = "'" & "=+a7pin"
  9. End Sub


  10. Sub test3()
  11.     a$ = "a" & vbTab & "b"
  12.     Debug.Print a$
  13.     Debug.Print Replace(a$, vbTab, " ")
  14.     Debug.Print Replace(a$, Chr(9), " ")
  15. End Sub
複製代碼

TOP

        靜思自在 : 願要大、志要堅、氣要柔、心要細。
返回列表 上一主題