我如何在此代码中使用大于?
ActiveSheet.Range("$A$1:$BG$5158").AutoFilter Field:=13, Criteria1:= _
">"Range("BJ1").Value, Operator:=xlAnd
Run Code Online (Sandbox Code Playgroud)
这是完整的代码
Sheets("New Hire").Select
Range("CI1").Select
Selection.Copy
ChDir "D:\Sales Report"
Workbooks.Open Filename:="D:\Sales Report\Global_New_Hire_Report.xlsb"
Windows("Global_New_Hire_Report.xlsb").Activate
Range("BJ1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A1").Select
Selection.AutoFilter
Windows("Global_New_Hire_Report.xlsb").Activate
ActiveSheet.Range("$A$1:$BG$5158").AutoFilter Field:=13, Criteria1:= _
">"Range("BJ1").Value, Operator:=xlAnd
Run Code Online (Sandbox Code Playgroud) 我一直在尝试学习R一段时间,但还没有把我的知识提升到一个不错的水平.请帮我解决这个问题.
我有一个包含5000行的csv数据文件,其中包含以下数据字段:名称,渠道(内部或外部),调查发送日期和调查收到日期.
基础数据看起来像这样

我想以下面的格式提出这个问题

我试过这个
library("reshape2")
dcast(w, Recruiter~channel)"
Run Code Online (Sandbox Code Playgroud)
工作正常,但我不知道如何添加"调查发送","调查收到&"调查发送 - 调查收到"