VBA學習中的一些小經驗

2021-07-04 04:02:50 字數 1498 閱讀 8901

1.關於vba字串格式化

下面的博主寫的很詳細,我就直接貼過來就是了,非常感謝。

2.vba對cell賦值的幾種方式

比如給 a1 賦值 5 ,有下面方法:

1、range("a1").value=5

2、cells(1,1)=5

3、[a1]=5

3.vba字串的拼接

字串的拼接用&符號連線,如下

ctaxout = "(消費稅\" & ctax & ")"

4.copy新建乙個sheet

sheets("sheet1)").copy after:=sheets(i )

5.計算資料有多少行

endrow = worksheets("data sheet").[a100000].end(3).row

//【】裡面的數值一定要比預想的行數更大,比如這裡的100000

6.設定文字的自適應顯示

設定文字的字型大小以適應文字框的大小

對單元格進行縮小字型自動填充

range("l19").shrinktofit = true

單元格 => 格式 => 自動填充

7.設定對齊方式

public sub 技巧4_151()

dim myrange as range

set myrange = range("a1")             '指定任意單元格

with myrange

.value = "excelvba實用技巧大全"

.horizontalalignment = xlright

msgbox "水平右對齊。"

.horizontalalignment = xlleft

msgbox "水平左對齊。"

.horizontalalignment = xlcenter

msgbox "水平居中。"

.horizontalalignment = xldistributed

msgbox "水平分散對齊。"

.verticalalignment = xltop

msgbox "垂直靠上。"

.verticalalignment = xlbottom

msgbox "垂直靠下。"

.verticalalignment = xlcenter

msgbox "垂直居中。"

.horizontalalignment = xlgeneral

.verticalalignment = xlgeneral

msgbox "恢復預設。"

end with

set myrange = nothing

end sub

來自以下部落格,非常感謝

8.copy乙個worksheet並重命名

sheets("印刷仕様_通常用").copy after:=sheets(i + 2)

set sh = activesheet

sh.name = "new name"

vue Element ui中的一些小經驗總結

vue 是通過渲染來觸發資料的依賴收集的,也就是說,假如 data 中有某些資料並沒有在模版中使用的話,更新這些資料的時候,是不會觸發更新的。element ui 中的el input 按照vue官方api新增鍵盤事件不生效,這是因為在el input 的input外邊封裝了一層div。只要在事件後...

web開發的一些小經驗

1.ajax的使用之一 ajax success function msg 返回的資料在msg中,成功的時候才呼叫 success函式。2.載入頁面的時候就呼叫js document ready function 3.樣式的使用 img removeclass imgtest2 移除樣式 img a...

關於vue使用的一些小經驗

這一年來說,vue的勢頭很猛,使用者量 噌 噌 噌 的漲 為了不掉隊不落伍 在後台大哥的脅迫下,不得不選擇用了它 剛開始很難接受vue的寫法,在編輯器裡很容易報錯,基本上每行都會出現紅色的波浪線 這讓剛用vue的我很炸毛 然鵝,皇天不負有心人,成功的把vue拿下了 不要失望,雖然我的專案就是簡單的幾...