相关疑难解决方法(0)

我在单元格中的Excel工作表中有文本数据B6:H14.

有些行有2个单元格有内容,有些行有4个,有些行有7个.如何将这些复制到2维数组？我已经知道尺寸了,所以我很擅长尺寸没有被声明为动态代码.

我是否需要使用循环(我目前正计划使用)？

或者是更容易/更优雅的方式？

我有一个excel代码,它查看范围A1:A100 ...它循环遍历这些范围,但是当它循环时,我想选择col B中的值...例如,当范围循环开始时,它将会首先看一下A1,但在VBA中,我希望它选择B1中的值来使用......

Sub DRAWb()
'
' DRAWb Macro
'

'
Dim rng As Range, cell As Range

Set rng = Sheet1.Range("A1:A3")

For Each cell In rng


If cell.Value > 1 Then


    ActiveSheet.Shapes.AddShape(msoShapeRectangle, 11.25, 50 * cell, 93.75, 43.5) _
        .Name = "R cell"
End If
Next cell

End Sub