Tag: 数据传输

如何将数据从Windows Mobile应用程序导入Excel中的C＃: 我需要创build一个Windows Mobile 6.5应用程序的数据input。然后，数据需要最终放在PC上的Excel电子表格。什么是最好的方法来做到这一点？任何人都可以发送一些示例代码只是为了让我开始？我正在开发Visual Studio 2008。谢谢

Excel VBA – 根据条件文本string将数据范围从一个表单传输到另一个表单: 我是新来的macros，并试图将数据范围从一个工作表传输到另一个基于条件文本string。 “查询”表中的数据（范围“A5：G1200”）需要根据“查询”表中的列范围“K6：K1200”是文本string“Y”还是“N”转移到“报价单” 如果文本是“Y”，我们希望传输“y”的数据行，如果文本是“N”，我们不希望有“N”的行传输。一旦“Y”的数据范围转移到“报价”单上，我们需要将数据从“报价单”（范围“A5：G1200”＆分开范围“L5：M1200”）传输到“订单”如果列在“引用”表中的列范围“N6：N1200”是文本string“Rec'vd”或“Closed”。和上面一样，如果文本是“Rec'vd”，我们希望传输带有“rec'vd”的数据行。如果“closures”，那么不应该传输来自“closures”行的数据。一旦所有的数据被传输到所有3张基于文本条件。我想有一个基于date范围过滤这些数据的第四张纸。我希望能够inputdate范围，然后input每个工作表的所有数据（“查询”，“报价单”和“订单”），以过滤到“主”第四张表。每个数据表应在主表单上有自己的区域（一个在另一个下面）进行过滤。这是我到目前为止.. Sub TransferTest1() Dim INQUIRE As Worksheet Dim QUOTE As Worksheet Dim ORDER As Worksheet Dim YString As String Dim RecString As String Set INQUIRE = ActiveWorkbook.Sheets("Inquiries") Set QUOTE = ActiveWorkbook.Sheets("Quotes") Set ORDER = ActiveWorkbook.Sheets("Orders") If INQUIRE.Range("K6:K1200") = "Y" Then INQUIRE.Range("A5:G1200").Copy QUOTE.Range("A5") End If If […]

将某些颜色的单元格转移到其他Excel表单中: 我想知道是否有可能将某些彩色细胞转移到其他Excel表格。我已批准的单元格绿色和非批准的单元格红色。有两个不同的电子表格我想分发这些数据，一个被称为核准工作表，另一个被称为非核准工作表。我想这样做的原因是因为有大约80k行的数据，手动这样做将永远。感谢您的帮助和提供的所有信息。

如何将python datetime.datetime转换为Excel序列date编号: 我需要将date转换为Excel序列号，以便编写一个数据消除脚本。通过在OpenOffice Calc工作簿中玩date，我可以推断出“1899年1月1日00:00:00”映射到数字零。我写了下面的函数将python datetime对象转换为Excel序列号： def excel_date(date1): temp=dt.datetime.strptime('18990101', '%Y%m%d') delta=date1-temp total_seconds = delta.days * 86400 + delta.seconds return total_seconds 但是，当我尝试一些示例date时，这些数字与我在Excel中格式化date（以及OpenOffice Calc）时得到的数字不同。例如，testing“2009-03-20”在Python中给出了3478032000，而excel将序列号呈现为39892。上面的公式有什么问题？ *注：我正在使用Python 2.6.3，所以没有访问datetime.total_seconds（）