返回列表 上一主題 發帖

[發問] 如何判斷儲存格中有冒號？

av8d

帖子
700 
主題
275 
精華
0 
積分
1001 
點名
1  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2024-4-10 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2022-1-29 16:31 | 顯示全部帖子

[發問] 如何判斷儲存格中有冒號？

判斷儲存格是否有冒號.rar (6.49 KB)

詳如附件，在B欄手動產生後，A、C欄自動產生(構思如下)

For i = 2 to
  if cells(i,2) 有冒號 Then
    cells(i,1) = ROW()-1
    Na = cells(i,2)
  else
    cells(i,3) = Na
Next

但是查找了網路只有找到Set cell = Range("B1:B2000").FIND(":", LookIn:=xlValues, LookAt:=xlPart)
套用到迴圈不知是否有類似的寫法？還請前輩們告知，感激不盡！
收藏 分享

av8d

帖子
700 
主題
275 
精華
0 
積分
1001 
點名
1  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2024-4-10 
2#
發表於 2022-1-31 00:11 | 顯示全部帖子
感謝singo1232001、ikboy、准提部林、hcm19522，
無論是前輩或版主，提供的VBA或函數寫法都受益良多，
由衷感謝，也祝大家新春佳節愉快。

TOP

av8d

帖子
700 
主題
275 
精華
0 
積分
1001 
點名
1  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2024-4-10 
3#
發表於 2022-2-1 12:47 | 顯示全部帖子
回復 6# hcm19522

hcm19522前輩您好，看了您的函數受益良多，
有個進階問題，詳如附件，請問編號能否也能自動編碼呢？
冒號從1開始編，底下的1-1、1-2....第二個冒號從2開始編，底下的2-1、2-2....以此類推

判斷儲存格是否有冒號_2.rar (24.93 KB)

TOP

        靜思自在 : 話多不如話少，話少不如話好。
返回列表 上一主題