从TextBox中的单词末尾删除逗号

我正在尝试使用VBA从文本框中的名称末尾删除逗号。 有了这个问题,我首先必须通过点击一个命令button来将一个名称分类到两个文本框中。 问题是用户可能input名字作为FirstName, LastName或FirstName (single space) LastName 。 现在我卡住试图删除逗号。 删除特定的数字或字母已成功,但删除逗号将无法使用。 我得到的消息是语法错误 。 我的代码: Private Sub CommandButton1_Click() Dim LNFN As String Dim LastName As String Dim FirstName As String LNFN = TextBox4.Text FirstName = Split(LNFN)(1) LastName = Split(LNFN)(0) TextBox2.Text = FirstName TextBox3.Text = LastName TextBox2 = TextBox2.Value If Right(TestBox2, 1) = “,” Then TempString = Left(TextBox2, […]

从excel“csv格式”中获取数据类似于linq跳过

我需要根据行号从CSV文件中检索特定部分 例如:从第5行到第12行 我正在使用OleDbConnection并试图使用此查询: select * from [sheet1.csv$A5:A12] 但它不起作用。 C#代码: var filename = @"C:\Users\A\Desktop\passwords.csv"; var connString = string.Format( @"Provider=Microsoft.Jet.OleDb.4.0; Data Source={0};Extended Properties=""Text;HDR=YES;FMT=Delimited""", Path.GetDirectoryName(filename) ); using (var conn = new OleDbConnection(connString)) { conn.Open(); var query = "SELECT * FROM [" + Path.GetFileName(filename) + "$A5:A12]"; using (var adapter = new OleDbDataAdapter(query, conn)) { var ds = new DataSet("CSV […]

如何在Excelmacros或VB.Net中将JSON数据转换为xml数据

我正在获取JSON格式的数据 { “名称”: “瑞恩”, “年龄”:1, “滚动”:2 “地址”: “AAA”},{ “名称”: “瑞恩”, “年龄”:1, “滚”:2 , “地址”: “AAA”},{ “名称”: “瑞恩”, “年龄”:1, “滚动”:2 “地址”: “AAA”},{ “名称”: “瑞恩”,”年龄 “:1,” 滚动 “:2”,地址 “:” AAA“}] 它如何被转换成XML格式。 所以我可以用它填充我的Excel电子表格。 或者有没有什么办法可以直接将JSON数据转换为Excel中的macros

用于MS Excel的AutoHotkey脚本来读取特定单元格中的值

我需要自动AHK脚本来查找和匹配单元格中的关键字,然后从单元格的右边获取值,并将其与另一个单元格相加。 例如,单元格A3和A9包含文本“现金”,每个(B3和B9)右侧的一个单元格包含值200和300 。 如何自动求和到C5?

Visual Studio Excel数据透视表不显示数据

我正在编写一个应用程序来在现有的Excel工作簿中添加数据透视表工作表。 代码如下: Console.WriteLine("File: " + e.FullPath + " " + e.ChangeType); if (e.Name.StartsWith("~$")) return; Excel.Application oApp; Excel.Worksheet oSheet; Excel.Workbook oBook; oApp = new Excel.Application(); try { oBook = oApp.Workbooks.Open(e.FullPath); oSheet = (Excel.Worksheet)oBook.Worksheets.get_Item(1); //Excel.Range finalCell = oSheet.Cells[2, oSheet.Rows.Count]; Excel.Range oRange = oSheet.get_Range("A1", "M9"); if (oApp.Application.Sheets.Count < 2) { oSheet = (Excel.Worksheet)oBook.Worksheets.Add(); } else { oSheet = […]

COUNTIF计数= TODAY()

在Excel中,我使用DDE来拉动盘中股价报价信息。 所以它不断更新。 我在尝试着: =COUNTIF(A:A,"="&TODAY()) 但列A:A是一些不是当前date的date。 正在由职能或论坛制作,所以他们不被阅读为文本。 我不想将列更改为文本,因此可以读取。 因为它每分钟刷新。 有没有办法得到=COUNTIF(A:A,"="&TODAY())来读取由A:A中的函数产生的文本而不是函数?

提高高级filter处理时间

下面的代码通过logging进行循环,并从每个logging的高级filter/计算中返回某些值。 我有大约2000条logging我需要它贯穿。 问题是处理时间是10-15秒一个logging,这太慢了。 Sub EquityAutomatedDallas() Dim Counter As Integer Dim LogNo As String Dim LogNoRange As Range Dim NoRange As Range Dim FilterRange As Range Dim FilterCriteriaRange As Range Dim ValueRange As Range Dim FullSortRange As Range Dim SortValueRange As Range Dim FullSortRangeValues Dim EquityRankRange As Range Dim EquityOutOfRange As Range Dim MedianRange As Range […]

Application.SendKeys Keys:=“{F2}”不能从Formbutton子例程中使用

从macros快捷键调用时,此代码工作正常,也就是说,它将一个预选的单元格放入编辑模式。 Sub EditActiveCell() Selection.Activate Application.SendKeys Keys:="{F2}" End Sub 但是,从用UserForm控件单击的子例程调用时,它将无法工作。 点击后,预先select的单元格是“惰性”,必须点击才能input内容。 这就像是在VBA中select的,而不是在Excel客户端中。 另外,如果我从控件中调用的例程如此简单, Sub UserFormControlClickAction() ActiveCell.Select End Sub 然后控制点击子程序离开select(单个单元)“惰性”; 我必须点击才能进入。 任何帮助获取F2设置始终从UserForm控件点击工作?

Angularjs数字filter与UI网格无法正常工作

我在angular-ui-grid使用了angularjs数字filter。 在网格中,filter正常工作。 但是,当我将网格导出到csv并打开到excel时,它不能正常工作。 我也在exporterFieldCallback添加了filter。 在网格中: cellFilter: 'number:6', type: 'number'并在exporterFieldCallback : if(col.name == 'columnName'){ return $filter('number')(input,6); } 数字在网格上以小数点后6位显示。 但是,当我将其导出到csv并打开到excel时,零被截断。 请find这个angularjs数字filter ,其中数字显示指定的fractionSize这也是在网格中正常工作。 但导出网格时不起作用。 如果网格中的值是3.000000那么在Excel中它只显示3 。 如果网格中的值是1.415400那么在Excel中它只显示1.4154 。 为什么零被截断,而angular-ui-grid导出到csv并在Excel中打开它? 如何显示Excel中的值与网格上显示的值相同?

导出后在Excel文件中解决错误

我有一个函数将我的GridViews导出为Excel .xlsx。 但是,我面临的问题与打开/保存对话框保存的Excel文件。 当我尝试打开Excel文件时发生错误: 我目前的代码: protected void EXPORT_BUTTON_Click(object sender, EventArgs e) { Microsoft.Office.Interop.Excel._Application app = new Microsoft.Office.Interop.Excel.Application(); // creating new WorkBook within Excel application Microsoft.Office.Interop.Excel._Workbook workbook = app.Workbooks.Add(Type.Missing); String DATA1 = "DATA 1"; String DATA2 = "DATA 2"; ExportToExcel(app, workbook, DATA1 , DATA_1 ); workbook.Worksheets["Sheet1"].Delete(); workbook.Worksheets["Sheet2"].Delete(); workbook.Worksheets["Sheet3"].Delete(); ExportToExcel(app, workbook, DATA2 , DATA_2); workbook.SaveAs(@"C:\Users\testacc\Desktop\Test\" + "Server_" […]