Warning: file_get_contents(/data/phpspider/zhask/data//catemap/3/arrays/14.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Arrays 倒排数组(从最低索引读取)_Arrays_Vba - Fatal编程技术网

Arrays 倒排数组(从最低索引读取)

Arrays 倒排数组(从最低索引读取),arrays,vba,Arrays,Vba,如果我们反转数组的初始值和最后一个值,会有不同吗 用于ActiveSheet.Range(单元格(27、13)、单元格(11、13))中的每个cel1 用于ActiveSheet.Range(单元格(11、13)、单元格(27、13))中的每个cel1 对于第一种情况,第一个值是否显示为单元格(27,13)而不是单元格(11,13) 以下是我的完整代码: Sub arr\u reverse() 端接头` 使用这些代码,数组的输出仍然从最小索引读取,而不是从“for”行中确定的索引读取 你能帮我让

如果我们反转数组的初始值和最后一个值,会有不同吗

用于ActiveSheet.Range(单元格(27、13)、单元格(11、13))中的每个cel1

用于ActiveSheet.Range(单元格(11、13)、单元格(27、13))中的每个cel1

对于第一种情况,第一个值是否显示为单元格(27,13)而不是单元格(11,13)

以下是我的完整代码:

Sub arr\u reverse()

端接头`

使用这些代码,数组的输出仍然从最小索引读取,而不是从“for”行中确定的索引读取


你能帮我让数组从最后一个索引中读取(或者至少先显示最后一个索引的值作为输出)吗?

好吧,请忘记i、j、k和n,关于坦克的名称。是否要复制单元格值?因此,仅使用单元格:

Sub arr_reverse()
Dim oCell As Range, oTargetCell As Range
    Set oCell = ActiveSheet.Cells(27, 13)   ' Last cell in your range M11:M27
    Set oTargetCell = ActiveSheet.Cells(11, 19) ' Your j = 19  column S
    While oCell.Row >= 11    ' Row of first cell
        oTargetCell = oCell
        Set oCell = oCell.Offset(-1, 0) ' Move Up
        Set oTargetCell = oTargetCell.Offset(0, 1) ' Move to right
    Wend
End Sub

范围
存储为集合,并且在进行集合时,Excel从左到右、从上到下读取,因此顺序始终相同

要执行您想要执行的操作,请使用
For..Next
循环执行
步骤-1

For k = 27 to 11 Step -1
cel = Cells(k, 13)
'code
Next k
Dim i、j、k为整数
Dim
k
为整数,
i
j
声明为变量类型

写:

Dim i As Integer, j As Integer, k As Integer
相反

Dim i As Integer, j As Integer, k As Integer