Tag: input

Excel VBA InputBox值不是date

我有一个用户input框，你input一个string，烦人的这个string看起来像一个date00/00/0000和Excel重新格式化。 当该值不能是一个date前。 18/19/4561 （月份不能是18或19），它显示正确。 但是，只要它可以被看作是一个可能的date，它就会切换。 我已经尝试将值设置为一个string，而不是什么都没有，但Excel仍然改变它时，把它放在页面中。 当我尝试在单元格中手动input它或等于手动input的单元格中的值时，它工作正常。 但是每当我从input框中得到它，它都会混淆。 即使当我将string硬编码到一个variables（ x = "05/06/4564" ）时，它x = "05/06/4564"切换。 如何强制excel离开string？

在macros中使用公式中的inputvariables

我想在公式中使用用户input，如下所示： Sub example() Dim StockDays As Integer StockDays = InputBox(Prompt:="How many days?") Range("AG2").FormulaR1C1 = "=ROUNDUP(RC[-6]*" & StockDays & "/90, 0)" Range("AG2").Select Selection.AutoFill Destination:=Range(Cells(2, 33), Cells(1500, 33)) End Sub 运行时，上面的代码会在ROUNDUP行中引发错误。 运行时错误1004。 应用程序定义或对象定义的错误。 我认为问题与variablesStockDays 。 我该如何安排代码才能使其工作？

Excelmacrosinputtypes不返回正确的值

我试图删除使用下面的代码在Excel 2010工作表中具有相同的内部颜色的所有单元格： Dim myRange As Range Set myRange = Application.InputBox("Select a cell to remove based on background fill color.", Type:=8) Range("C3").Interior.Color = Range(myRange).Interior.Color 但是当我运行代码时，出现以下错误： Method 'Range' of object '_Global' failed. 我已经发现，即使我要求单元格引用作为范围对象（ Type:=8 ）， myRange被设置为单元格的值。 例如， A2的值是“testing”。 myRange应该回来为A2 ，但是它回来作为“testing”。 任何想法为什么会这样？

从Excel中用jQueryfile upload粘贴页面上导致上传

为了解决这个问题，我在页面上有两个input。 一个是文本input，另一个是文件input。 如果我将Excel电子表格单元格复制并粘贴到文本input，它会触发file upload到文件input。 我想允许复制粘贴而不触发file upload。

Rinput文件包含值#NUM！ 我想用NA来代替这些。 怎么样？

我正在将大量源自Excel的.csv文件读入到R中。有些单元格包含值“#NUM！”，我猜测这个值是除以零的结果。 无论如何，R不喜欢它。 而且，由于我有很多文件，我想replace#NUM！ 在将文件导入到R中时，使用NA作为值。而不是查看每个正在进行查找replace的文件。 build议表示赞赏。 谢谢。 JD

用户上传电子邮件地址列表的最佳格式

我正在构build一个Web应用程序，部分规范是通过上传电子邮件地址列表来批量创build用户的function。 我一直在权衡一些不同的select，并希望从过去的经验人士的一些input： 我可以让他们创build一个电子表格并将其保存为csv，但我担心用户（谁不技术上倾向于）会搞砸。 我可以告诉他们只要创build一个以逗号分隔的列表，但这需要他们手动完成。 我可以让他们上传一个电子表格，并尝试parsingexcel文件，但从我所看到的，这是困难的。 有没有人有这方面的经验，特别是什么格式很容易parsing在PHP中，最不可能造成非技术用户的问题？ 编辑要清楚，这是一个简单的电子邮件地址列表，没有更多。

如何让用户在MATLAB中inputEXCEL文件的名称？

我正在使用MATLAB R2010b。 我正在用k-meansalgorithm进行聚类。 每次执行时都会显示不同的结果。 而且我希望在Excel中保存它。 这是我的代码片段： y = [data x]; xlswrite('clustering.xls', y, 'KMEANS', 'A1'); 正如我之前所说; 每次执行时都会显示不同的结果，因此clustering.xls会始终更新，更新和更新 – 而不保存旧文件。 我想保存所有的历史。 我认为唯一能解决这个问题的就是用户重命名他们自己的文件 – 但效率不高。 所以，我想我需要一个消息框让用户input他们的xls文件的名称。 如何使它成为可能？ 任何想法？ 我感谢所有的答案。 谢谢。

警告不正确的单元格值

我的问题：我有两个范围R16和R01。 这些范围是通过刷新每个范围，然后在表格的左上angular重新命名。 每个范围都要求用户填写每个单元格的值。 R16要求用户input0到5的数字。范围R01要求input值0或1。 在这两个范围内的任何一个细胞中，NO细胞都可以留空。 这些范围和要求仅针对此表单。 如果用户input一个数字，如果input的值超出了参数设置的范围，就会出现[input无效]的错误信息。 例如，在R16中，如果有人input12或-1，他们将被警告。 最后，当用户按下页面上的button以在单独的过程中使用这些值时，必须检查没有单元格留空。 我试图find一种方法来停止marco（通过button）的运行，如果这些参数不符合。 谢谢

下拉列表与条件数据

我有三个单元格范围（从我的工作簿中的另一个工作表）存储我想要显示在下拉列表（表单控件）列表中的值。 我需要macros代码来重置一个单元格范围，或者一个命名的范围来定义基于其他单元格值的下拉列表中的选项。 。 我已经尝试了以下代码，迄今为止没有成功： Sub DropDown11_Change（） 如果范围（“A1”）= 1那么 （从sheet1 a1：a50的input范围） ElseIf范围（“A1”）= 2然后 （从sheet2 a1：a50的input范围） 否则如果范围（“A1”）= 3那么 （从sheet3 a1：a50的input范围） 万一 结束小组 有什么build议么？ 谢谢

Excel：将用户input传送到另一个模块

我有一个填充列表框的macros，它告诉我当前在我的计算机上打开的所有工作簿名称，该列表包含一个双击事件来select我希望激活的工作簿的名称以运行其他过程。 我已经尝试了几种方法来从列表框中select要在我的第二个程序中被召回，但我似乎没有正确的措辞我的代码，我不断收到错误。 有什么build议？ 目前我正在使用的是： Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) Dim BName As Long For BName = 0 To Me.ListBox1.ListCount – 1 If Me.ListBox1.Selected(BName) Then Me.ListBox1.Selected(BName) = True With Me.ListBox1.Selected(NName) Call Q End If Unload Me End Sub Private Sub UserForm_Initialize() Dim wkb As Workbook With Me.ListBox1 For Each wkb In Application.Workbooks .AddItem wkb.Name Next […]