tft每日頭條

 > 圖文

 > vba 合并單元格信息

vba 合并單元格信息

圖文 更新时间:2025-01-29 00:26:25

判斷合并單元格,用肉眼很容易就判斷了,為什麼我要用vba?

先看看下圖。

vba 合并單元格信息(vba怎麼判斷合并單元格)1

這個我虛構的一張通訊錄表格,現實裡面情況可能更複雜,包含了職位,座機等等其他信息。

我想幹嘛?

說起來簡單,就是把這種通訊錄表格搞成vcf,直接導入手機,這樣就用不着每次打開excel表格查詢通訊錄了,直接在手機裡面查就行了。

那為什麼要用vba,不可以一個個地手動錄入嗎?

你去錄入撒!

隻要超過50個,我看你的手錄完都會抖的。

這裡就想到了vba,這個程序一旦弄出來,應該可以幫到很多人,我相信很多人應該會有我一樣的需求。

而要實現這個程序,第一步我覺得是先判斷合并單元格,因為整個vcf格式,需要填寫部門名稱,這個部門名稱就是合并單元格。

依次判斷,是合并單元格就把内容取出來,當作部門名稱填寫進去。

代碼如下:

sub 判斷合并單元格()

if range(“A1”).mergecells=true then

msgbox “合并單元格”

end if

end sub

如下圖:

vba 合并單元格信息(vba怎麼判斷合并單元格)2

運行後我們得到下圖結果:

vba 合并單元格信息(vba怎麼判斷合并單元格)3

這個代碼沒有什麼複雜的,關鍵點有兩個。

一是range(“A1”).mergecells,前面的range不用說,這個就是指定的A1,主要是後面的mergecells,這個是A1的屬性,值是邏輯型的,也有兩個true和false。

true就是是合并單元格,false就是不是合并單元格。

二是if then語句,這個格式為:

if 條件 then

語句

end if

條件為真,那麼就執行語句,條件為假就執行end if後面代碼。

,

更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!

查看全部

相关圖文资讯推荐

热门圖文资讯推荐

网友关注

Copyright 2023-2025 - www.tftnews.com All Rights Reserved