首页
/
每日頭條
/
圖文
/
vba 合并單元格信息
vba 合并單元格信息
更新时间:2026-08-07 23:26:46

判斷合并單元格,用肉眼很容易就判斷了,為什麼我要用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後面代碼。

,
Comments
Welcome to tft每日頭條 comments! Please keep conversations courteous and on-topic. To fosterproductive and respectful conversations, you may see comments from our Community Managers.
Sign up to post
Sort by
Show More Comments
推荐阅读
商河美景圖(山東好景北緯37遇見商河之美)
商河美景圖(山東好景北緯37遇見商河之美)
     北緯37°是我國的一條經濟帶,有濟南“北大門”之稱的商河就在這條帶上。秋風吹拂,天高雲淡,途經商河,遇見北緯37°康旅示範小鎮,讓人眼前一亮。漫步小鎮,路邊鮮花盛開,湖水碧波蕩漾,徽派建築群錯落有緻,置身其中,恍若來到江南水鄉。商河北緯37°是山東省省級文旅項目,濟南市重點項目,已申報為國家4A級風景區。這裡以康養為核心,并集合教育、文旅、農業和地...
2026-08-07
廣東最好的海島旅遊攻略(廣東最适合短途遊玩的10大海島)
廣東最好的海島旅遊攻略(廣東最适合短途遊玩的10大海島)
  清明小長假馬上就要到啦!   各位小夥伴是不是早就按捺不住   想去浪浪浪浪浪的心呐!   今天,最姐就給大家帶來   10條廣州周邊海島遊線路   總有一款适合你!      惠州 喜洲島   喜洲島又叫許洲,當地人稱“南丫島”   小島就在壩光村對面的海中   是一個無人管理的荒島   這裡比三亞安靜、比洱海多情            喜洲島的沙灘有...
2026-08-07
15秒記一個單詞第455個(20秒記一個單詞第2127個)
15秒記一個單詞第455個(20秒記一個單詞第2127個)
     explode /ɪkˈspləʊd/ v. 勃然(大怒);大發(雷霆);突然發生(危險):點擊收聽音頻跟讀 ↓↓↓ ↓↓↓ ↓↓↓例句/詞組:Suddenly Jacky exploded with rage.   查爾斯勃然大怒。   英語解釋:to suddenly become very angry or dangerous   • 勃然(...
2026-08-07
民進會員享有什麼權利(民進會員在行動)
民進會員享有什麼權利(民進會員在行動)
  近日,上海本土新冠肺炎疫情反複,防控形勢嚴峻複雜。廣大民進會員積極貫徹落實疫情防控的部署要求,凝心聚力,勇擔責任,奔赴疫情防控各條戰線,為堅決打赢疫情防控阻擊戰,全力守護城市安全有序與市民群衆健康安全,展現民進擔當與作為。   民進金山區委   堅守崗位,守土有責      左圖:吳鳴;右圖:俞紅麗(左二)   亭林醫院閉環管理期間,民進金山區委副主委吳...
2026-08-07
或許我們真的合适隻是時間不湊巧(隻是時間不湊巧)
或許我們真的合适隻是時間不湊巧(隻是時間不湊巧)
  起初說好的一輩子,到後來說散也就散了,來年最陌生的是昨日最親的某某。      等待不是為了你能回來,而是找個借口不離開。      我們都很好,隻是時間不湊巧。      姑娘,長點心吧,别把人海一粒渣當成河畔一朵花。      既然已經塵埃落定,你又何必心神不甯。早知結局如此凄涼,當初何必義無反顧。給你機會從頭再來,你又如何預知未來。      靠得...
2026-08-07
Copyright 2023-2026 - www.tftnews.com All Rights Reserved