Tag: excel

年迄今Excel公式

我有一张工作表,里面有四张不同的表格:总计,一月,二月和三月。 每张表都有销售产品A和B. 在总表中,我有一个三个月的列表,当我select一个特定的月份时,单元格B6和C6的值发生了变化,这很好。 以下公式位于这些单元格中:= INDIRECT(“'”&$ C $ 2&“'!”&“B3”)and = INDIRECT(“'”&$ C $ 2&“'!”&“C3”) 现在,我需要知道一个年份至今的价值取决于选定的月份。 例如,我在一月份的产品A有十个销售额,同一个产品的二月份有十二个销售额。 如果我在总表中select二月份,我可以使用哪些公式有22个销售?

使用Excel表格添加数字

我创build了一个有五个文本框的Excel表单。 这些文本框接受任何数值。 一旦input五个数字,就会有第六个文本框显示这些值的总和。 这些值的总和应该始终是100%。 这是我的代码: Private Sub TextBox1_Change() Dim Value As Single Value = Val(TextBox1.Value) + Val(TextBox2.Value) + Val(TextBox3.Value) + Val(TextBox4.Value) + Val(TextBox5.Value) TextBox6.Value = Value End Sub 我对所有文本框更改事件具有相同的代码。 不幸的是,这是行不通的。 当我input10作为我的input,而不是显示100%它显示10203040作为结果。 我究竟做错了什么?

从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控件点击工作?