小编shA*_*A.t的帖子

EXCEL VBA:将工作表从工作簿复制到不同位置的另一个工作簿

我正在尝试将整个工作表从一个 Excel 文件复制到另一个 Excel 文件中的工作表。以下是我编写的代码,但不起作用。请提出更改建议。

Sub copyallwos()

Dim wkbSource As Workbook
Dim wkbDest As Workbook
Dim shttocopy As Worksheet
Dim wbname As String

Set wkbSource = Workbooks.Open("C:\Users\AV\Documents\New folder\SCADA Wos.xlsm")

Set wkbDest = Workbooks("C:\Users\AV\Documents\New folder\MASTER.xlsm")

'perform copy
Set shttocopy = wkbSource.Sheets("tt")
shttocopy.Copy
wkbDest.Sheets("SCADAWOs").Select
ActiveSheet.Paste

End Sub
Run Code Online (Sandbox Code Playgroud)

excel vba

2
推荐指数
1
解决办法
8186
查看次数

如何比较最后一条记录和最后一条记录 - 1?

假设我有一个来自连接的表选择如下:

No.Transaction   Item Name   PRICE
TC0001           Book        15
TC0001           Pencil      2
TC0001           Eraser      1
TC0002           Book        12
TC0002           Eraser      1.5
TC0003           Pencil      1.8
TC0003           Book        20
Run Code Online (Sandbox Code Playgroud)

我想比较相同商品名称的最后价格和之前的价格.例如Book is 20 and 12,Pencil is 1.8 and 2

我怎样才能做到这一点?

sql sql-server

2
推荐指数
1
解决办法
539
查看次数

如何在C#和MongoDB version ="2.2.3"中动态添加过滤器到IMongoCollection?

这是我的代码:

var database = new MongoClient("mongodb://192.168.3.122").GetDatabase("xxxx");   
var collection = database.GetCollection<School>("School");

//var it = new List<IMongoQuery>();
//it.Add(Query.EQ("Phone", "77915656"));
//it.Add(Query.EQ("EstablishedYear", 1349));

//var query = new QueryBuilder<School>();
//query.And(it);

IMongoQuery query = new QueryDocument();

Query.And(query, Query.EQ("Phone", "77915656"));
Query.And(query, Query.EQ("EstablishedYear", 1349));
collection.Find(query).ToList(); // eror here!!!
Run Code Online (Sandbox Code Playgroud)

我不知道如何从查询中获得结果?!

错误是:

'MongoDB.Driver.IMongoCollection'不包含'Find'的定义和最佳扩展方法重载'MongoDB.Driver.IMongoCollectionExtensions.Find(MongoDB.Driver.IMongo Collection,MongoDB.Driver.FilterDefinition,MongoDB.Driver.FindOptions )'有一些无效的论点

c# mongodb

2
推荐指数
1
解决办法
2929
查看次数

在Excel中重命名工作表并引用另一个工作表VBA

我想通过引用另一个工作表中的单元格的值来重命名我新添加的工作表.它看起来很简单,但它不起作用.

Sheets("TABLAK").Select
Sheets.Add
Dim ujfulneve As String
ujfulneve = Sheets("MENU").Range("B2").Value
Sheets(ActiveSheet).Name = ufjulneve
Run Code Online (Sandbox Code Playgroud)

它为最后一行写入类型不匹配错误.你能帮我吗?

excel vba excel-vba

2
推荐指数
1
解决办法
2427
查看次数

Math.sqrt()的更快替代方案

有没有其他方法可以Math.sqrt()用来获得未知值的平方根?

例如:

var random  = (Math.random() * (999 - 1)) + 1;
var sqrt = Math.sqrt(random);
Run Code Online (Sandbox Code Playgroud)

我听说使用Math.sqrt()得到数字的平方根是一个非常慢的操作,我只是想知道是否有更快的方法可以得到随机数的平方根.任何有关这方面的帮助将不胜感激.

javascript math performance math.sqrt

2
推荐指数
2
解决办法
3441
查看次数

C#委托与params

我有一个调用其他工具的验证方法:

public ValidationResult Validate(Some arg) {
    var errors = new List<ValidationError>();

    validate1(arg, errors);
    if (errors.Count > 0) {
        return ValidationResult.Failed(errors);
    }

    validate2(arg, other, errors);
    if (errors.Count > 0) {
        return ValidationResult.Failed(errors);
    }

    validate3(arg, other2, errors);
    if (errors.Count > 0) {
        return ValidationResult.Failed(errors);
    }

    return ValidationResult.Succeess();
}
Run Code Online (Sandbox Code Playgroud)

我想要一些方法来制作如下代码,使用for循环来调用每个验证器:

public ValidationResult Validate(Some arg) {
    var errors = new List<ValidationError>();

    var validators = new [] {
        validate1(arg, errors),
        validate2(arg, other, errors),
        validate3(arg, other2, errors)
    };

    foreach (var validator in validators) {
        validator.invoke();
        if …
Run Code Online (Sandbox Code Playgroud)

c# delegates action

2
推荐指数
1
解决办法
148
查看次数

如何在Telerik网格中插入下拉列表框

我有一个Telerik Grid,有两列我需要将第二列作为下拉列表框保存在网格中,我正在使用ASP.NET MVC控件

任何人都能告诉我怎么做吗?

asp.net-mvc telerik telerik-grid

1
推荐指数
1
解决办法
1万
查看次数

1
推荐指数
1
解决办法
2万
查看次数

MongoDB查询C#驱动程序

我在C#MongoDB中表达此查询时遇到问题,我希望它返回与MongoVue objectID不相同的所有结果"000000000000000000000000"; 但我无法在我的计划中使用它.

{"ProfilePictureId" : {$ne: new ObjectId ("000000000000000000000000")}}
Run Code Online (Sandbox Code Playgroud)

我正在使用官方C#驱动程序:

var query = new QueryDocument();
foreach (BsonDocument book in col.Find(query))
{
    ...
}
Run Code Online (Sandbox Code Playgroud)

c# mongodb bson mongodb-.net-driver

1
推荐指数
1
解决办法
2789
查看次数

如何在SQL Server的数据库中搜索字符串

此查询可以从任何SQL Server数据库的所有表/视图中搜索任何字符串值(表名,表数据等),当您将任何字符串放在" 此处的文本 "时,它将从所有表中搜索您的给定字符串/视图存在于该数据库中,

DECLARE @SearchStr nvarchar(100) 
    SET @SearchStr = 'your text here'

DECLARE @Results TABLE(ColumnName nvarchar(370), ColumnValue nvarchar(3630))

SET NOCOUNT ON

DECLARE @TableName nvarchar(256), @ColumnName nvarchar(128), @SearchStr2 nvarchar(110)
SET  @TableName = ''
SET @SearchStr2 = QUOTENAME('%' + @SearchStr + '%','''')

WHILE @TableName IS NOT NULL
BEGIN
    SET @ColumnName = ''
    SET @TableName = 
    (
        SELECT MIN(QUOTENAME(TABLE_SCHEMA) + '.' + QUOTENAME(TABLE_NAME))
        FROM    INFORMATION_SCHEMA.TABLES
        WHERE       TABLE_TYPE = 'BASE TABLE'
            AND QUOTENAME(TABLE_SCHEMA) + '.' + QUOTENAME(TABLE_NAME) > @TableName
            AND OBJECTPROPERTY(
                    OBJECT_ID(
                        QUOTENAME(TABLE_SCHEMA) …
Run Code Online (Sandbox Code Playgroud)

database sql-server sql-server-2005

1
推荐指数
1
解决办法
8613
查看次数