返回列表 上一主題 發帖

[發問] TEXTBOX問題尋問

rouber590324

帖子
560 
主題
159 
精華
0 
積分
723 
點名
0  
作業系統
WINDOWS 
軟體版本
xp 
閱讀權限
50 
性別
男 
來自
桃園 
註冊時間
2014-9-10 
最後登錄
2023-10-31 

論壇榮譽勳章論壇贊助勳章熱烈參與勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2017-11-28 13:54 | 顯示全部帖子

[發問] TEXTBOX問題尋問

Dear all 大大
1.有書寫圖一程式
  1.1 其中 Text Box 62560 日久忘記於表單何處.有無辦法尋找它於表單何處??
2.煩不吝賜教  thanks*10000  

圖一
   Sub TEXTBOX62560刪除1()
    Sheet14.Select
    Range("A1").Select
    Y = Sheet3.Range("D218")
    If Y - 1 = 0 Then
    ActiveSheet.Shapes("Text Box 62560").Select
    Selection.Delete
    End If
    Range("A1").Select
   
   End Sub
收藏 分享
羅

        靜思自在 : 【是否發揮了良能？】人間壽命因為短暫，才更顯得珍貴。難得來一趟人間，應問是否為人間發揮了自己的良能，而不要一味求長壽。
返回列表 上一主題