1樓:匿名使用者
strname="main.textbox6"
'strname賦值
'該賦值沒有錯:strname串值=="main.textbox6"
set obj=strname
'設定文字為物件
'錯誤:將一個串值賦予一個物件變數,「型別不匹配」
『建議:使用如下語句可以解決。使用窗體controls屬性(帶索引號),賦予物件變數
'控制元件的索引號0起,n-1止,n是窗體中的控制元件個數。
set obj = me.controls(0)』例項:
textbox6.text = "試試看"
set obj = me.controls(0) 『窗體中僅有textbox6文字控制元件
msgbox obj.text
』輸出顯示:試試看
2樓:匿名使用者
dim strname as string '宣告strname為文字
dim obj as object '宣告obj為物件
strname = "textbox6" 'strname賦值set obj = callbyname(main, strname, vbget) '其中main為工作表的名稱
vba中如何定義文字型變數
3樓:tn瓶邪
物件就是的賦值,必需使用set語句
public sub 測試()
dim dyg as range
set dyg = range("b2")end sub
你完全可以不用定義為單元格物件,直接賦值就行了public sub 測試()
dim dyg$'定義字串變數
dyg = range("b2")
end sub
4樓:匿名使用者
參考下面的文字,我剛才定義了個string, 試讀了1000多漢字沒問題啊?難道公共變數有限制?試下固定長度變數看看?
***********************************===
1 vba中的字串
vba不僅可以處理數字,也可以處理文字(字串)。vba提供了兩類字串:
一類為固定長度的字串,宣告時包含指字的字元數。例如,下面的語句
dim strfixedlong as string*100
宣告字串變數後,無論賦予該變數多少個字元,總是隻包含100個字元,但字串最長不超過65526個字元,且需要使用trim函式去掉字串中多餘的空格。定長字串只有在必要時才使用。
另一類為動態字串。例如,宣告字串變數dim strdynamic as string後,可以給該變數任意賦值,最多可包含20億個字元。
********************
用vba如何設定單元格的格式型別
5樓:慶年工坊
sub s()
[a1].numberformatlocal = "@" '設定a1單元格為文字格式
[b1].numberformatlocal = "yyyy/m/d" '設定b1單元格為日期格式
[c1].numberformatlocal = "[$-f400]h:mm:ss am/pm" '設定c1單元格為時間格式
[d1].numberformatlocal = "0.00%" '設定d1單元格為百分比格式
[e1].numberformatlocal = "0.00e+00" '設定e1單元格為科學記數法格式
[f1].numberformatlocal = "g/通用格式" '設定f1單元格為常規格式
end sub
6樓:匿名使用者
cells(1,i).value = format(cells(1,i).value, "###0.00")
range("a1:a65536").numberformatlocal = "@"
range("a1:a65536").numberformatlocal= "g/通用格式"等等
7樓:屁屁金手指
excel攻略第十四招:vba之單元格的格式
使用vba修改ppt檔案中的物件.求高手,必重謝! 10
8樓:匿名使用者
方便的話,檔案發來看下?
私信你了。
————————————————————
郵箱發我啊
vba中怎麼獲取所選檔案物件
9樓:匿名使用者
如果要開啟檔案操作
set wb=workbooks.open(檔案路徑)然後操作即可
要獲取屬性,可以使用fso檔案系統,getfile(路徑)
10樓:vb程式設計解放雙手
使用檔案控制元件,或者使用系統檔案選中api
11樓:匿名使用者
看你想獲取所選檔案的什麼屬性,對檔案操作 用vb方便點
excel vba選取行,設定單元格為文字(求助)
12樓:匿名使用者
sub 文字型()
x = [d65536].end(3).row + 3range("d1:d" & x).numberformatlocal = "@"
end sub
selection需要select有內容才行。
VBA如何把數字識別為文字轉成時間格式
對於月份的自動識別可以使用函式 monthname month abbreviate 返回一個表示指定月份的字串。monthname函式語法有如下幾部分 month 必需的。月份的數值表示。例如一月是1,二月是2,等等。abbreviate 可選的。boolean值,表示月份名是否縮寫。如果忽略,預...
ecel中vba如何在模組中自定義函式定義好了之後
在模組裡定義 function aa a aa a end function 窗體裡呼叫 x aa 1 msgbox x vb函式分 baisub 無返回值 以及dufunction 有返回值 簡單範例 public function ss as stringss 我是 zhi end functi...
css中列表項文字的顏色設定為綠色
找到元素,給元素新增color就可以了,比如想要設定顏色的字型 box 通過class抓取div 然後設定顏色為綠色,希望採納,謝謝。看到這個問題我想回答color green,然後我回答了,你會採納嗎?透明度的話ie下用filter alpha opacity 50 範圍0到100,非ie下用op...