Tag: 格式

将IF语句分配给Form控件combobox

我有一个工作表上的窗体控件combobox（名为DropDown1）。 我试图分配一个if语句，但一直无法这样做。 Sub DropDown1_Change() If DropDown1.Value = "test" Then Print (1) Else Print (2) End If End Sub

格式化SQL中用于报告的数字字段

目前我有一个表格，用于存储客户的详细信息，但是表格中的电话号码字段的input方式不同： ID | Name |Address |DOB | Gender |Phone Number | ——————————————————— 01 | Max |Abc Road| 2000-12-19 | Male |07777 893 8902 | 02 | Sam |TBH Road| null | Male |077778938902 | 03 | Doe |Dr Road| 1999-11-13 | Male |077778 938902 | 但是，是否可以重新设置电话号码字段的格式，以便显示结果如下： ID | Name |Address |DOB | Gender |Phone Number […]

checkbox控制其他checkboxINTERMITTENTLY导致Excel崩溃

不胜感激。 我可以从字面上将文本框中的代码减半。 我不知道我是否超过了这个限制，但是如果你有时间浏览它，这里是完整的代码。 其中80％是旧语法中的真/假陈述，但是这可能是因为它是如此之大吗？ Private Sub CommandButton2_Click() Dim irow As Long Dim ws As Worksheet Set ws = Worksheets("Master Data") ' Confirmation of Entry to Form If MsgBox("Have you double checked your data is correct and ALL test points have been selected before entering on the spreadsheet?", vbYesNo) = vbNo Then Exit Sub ' Find […]

如何将datetypes更改为短date

