Tag: 引号

SQL ServerdynamicSQL“报价地狱”与OPENDATASOURCE

我想build立一个参数化的SQL查询，从Excel文件中检索数据。 Excel文件的名称每年都会更改。 以下是在T-SQL（在SQL Server 2008 R2 Express上）运行良好的查询： SELECT * INTO MobilityData FROM OPENDATASOURCE('Microsoft.Jet.OLEDB.4.0', 'Data Source=\\UNCPath\Annual_Mobility_Update\DAM2013-3.xls;Extended Properties=Excel 8.0')… [Sheet1$] 走 （UNCpath是一个networkingUNCpath，工作正常） string“DAM2013-3.xls”将同比变化。 我想要做的就是执行一个参数化的存储过程，并在飞行中build立Dyanamic SQL … 像这样的东西： SELECT @sQry='SELECT * INTO MobilityData FROM OPENDATASOURCE(''''Microsoft.Jet.OLEDB.4.0', 'Data Source=\\sgstore\Shared\operations\DM\Annual_Mobility_Update\''' + @XLFileSource + ';Extended Properties=Excel 8.0'')…[Sheet1$]' 但我似乎在地狱里，不能得到它编译。 我该怎么办才能解决这个问题？ 我会很感激任何提示，钓鱼竿，甚至整条鱼等 感谢Philip

Excel 2013 VBA添加奇怪的引号

说吧 Sub test() Worksheets("1").Cells(1, 1).Value = "html" Worksheets("1").Cells(1, 2).Value = "<xml xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance"" > " txt = " '" & Worksheets("1").Cells(1, 1) & "'=>array('" & Worksheets("1").Cells(1, 2) & "' => $" & Worksheets("1").Cells(1, 1) & ")," MsgBox txt FilePath = Application.DefaultFilePath & "\array.txt" Open FilePath For Output As #2 Write #2, txt Close #2 End Sub […]

如何插入双引号或单引号

我有很长的名单，我需要引用（可以是双引号或单引号），我有大约8000个。 我有他们在Excel中没有任何引号，我可以复制所有的名称和粘贴他们没有问题，但仍然没有引号。 我已经看了，并寻找一个Excel公式来添加引号到每一行的名字，但我没有运气。 我也尝试了一些聪明的发现和replace技术，但没有工作。 我正在寻找的格式是这样的： “艾伦”或“艾伦” 任何这些将工作。 我需要这个，所以我可以将信息存储到数据库中。 任何帮助是极大的赞赏。 谢谢 PS： 我发现在线的其他人需要做同样的事情，我需要做的，这个解决scheme已经为他们工作，但我不知道它是怎么做的： 你可以通过使用范围variables（例如myCell）来修复它，然后使用它来迭代范围对象的“select”集合，就像这样 Sub AddQuote() Dim myCell As Range For Each myCell In Selection If myCell.Value <> "" Then myCell.Value = Chr(34) & myCell.Value End If Next myCell End Sub 另一个解决scheme也为别人工作是： Sub OneUglyExport() Dim FileToSave, c As Range, OneBigOleString As String FileToSave = Application.GetSaveAsFilename Open […]