• 所有问题

    • Excel VBA高手请进，求源代码

    平台系统导出图1报表，我想使用VBA将图一变成图二的样子，跪求VBA大神解答，出结果一定采纳！

    举报该问题
    推荐答案   2020-09-20

    参考下面处理

    Excel数据批量转置（二列转多列）

    追问

    抱歉，这达不到我想要的结果，店铺下单品种要对应到转置后的对应列，没下单的品种，填上0或是留空

    温馨提示：答案为网友推荐，仅供参考
    相似回答
    EXCEL中的VBA订单号无法根据日期自动更新,高手请进,代码如下:答：Private Sub Workbook_BeforePrint(Cancel As Boolean)Dim xStr As StringxStr = Right(Sheets("单据").Range("P4"), 11)If Left(xStr, 8) = Format(Date, "yyyymmdd") ThenxStr = Format(Date, "yyyymmdd") & Application.Text(Right(xStr, 3) + 1, "000")ElsexStr = Format(Date,...
    EXCEL高手请进,求VBA代码,统计关于单元格间隔的问题~答：鼠标右键Sheet1的标签，选【查看代码】。在代码窗口粘贴下面的代码：Sub ouyangff()n = [a65536].End(3).Row For i = 0 To 4 For j = 1 To n If Cells(j, 1) = i Then k = j Next Cells(i + 1, 3) = n - k Next End Sub 按 Alt + F11 回到 Excel 这时你可以按Alt +...
    EXCEL高手请进,求VBA代码,处理一个统计的问题~~~答：我明白你的意思了，修改代码如下：Sub 统计()Dim Arr()zifu = "正正正正正正正正反"For i = 1 To Sheet2.UsedRange.Rows.count If Cells(i, 1) = "正" Then k = k + 1 Cells(i, 6) = k Else Cells(i, 5) = k k = 0 End If Next m = 0 s = 1 ReDim Preserve Arr(...
    excel高手进答：代码放在如图所示的位置，可以按ALT+F11键开启VBA编程窗口。Option Explicit Dim address As String '当前选中单元格的地址 Dim addColumnID As Integer Dim flag As Integer Private Sub Worksheet_Change(ByVal Target As Range)Application.EnableEvents = False '以下代码块主要是为了解决Excel表格打开时...
    大家正在搜
    excel vba 高手excel VBA 提示源代码和代码Excel里使用VBAExcel之VBA简单宏编程VBA做excel数据库excel怎么进入vbaExcel vba教程excel vba实例教程
    相关问题
    EXCEL高手请进，求VBA代码，统计关于单元格间隔的问题~
    EXCEL VBA高手请进，如何让一段代码执行一遍？
    EXCEL VBA高手请进，求自动计算公式~~
    精通excel VBA的高手请进，同样的代码，为什么EXCE...
    EXCEL高手请进，求VBA代码，处理一个统计的问题~~~~...
    EXCEL中的VBA订单号无法根据日期自动更新，高手请进，代...
    excel VBA高手请进，关于让表格自动刷新的问题？
    EXCEL VBA 高手请进。修改代码。