你将如何改变这种datetypesMonday, 31, August2015 at 6:08 AM到短期date在Excel 31/08/2015 ？ 目前我使用顶部date的文本到列，查找和replace删除逗号31, ，。 然后使用=text(1,"00")和=month(A1&1来正确地格式化数字，最后使用concatenation（）将它们连接在一起。 这是非常耗时的，连接date与短date格式的格式不同。 上传数据时，软件会看到它们。 我希望有一个很简单的方法来节省时间。

Kendo UI使用格式导出Excel

我正在使用Kendo UI将我的数据导出到Excel工作簿。 但我不知道如何让格式工作。 这是一个道场的例子，我重现了这个问题。 http://dojo.telerik.com/OGETa/3 它似乎并没有接受格式，直到你已经双击单元格，并按下input（或再次离开）。 我希望能够在导出文档后在B3单元格中写入a = sum（B1：B2），但不会立即将值B1和B2作为[hh]：mm接受。

如何在xlsxwriter中将列设置为DATE格式

我正在编写一个项目，在这个项目中，我写了一个xlsx电子表格，并且需要格式化“Date”的一列。 我得到的程序运行，除列的格式仍然设置为'一般'。 用不同的代码以不同的方式尝试这个，看看是否有人回答： for row in cur.execute('''SELECT `Mapline`,`Plant`,`Date`,`Action` from AEReport'''): lengthOfHeadings = len(row) output = '%s-%s.xlsx' % ("AEReport",now.strftime("%m%d%Y-%H%M")) workbook = xlsxwriter.Workbook(output, {'strings_to_numbers':True}) worksheet = workbook.add_worksheet() format=workbook.add_format({'font_size':'8','border':True}) format2=workbook.add_format({'font_size':'8','border':True,'num_format':'mm/dd/yy hh:mm'}) count = 0 for name in range(0,lengthOfHeadings): if name==row[2]: name=int(name) worksheet.write(counter, count, row[name],format2) else: worksheet.write(counter, count, row[name],format) count += 1 counter += 1 Slihthinden

date格式问题在Excel中

您好，我有一个macros从一个工作簿复制信息，并将其粘贴到另一个问题。 然后它创build两列，并填写一个IF公式来比较两个date。 这些公式带来了错误的结果，因为其中一个列有另一个date格式，我不能改变它，不pipe我在单元格上做什么不工作，只有当我擦除该列的任何单元格上的值，并写一个date我可以改变格式。 所需的主要格式是YYYY-MM-DD，但是这个列被设置为dd / mm / yyyy，即使我更新单元格并将其设置为date或自定义它根本不工作，它仍然显示错误的格式。 这是我工作的macros，有没有办法解决这个问题？ 先谢谢你。 Sub AD_Audit() 'Last cell in column Dim ws As Worksheet Dim LastCell As Range Dim LastCellRowNumber As Long Dim wb3 As Workbook Set ws = Worksheets(2) With ws Set LastCell = .Cells(.Rows.Count, "A").End(xlUp) LastCellRowNumber = LastCell.Row + 1 End With Dim Wb As Workbook, wb2 […]

与date格式VBA-Excel的麻烦

我有一个Excel工具，将当前时间和date转换为UTC时间，然后将时间和date保存在数据库（也是Excel文件）中。 问题是，当墨西哥的某个人试图使用这个工具时，date的格式是不同的（DD-MM-YY而不是MM-DD-YY），并且它被错误地保存在数据库中。 以下是将当前时间和date转换为UTC的代码： Option Explicit Public Declare Function SystemTimeToFileTime Lib _ "kernel32" (lpSystemTime As SYSTEMTIME, _ lpFileTime As FILETIME) As Long Public Declare Function LocalFileTimeToFileTime Lib _ "kernel32" (lpLocalFileTime As FILETIME, _ lpFileTime As FILETIME) As Long Public Declare Function FileTimeToSystemTime Lib _ "kernel32" (lpFileTime As FILETIME, lpSystemTime _ As SYSTEMTIME) As Long Public Type […]

VBA VARIANT返回types和C ++ Excel加载项的64位版本问题

在将C ++ Excel加载项从32位版本迁移到64位版本的过程中，我注意到函数返回VARIANT数据types的一些奇怪行为。 例如，我们可能通常在插件VBA封装器中声明这样的声明XLL的入口点： Public Declare PtrSafe Function Foo Lib "addin.xll" Alias "xlFoo" () As Variant 然后在XLL的C ++源代码中，我们可以这样做： VARIANT __declspec(dllexport) __stdcall xlFoo() { int result = calc_foo_int(); VARIANT ret; VariantInit(&ret); V_VT(&ret) = VT_I4; V_I4(&ret) = result; return ret; } 现在，在32位的世界里，一切正常。 我们可以在VBA脚本或者Excel工作表单元中调用这个函数，我们将会得到我们期待的结果。 然而，在64位的世界里，情况并不是那么好。 我们实际上可以在VBA脚本中调用这个函数，它将正常运行，但是如果我们直接从Excel单元格中调用它，也就是input： =Foo() Excel崩溃，并要求重新启动！ 我已经search了高和低，但我找不到任何地方说任何处理64位Excel的VARIANT返回types的任何其他方式，或者这是有点问题，应该避免（尽pipe罚款32位世界）。 我所见过的最接近的东西是在这篇文章中，这似乎意味着（奇怪的是）在64位Officecallback函数中不支持VARIANT返回types： 您必须在64位环境中运行的VBAmacros中显式声明返回types 所以我最好的预感是，也许出于同样的原因，VARIANT返回types不支持64位Excel加载，至less可以从电子表格中的单元格调用？ 有没有人能够确认或否认这是事实，或者可能会进一步阐明这个问题？ 任何和所有的帮助，感激地收到！ （哦，我应该指出，我认识到在上述情况下使用VARIANT返回types为一个简单的整数值是矫枉过正的 – 这只是一个简单的演示案例 – […]

VBA不会更改所有单元格的格式

我有一个列（col。I），date格式不同： 16. Jul 98 // 22-MAR-2016 // 04-MAY-2015 // 17. Jul 10 // 13-DEC-2011 // 25. Aug 98 // 12. Sep 11 我用下面的代码来改变格式： Sub numberformats() Range("I:I").NumberFormat = "dd. mmm yyyy" End Sub 但是，虽然这对格式为dd的单元格工作正常。 mmm yy，它不适用格式为dd-mmm-yyy的单元格。 用简单的右键单击格式的单元格来改变格式也没有帮助（这是我的第一步，在转移到VBA之前）。 我做了一个互联网search，但所有的答案，我发现类似的问题是太复杂，我不能适应我的问题。 我很乐意得到一些build议（我是一个绝对的初学者…）。