首页
/
每日頭條
/
圖文
/
vba 合并單元格信息
vba 合并單元格信息
更新时间:2024-12-26 09:09:11

判斷合并單元格,用肉眼很容易就判斷了,為什麼我要用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
推荐阅读
四好農村路助力鄉村發展
四好農村路助力鄉村發展
四好農村路助力鄉村發展?“過去,從村裡走到鎮裡,是出門天不亮,回家月亮上現在,公路修好了,客運車開進了村裡,在家門口就能擡腳上車進城”遵義市彙川區芝麻鎮竹元村黨支部副書記王芳講述着因“四好農村路”建設,給村裡群衆帶來的便利,我來為大家科普一...
2024-12-26
漢中市稻漁産業現狀
漢中市稻漁産業現狀
漢中市稻漁産業現狀?“縣上提出的振興資中鲶魚規劃,讓投資者看到了商機現在大家都想來投資”7月27日,資中縣水産漁政局副局長李東在辦公室忙着整理該縣的漁業發展材料最近一兩個月,李東和局長賴強都成了大忙人,每隔幾天,他們都要陪同意向投資者到鄉鎮...
2024-12-26
為什麼蜉蝣的生命隻有一天
為什麼蜉蝣的生命隻有一天
蘇轼在《前赤壁賦》寫到“寄蜉蝣于天地,渺滄海之一粟。”他感歎人就像蜉蝣那樣短促地寄生于天地之間,渺小得又像飄浮在大海裡的一顆小米。說實話,當初學習這首詩的時候并不了解蜉蝣是什麼東西,隻覺得是一種名字好聽的動物罷了。後來,在不斷的學習中我又遇...
2024-12-26
當歸配什麼治血瘀
當歸配什麼治血瘀
今天開始,我将新開一個系列,這個系列就是中醫裡面關于血液類疾病認識,當然,本人的這個系列也不會做到窮盡所有的中醫裡面的血液病,而隻是選擇一些常見的,與我們老百姓的日常養生保健密切相關的進行一些簡單的讨論,此外,本人也将打算開另外的一個系列就...
2024-12-26
如何推動一國兩制實踐行穩緻遠
如何推動一國兩制實踐行穩緻遠
全國政協十三屆二次會議11日下午3點舉行第四次全體會議,委員進行大會發言。3月11日,全國政協十三屆二次會議在北京人民大會堂舉行第四次全體會議。這是李慧瓊委員作大會發言。新華社記者丁海濤攝民建聯主席,香港立法會議員、行政會議成員李慧瓊:我發...
2024-12-26
Copyright 2023-2024 - www.tftnews.com All Rights Reserved