Question

我想在Excel中创建一个VB脚本，用一个特定的脚本填充一行单元格，但只有一个单元格需要增加1。

在细胞A2中

=IF(Data!B37="","",Data!B37)

在Cell A3中

=IF(Data!B38="","",Data!B38)

只要该行位于该行的A单元格中，此选项卡上的其余单元格都是固定的公式。

=IF(A2="","",IF(Data!$B$5="","",Data!$B$5))

我可以使用录制宏并将其应用于按钮，但有没有办法允许用户选择重复此代码的次数？

换句话说，我可以逐个单元格记录一个宏键控，我可以将它应用到一个按钮。这很容易。我需要能够允许用户键入所需的行数，如＆＃34; 10＆＃34;在某个单元格中，它重复脚本10次，从A2到I2开始计数为1，然后从A3到I3开始的第2行计数为2，等等。如果没有，我可以处理让他们单击按钮10次，如果这使它变得更容易。

最终，我试图绕过Excel工作簿，使用没有值的公式打印空白单元格。目前，它说有70页的东西有4页。我认为这会有所帮助。

非常感谢！

更新:(想出如何在VB脚本中创建带变量的单元格）

Private Sub CommandButton1_Click()

Dim c As Integer, i As Integer, j As Integer

For c = 5 To 5

    For i = 2 To ActiveCell.Value
        For j = 1 To 2

            Worksheets(c).Cells(i, j).Value = 100
          Next j
    Next i
Next c

End Sub

重复Formula X Times

0 个答案: