返回列表 上一主題 發帖

[發問] (謝謝恩師們，7/4完成) 關於自訂表單TextBox輸入關鍵字出現資料(附範例)

dechiuan999

帖子
231 
主題
55 
精華
0 
積分
293 
點名
0  
作業系統
winxp 
軟體版本
office2003 
閱讀權限
20 
性別
男 
來自
KEELUNG 
註冊時間
2010-7-24 
最後登錄
2018-8-28 
1# 跳轉到 »
發表於 2012-6-27 08:04 | 顯示全部帖子
回復 2# GBKEE


    版主大大您好：

  在關鍵字輸入範例裡，
小弟對於下列語法
的應用不是很了解，
煩請版主大大能明示。

一、
.Replace "*" & TextBox1 & "*", "=what this", xlPart

為何用"=what this"，小弟有在工作表上的輸入值地方有看到
顯示為=what this不知其用意為何？

二、
.SpecialCells(xlCellTypeFormulas, xlErrors).Name = "xxx"
此語法小弟一直不懂得如何去應用及驗證呢？
在TEXTBOX1輸入查詢時，在B欄儲存格會出現#NAME?

三、
With ComboBox1
     For Each E In [XXX]
       .AddItem E.Value
     Next
.Value = .List(0)
    End With
為何區域變數看不到
有此物件變數[XXX]，
又此物件變數由何而來呢？

謝謝版主大大。

TOP

dechiuan999

帖子
231 
主題
55 
精華
0 
積分
293 
點名
0  
作業系統
winxp 
軟體版本
office2003 
閱讀權限
20 
性別
男 
來自
KEELUNG 
註冊時間
2010-7-24 
最後登錄
2018-8-28 
2#
發表於 2012-6-27 17:45 | 顯示全部帖子
回復 8# GBKEE


    版主大大您好：

謝謝您的說明
小弟已理解name
在此的用意
Sub aa()
   
    Dim mSht As Worksheet
    Dim mRng As Range, E As Range
    Set mSht = Worksheets(1)
    With mSht
        Set mRng = .Range("a1:c5")
            mRng.Name = "NewName"
            [newname].Select
        For Each E In [newname]
            MsgBox E.Address
        Next
        
    End With
End Sub


感恩大大！

TOP

        靜思自在 : 有願放在心裡，沒有身體力行，正如耕田不播種，皆是空過因緣。
返回列表 上一主題