小编Bri*_*ian的帖子

ListView控件拖放

我试图使用ListView控件进行拖放事件.我想将一个项目从位置1拖到其他地方......比如说,位置5(没有子项目).但是,当我这样做时,它什么也没做.但实际上,当我单步执行代码时,该remove方法会删除该项.但它又回到了同一个地方,所以看起来它什么也没做.我需要根据这里添加API,因为它总是将它放在第一个位置.

在研究和添加API(我认为是问题)之前,我从这里获得了代码,并尝试根据我的具体需要定制它,但我无法让它工作.我正在运行32位Excel.

全局常量和句柄

'Windows API Constants
Public Const LOGPIXELSX = 88
Public Const LOGPIXELSY = 90

'Windows API Function Declarations

'Get a handle to the Device Context (a drawing layer) for a window
Public Declare Function GetDC Lib "user32" (ByVal hWnd As Long) As Long

'Get the capabilities of a device, from its Device Context
Public Declare Function GetDeviceCaps Lib "gdi32" (ByVal hDC As Long, _
ByVal nIndex As Long) As Long

'Release the …
Run Code Online (Sandbox Code Playgroud)

excel vba excel-vba

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

将 ID 列添加到查询结果中

这是我第一次问有关 T-SQL 的问题,我是一个初学者。我有一个 SQL 查询,其中包含两个过滤到少于 10 行的 CTE。我正在使用 SUM 语句来获取运行总计:

Sum(Diff) OVER(ORDER BY DateAdded) AS Summary
Run Code Online (Sandbox Code Playgroud)

DateAdded多行具有相同的值。因此,它不会为我提供每行的运行总计。我需要创建一个仅计算行数的字段(类似于数据库表中的 PK),以便我可以将其用于我的ORDER BY子句。如果我的理解是正确的,这就是我需要做的才能使其发挥作用。如何向查询结果集中添加枚举列?请注意,我不需要ALTER表,只需向查询结果添加一列。我希望我写的内容是清楚的。谢谢你!

sql t-sql sql-server

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

如何只为一张纸设置vba代码?

我目前卡住尝试构建一个将运行sumifs宏的按钮.我正在尝试构建按钮Sheet1并执行sumifs Sheet2.我现在拥有的是:

Option Explicit

Sub Sumifs()
    Dim Sht2 As Worksheet
    Dim EndRow As Long
    Dim i As Integer
    Dim SumRange As Range
    Dim CrtA As Range
    Dim CrtB As Range

    With Sht1
        EndRow = Cells(Rows.Count, "A").End(xlUp).Row
    End With

    Set Sht2 = Worksheets("Sheet2")
    Set SumRange = Worksheets("Sheet3").Range("L5:L10")
    Set CrtA = Worksheets("Sheet3").Range("C5:C10")
    Set CrtB = Worksheets("Sheet3").Range("K5:K10")

    For i = 5 To EndRow
        sht2.Cells(i, 4) = WorksheetFunction.SumIfs(SumRange, crtA, Range("G" & i), crtB, Range("B" & i))
    Next i
End Sub
Run Code Online (Sandbox Code Playgroud)

我已经尝试过运行它, …

excel vba excel-vba

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

填充数组时出现StackoverflowException

我通常花时间阅读并尝试回答Excel VBA问题,但我现在正在尝试学习C#.有人可以帮助我理解为什么StackOverflowException我的代码中倒数第二行出错了吗?
我试图通过一种方法填充数组.

namespace ConsoleApplication1
{
    class Program
    {
        static void Main(string[] args)
        {
            int[] numbers = GenerateNumbers();
            Console.WriteLine(numbers);
            Console.ReadKey();
        }
        static int[] GenerateNumbers()
        {
            int[] num = new int[10] { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 };
            return GenerateNumbers();
        }
    }
}
Run Code Online (Sandbox Code Playgroud)

c#

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

VBA中的变体数据类型及其正面使用

关于变体数据类型,Google上有很多东西.大多数情况下,他们说喜欢的东西"Avoid using it too much and here's why""It can hold any type of data"我明白这事情.但我还是不完全明白何时使用它们.有人可以简明扼要地解释一下,更重要的是,给出变量数据类型的最佳用法示例(甚至可能是将变量传递给函数而不是显式声明变量的示例)?

excel vba excel-vba

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

变量未定义的错误Enigma

我试图从Excel自动化PowerPoint.一切都很好.我有以下代码块完美地工作:

Set MyTextbox = mySlide.Shapes.AddTextbox(1, Left:=myShape.Left - 3, Top:=42, Width:=myShape.Width + 6, Height:=10).TextFrame.TextRange
With MyTextbox
    .Text = Format(MyShapeDate, "m/yy")
    .Font.Size = 11
    .ParagraphFormat.Alignment = ppAlignCenter
    .Font.Bold = True
End With
Run Code Online (Sandbox Code Playgroud)

我将代码保存为插件并尝试添加新选项卡和按钮,但未成功.所以我把代码带回了工作簿.当我试图再次运行它时,我得到一个未定义的变量ppAlignCenter.有谁知道为什么会发生这种情况或是否是常见错误?

excel powerpoint vba excel-vba powerpoint-vba

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

标签 统计

excel ×4

excel-vba ×4

vba ×4

c# ×1

powerpoint ×1

powerpoint-vba ×1

sql ×1

sql-server ×1

t-sql ×1