首页 > 解决方案 > VBA-excel循环文本框

问题描述

我仍在学习使用 vba 的技巧。我有用户表单,其中包含要根据组合框和列表框选择显示的文本框。正在从工作表中读取数据。

本质上,我试图在一个循环中做一个循环,但在第一个循环之后似乎存在问题。

我将发布一张图片来演示这个问题:

用户表单

在此处输入图像描述

正如您从 texboxes 中看到的那样,循环似乎不起作用。它似乎被卡住了。输入文本框的循环代码有效,但文本框内的值错误。

'antall butikker
For b = 1 To antall_rader
    If Ark1.Cells(b, "L").Value = Me.cmbDistributoor.Value And Ark1.Cells(b, "O").Value = lstRuteTur.Value Then
        Me.txtAntallButikk.Value = Ark1.Cells(b, "M").Value
    End If
Next b

For a = 1 To Me.txtAntallButikk.Value
    For C = 1 To antall_rader
        If Not Ark1.Cells(C, "L").Value = Me.cmbDistributoor.Value And Ark1.Cells(C, "O").Value = lstRuteTur.Value Then
        Else

            If Me("Textbox" & a).Value = "" Then
                Me("Textbox" & a).Value = Ark1.Cells(C, "I").Value
            End If
        End If
    Next C
Next a

标签: excelvbaloopsfor-loop

解决方案


推荐阅读