Tag: checkbox

如果语句不在Excel VBA中工作: Iam试图用VBA在Excel中创build一个简单的if语句。我正在创build一个新的checkbox 将下面的代码添加到框中。 Sub CheckBox1_Click() HideRows "2:5" End Sub Sub HideRows(rowRange) If CheckBox1 = False Then Rows(rowRange).EntireRow.Hidden = True Else: Rows(rowRange).EntireRow.Hidden = False End If End Sub 结果：如果checkbox处于选中状态或未选中状态，则行都将隐藏。（checkbox被选中）所有行都可见取消选中checkbox 结果：所有行都被隐藏（checkbox未选中）所有行都可见取消选中checkbox 结果：所有行都被隐藏

VBA：在VBA UserForm框架上显示checkbox的网格: 我坚持创buildcheckbox就像checkbox的网格。基本上我有一个要创build的工作表的清单，方法是，当我检查checkbox相应的工作表应创build活动工作簿。我完成了它，但我坚持创build网格的checkbox，因为我想利用我的forms空置空间。例如， Checkbox1 Checkbox2 Checkbox3 Checkbox4 下面是我编码的代码。 For Each varItem In InfantDataQuerySheets checkboxInc = checkboxInc + 1 Set chkbox = SelectDataQuerySheet.Controls.Add("Forms.CheckBox.1", "CheckBox" & checkboxInc, True) With chkbox .Left = 10 .Top = (checkboxInc – 1) * (chkbox.Height + 3) .Caption = varItem End With Next varItem 提前致谢。

python：如何在Excel中插入checkbox？: 我试图用xlsxwriter逐行生成excel文件。在一些行中，我需要插入checkbox。有谁知道这样做？谢谢！

VBA – 请参阅单元格地址中的checkbox: 我循环了几行，我需要知道每行中的checkbox是否是“Checked”，但我不知道checkbox的名称。下面的代码只是为了说明问题： Sub Checkboxes() Dim ws As Worksheet Set ws = Sheets("Input Data") Dim Switch As Boolean For i = 4 To 8 Switch = ws.Cells(i, 11).CheckboxValue MsgBox Switch Next i End Sub 要创buildcheckbox，我做了以下操作：创build一个checkbox 把它放在一个单元格中复制下面在同一列我认为代码应该是完全相反的： CheckBox1.LinkedCell

