国产一区二区欧美精品免费-欧美国产日韩在线视频-欧美亚洲国语精品一区二区-欧美激情五月综合啪啪-国产69精品麻豆久久久久-亚洲人成精品久久久久桥网站-欧美刺激肥熟在线视频-十七岁日本免费完整版BD-黑夜在线拖拽不卡第一页

`
發(fā)表于2022/5/22 16:22:46 樓主 
頭像 等級:初學(xué)者
積分:6
財(cái)富值:9.99
身份:普通用戶
宏1:Application.CutCopyMode = False
    ActiveCell.Formula = "=INDIRECT(" & """" & "R" & """" & "&(ROW()-1)&" & """" & "C" & """" & "&COLUMN(),FALSE)+1"
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlPasteSpecialOperationNone, SkipBlanks:=False, Transpose:=False
    Selection.FillDown
    Selection.FillDown
    Selection.NumberFormatLocal = "yyyy" & """" & "年" & """" & "m" & """" & "月" & """" & "d" & """" & "日" & """" & ";@"
    Application.DisplayAlerts = False
    Application.DisplayAlerts = True

宏2:Selection.Offset(0, 1).Select '

宏3:Application.CutCopyMode = False
    ActiveCell.Formula = "=INDIRECT(" & """" & "R" & """" & "&(ROW()-1)&" & """" & "C" & """" & "&COLUMN(),FALSE)+1"
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlPasteSpecialOperationNone, SkipBlanks:=False, Transpose:=False
    Selection.FillDown
    Selection.FillDown
    Selection.NumberFormatLocal = "yyyy" & """" & "年" & """" & "m" & """" & "月" & """" & "d" & """" & "日" & """" & ";@"
    Application.DisplayAlerts = False
    Application.DisplayAlerts = True
我的個(gè)性簽名
發(fā)表于 2022/5/22 16:26:26   
頭像 等級:高手
積分:128
財(cái)富值:12
身份:普通用戶

為什么這么多重復(fù)的 比如說filldown和displayalert

都沒有with結(jié)構(gòu)怎么可能缺少end with

我的個(gè)性簽名
發(fā)表于 2022/5/22 16:28:48   
頭像 等級:初學(xué)者
積分:6
財(cái)富值:10
身份:普通用戶

回復(fù)：2樓

我只是寫了幾個(gè)公式讓后錄制了一下宏 這些代碼都是從 查看宏代碼里復(fù)制粘貼的
我的個(gè)性簽名
發(fā)表于 2022/5/22 16:47:47   
頭像 等級:高手
積分:128
財(cái)富值:12
身份:普通用戶

回復(fù)：3樓

我知道 看到你寫的公式了 能不能上一下文件
我的個(gè)性簽名
發(fā)表于 2022/5/22 17:12:07   
頭像 等級:初學(xué)者
積分:6
財(cái)富值:10
身份:普通用戶

回復(fù)：4樓


好的  
附件:   下載
我的個(gè)性簽名
發(fā)表于 2022/5/22 17:45:55   
頭像 等級:高手
積分:128
財(cái)富值:12
身份:普通用戶

回復(fù)：5樓我這邊run的很順利

我的個(gè)性簽名
發(fā)表于 2022/5/22 17:48:55   
頭像 等級:高手
積分:128
財(cái)富值:12
身份:普通用戶

回復(fù)：5樓


我的個(gè)性簽名
發(fā)表于 2022/5/22 17:49:04   
頭像 等級:高手
積分:128
財(cái)富值:12
身份:普通用戶
如附件
我的個(gè)性簽名
發(fā)表于 2022/5/22 18:19:06   
頭像 等級:初學(xué)者
積分:6
財(cái)富值:10
身份:普通用戶

回復(fù)：8樓我的意思是不是單獨(dú)運(yùn)行 是再創(chuàng)建一個(gè)宏 按順序運(yùn)行 日期 換行 時(shí)間 


我的個(gè)性簽名
發(fā)表于 2022/5/23 8:17:15   
頭像 等級:高手
積分:128
財(cái)富值:12
身份:普通用戶

回復(fù)：9樓


不合在一起怎么按順序運(yùn)行
我的個(gè)性簽名
發(fā)表于 2022/5/23 19:27:12   
頭像 等級:初學(xué)者
積分:6
財(cái)富值:10
身份:普通用戶

回復(fù)：10樓

現(xiàn)在合在一起了 提示缺少endwith 詳見附件 
附件:   下載
我的個(gè)性簽名

快速回復(fù)

目前不允許游客發(fā)表，請 登錄 注冊 后再發(fā)貼。