我正在尝试使用 VBA 在 excel 中创建图表。代码如下:
Sub testmacro()
Dim i As Integer
i = Sheets("Data").Range("M2").Value
Sheets("Email ID").Activate
Range("A1").Select
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlColumnClustered
If i = 1 Then
ActiveChart.SetSourceData Source:=Range("Data!$E$1:$F$3")
ActiveChart.SeriesCollection(1).Select
With Selection.Format.Fill
.
.
.
End If
If i = 2 Then
End if
If i=3 Then
End If
End Sub
Run Code Online (Sandbox Code Playgroud)
现在,我希望能够在 i=1 时创建的同一个图表上在 i=2 和 i=3 时执行操作
但是,我无法这样做。
那么任何人都可以帮助我如何为我在 i=1 时创建的图表命名,并且能够在 i=2 和 i=3 时引用它?
我正在编写一个程序(在 cpp 中)来检查给定数字的素数
让我印象深刻的是,我需要在程序之间检查我对输入进行某些算术运算获得的值是否是整数
即假设输入是“a”
我想知道如何检查 'b' 是否为整数(仅供参考,b=(a+1)/6 )
我对此的尝试:
int main()
{
using std::cin;
using std::cout;
int b,c;
int a;
cout<<"enter the number";
cin>>a;
b=(a+1)/6;
c=(a-1)/6;
if (b is an integer)
cout << "The given number is prime";
else if (c is an integer)
cin << "The given number is prime!";
else
cout<<"The number is not prime";
return 0;
}
Run Code Online (Sandbox Code Playgroud) 我在Excel中有两列如下:
col1 col2
1 10
1 22
1 11
1 23
1 14
2 16
2 12
2 10
2 9
Run Code Online (Sandbox Code Playgroud)
如何编写命令以返回col2对应于每个唯一值的最大值col1?
所以在这里我需要写一个命令来获取23和16.
我在这里显示的数据是假人; col1我的实际数据集中有600个唯一值.
我正在尝试运行此代码
r2<-lm(diff(Y)~.,data=credit.train)
Run Code Online (Sandbox Code Playgroud)
现在,我收到错误:
model.frame.default中的错误(公式= diff(Y)〜.,data = credit.train,:变量长度不同(找到't')
据我所知,在差分处,Y的行数减少1,这对于X变量没有发生.知道怎么解决这个问题吗?
我有一个包含100个sas数据集的文件夹.我需要创建一个新表,它有两列(数据集名称,已排序/未排序).
我知道proc内容可以用来检查排序的条件,但有没有办法以编程方式对所有100个数据集进行检查并将结果返回到一个表中?