C＃：MS Excel中checkbox的状态: 我试图通过C＃获取XLS文档中存在的checkbox的状态。让我回到这里。这是我的： MS Office 2007 +开发工具和VC＃2010 Express 引用的MS Excel 12.0对象库一个XLS文件我成功地检索Excel.Shape对象。但是，当我试图确定它是否被选中时，我被卡住了。到目前为止，我已经获得了它的AutoShapeType，它说msoShapeMixed。有人能指点我正确的方向吗？谢谢！ class Program { static void Main(string[] args) { Application excel = new Application(); Workbook wb = excel.Workbooks.Open( "document.xls", Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value ); Worksheet ws = wb.Worksheets[3]; Microsoft.Office.Interop.Excel.Shape […]

使用一个variables来select一个ActiveX控件checkbox的名称（在Excel中的Word）？: 这行代码有什么问题？ WordDoc.CheckBoxNum.Value = CheckBoxVal 要清楚，我正在使用ActiveX控件“checkbox”。我有值（真/假）和checkbox名称保存在Excel文件中。代码打开我的Word文档，并自动循环checkbox，设置它们的值。我从Excel控制单词的事实可能会改变我的对象？如果他们是forms领域…这个作品 – CheckBoxNum = "Check1" CheckBoxVal = "True" WordDoc.FormFields(CheckBoxNum).CheckBox.Value = CheckBoxVal 这是我的整个代码 Sub Doit() Dim WordApp As Object Dim WordDoc As Object Dim filepath As String Dim CheckBoxNum As String Dim CheckBoxVal As String Dim i As Integer, k As Integer 'Open Word filepath = "C:\test.docx" Set […]

清除特定列中的checkbox: 我正在尝试创build一个macros来清除两个特定列中的所有checkbox（每列大约有40个checkbox）。这是我有： Worksheets("Roster").Column(5).CheckBoxes.Value = False Worksheets("Roster").Column(7).CheckBoxes.Value = False 我也试过这个： ActiveSheet.Column(5).CheckBoxes.Value = False ActiveSheet.Column(7).CheckBoxes.Value = False

选中一个checkbox时，勾选常规select器和macros以显示下三行: 我是macros的新手，所以我不确定在VBA中这是可能的。我正在尝试创build一个文档，其中包含许多由4行组成的小型表格。一行是标题，有一个checkbox，将始终显示，下面三行包含数据，我只有什么时候看到我select相关的checkbox。这个文件将有许多迷你表，因此许多checkbox，我想知道是否有一个通用的select器checkbox，我可以应用相同的macros。我已经看到下面的macros，但这只适用于一个checkbox，我想知道是否有一种方法来应用所有的checkbox，如果选中第4行checkbox，然后显示行5,6和7.如果选中第8行的checkbox，然后显示第9,10和11行等…. Private Sub CheckBoxRow4_Click() Rows("5:6:7").Hidden = CheckBoxRow4.Value End Sub 看更好的想法截图。如果您可以指出如何在打开文档时默认隐藏下面三行，这也是值得赞赏的。如果这有什么区别，我正在使用Excel 2011 for Mac。先谢谢你。

Combobox取决于checkbox: 我已经能够改变Combobox的列表（或RowSource ），取决于是否使用下面的代码select了一个Optionbox： Private Sub optYes_Click() Options End Sub Private Sub optNo_Click() Options End Sub Private Sub Options() Select Case True Case optYes.Value = True cmb.Enabled = True cmb.RowSource = "=Options!A1:A4" Case optNo.Value = True cmb.Enabled = False End Select End Sub 我想稍微修改一下，这样Combobox列表被限制在一组已经被选中的checkbox中。所以如果我有10个checkbox表示不同的选项，用户只select其中的4个，那么只有这4个checkbox出现在Combobox中。

每个循环的Excel VBA跳过checkbox: 我在Excel中正在做的待办事项列表有问题。目前，我正在尝试创build一个VBA代码，只要单元格中的值发生更改，就会更新单元格内部填充颜色。换句话说，F列包含项目的到期date。如果该项目到期，那么整行的颜色应该是红色的。如果该项目从那时起超过30天，应该是绿色的，并在两者之间不同的停留。待办事项列表应该是dynamic的。即用户可以随时添加新的行。由于VBA无法知道最后一行数据的位置，因此我已将代码设置为依赖列表最左侧的checkbox的位置。我会张贴一个图片，但是我刚刚开始，所以我还没有这个能力。本质上，行2中有一个标题行，从列B开始有6个列，转到列G，“检查，状态，任务，注释，到期date”。有12个参赛作品的列表。条目1-11工作正常，并代表一行可以11种不同的可能颜色。第12行从第11行拖放，并包含所有function和checkbox。在调用VBA时，行12不会更新。我的代码使用For Each循环遍历列表中的每个checkbox，并根据截止date更新颜色。对于大多数的checkbox，它的工作正常，并始终位于msgbox表明它正在通过循环罚款。但是，当我添加一个新行时，通过select整个行并在工作表中拖动它，VBA代码停止只识别新的checkbox。它可以遍历所有的框，除了新的框。我也附加了我的VBA代码。如果任何人可以告诉我如何解决无法识别的（非爱）checkbox，我将不胜感激！检查更新的代码此代码位于VBA的Worksheet1部分中，不在其他模块中。 Private Sub Worksheet_Change(ByVal Target As Range) Application.Volatile True Application.ScreenUpdating = False Call Checkbox_Due_Color Application.ScreenUpdating = True End Sub 代码设置范围和作为决策处理程序我相信问题是在这个代码中的循环。 MsgBox myCheckboxLoc.Address最后一个checkbox不会触发。这位于第2单元。 Option Explicit Sub Checkbox_Due_Color() '=============================================================== 'Determines how to update the color […]