返回列表 上一主題 發帖

[發問] 此巨集為何錯??

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
1# 跳轉到 »
發表於 2013-8-14 07:52 | 顯示全部帖子
模組裡有一個耀輸1, 程式碼為Public sz
是否錯誤??
應該為 Public sz as ???
耀輸1 這名字好像不能改， ...
t8899 發表於 2013-8-14 07:11

TOP

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
2#
發表於 2013-8-14 08:56 | 顯示全部帖子
為什麼 只有 Public sz 語法錯誤還能運作??
t8899 發表於 2013-8-14 08:43

宣告 Public sz  語法並沒錯誤，它因事先無明確型態宣告，
故會在後續的應用上，根據其相對應之型態而作為其型態宣告。
Public sz As Variant  只是將型態加以明確定義。
養成型態明確定義也是撰寫程式的一種好習慣。

TOP

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
3#
發表於 2013-8-14 09:57 | 顯示全部帖子
回復 36# t8899

TOP

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
4#
發表於 2013-8-14 10:41 | 顯示全部帖子
本帖最後由 c_c_lai 於 2013-8-14 10:53 編輯
我的是1 ，我把它改為2 錯誤還是一樣
型態不符合
t8899 發表於 2013-8-14 10:37

& sz(i, 1) & "===>" & sz1(i, 1) 改成
& CStr(sz(i, 1)) & "===>" & CStr( sz1(i, 1)) 呢？

TOP

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
5#
發表於 2013-8-14 10:59 | 顯示全部帖子
回復 40# t8899
因為我沒有你目前測試的檔案，
故無法一一推敲你的數據過程，
你是用 CStr() 還是 CSng() ?

TOP

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
6#
發表於 2013-8-28 07:28 | 顯示全部帖子
回復 63# t8899
  1. Sub eighty()
  2.     With Sheets("Sheet1")
  3.         .Select
  4.         .Range("a65536").End(xlUp).Offset(1).Select
  5.         Application.SendKeys "{Home}", True
  6.         Application.SendKeys "^{;}", True
  7.         Application.SendKeys "{enter}", True
  8.         .Range("B2:N2").Select
  9.     End With
  10. End Sub
複製代碼
試試看！

TOP

        靜思自在 : 話多不如話少，話少不如話好。
返回列表 上一主題