Tag: 取消select

excel vbaselect栏目

我想select一个完整的excel列的范围。 可以用这个expression式来select它们吗? range(cells(rowindex, columnindex),cells(rowindex,columnindex)).Select 到目前为止,它并没有真正的工作。 我必须改变他们的格式和宽度。 最好的,美国

在Excel表格中使用vb.net进行范围select

这是我的代码: Dim saveFileDialog1 As New SaveFileDialog() saveFileDialog1.Filter = "Excel files (*.xls)|*.xls" saveFileDialog1.Title = "Save File" saveFileDialog1.RestoreDirectory = True If saveFileDialog1.ShowDialog() = DialogResult.OK Then Try Dim ExcelApp As New Microsoft.Office.Interop.Excel.Application() ExcelApp.Application.Workbooks.Add(Type.Missing) ExcelApp.Cells.HorizontalAlignment = XlHAlign.xlHAlignLeft ' Change properties of the Workbook ExcelApp.Columns.ColumnWidth = 15 ' Storing header part in Excel For i As Integer = 1 To […]

在Excel VBA中selectvariables范围内的所有非空白单元格

我有我在Excel上的数据集。 从列B开始,它具有从B3到具有周期性变大的variables的连续数据(例如,今天是B114,但是明天数据可以延伸到B116)。 单元格B中的数据是连续的,不会被删除。 对于列B中的每一行连续数据,我也想select列B-AG的行。 但是,B之后的行没有连续的数据。 例如:从B3到B120有连续的数据。 我想select范围B3:AG120。 我在VBA中编写的代码不起作用。 它正确地停在B120(在这个例子中),但是,一旦它到达C-AG列中的非连续数据,它就会出现并select超过120的行。我不肯定为什么这个代码不工作,任何帮助非常感激! 为了logging,工作表中几乎每个单元格中都有公式。 然而,只有一些公式用数据填充单元格。 我想select每个单元格,而不pipe它是否填充了数据如果它在我的范围内。 否则,我不想select它。 例如,过去的B120中有空单元格,其中有公式。 我不想把这些放在我的范围内。 但是,如果D40中有一个空单元格(在B3和AG120之间),我想将其包含在select中。 Dim LR As Long, cell As Range, rng As Range With Sheets("Sortable(2)") LR = .Range("B" & Rows.Count).End(xlUp).Row For Each cell In .Range("B3:B" & LR) If cell.Value <> "" Then If rng Is Nothing Then Set rng = cell Else […]

Excel – 从选定行中只select列(38)中的单元格

我在电子表格中select了10k行。 现在我需要将select范围缩小到只有前面select的第38列中的单元格。 我几乎没有VBA的经验,但我用来select行的macros是 Sub selectwholerow() Selection.EntireRow.Select End Sub 所以我猜想我正在寻找什么样的方式 Sub selectcolumn() Selection.Columns(38).Select End Sub 但我真的没有线索。

在基于用户的select中find所有不同的值 – Excel VBA

有没有一种快速和简单的方法来selectExcel中给定的select与VBA中的所有不同的值? 0 | we | 0 –+—-+– we| 0 | 1 – >结果应该是{0,我们,1} 提前谢谢了

如何从列MS Excel 2007中select一个名称

我有一个Excel文件,其中有一个学生名单和他们的组名。 我在同一个excel文档中有另一个名为comments的表单。 在这张表中,我希望列出一个个人名单。 有65名学生和14个确定的组。 有没有办法select14组名,没有repitition? 单元格B3-B67有学生的名字。 单元格C3-C67有团队名称。 队名是针对每个学生input的。 我知道在SQL我可以使用像select不同(team_name),但在Excel中,我怎么能复制这个? 干杯,阿尔克斯。

Excelmacros – 运行在同一级别的单元格

所以我想通过A1-C200运行并将所有内容粘贴到Word文档中。 麻烦的是,我有两种方式把它粘贴到Word中,但是每一种都有它的缺陷。 目标:将A1-C200复制到Word中并保留列布局,而不复制空白。 例1: 下面的代码将所有内容复制到Word中,但是从A1 – > A200,B1 – > B200,C1 – > C200运行。 因为这样通过我的文件读取,我失去了我的列布局。 我更喜欢这个例子的解决scheme,因为这个代码看起来更清晰。 iMaxRow = 200 " Loop through columns and rows" For iCol = 1 To 3 For iRow = 1 To iMaxRow With Worksheets("GreatIdea").Cells(iRow, iCol) " Check that cell is not empty." If .Value = "" Then "Nothing in this […]

使用Excel收集SQL语句

在我的日常工作中,我正在接收Excel电子表格中的数据,我需要将其插入到关系数据库中。 为了做到这一点,我准备公式生成“插入”语句(我使用插入和select语句,例如select具有特定标签的所有元素的ID)。 由于这些电子表格非常复杂,因此它们包含多个列中的SQL命令。 这是问题开始的地方 – 我不能简单地select所有单元格,复制它们并粘贴到SQL Server(它将连接来自同一行中的单元格的信息)。 在大多数情况下,我正在准备额外的工作表,我正在收集一列中的所有陈述(使用简单的公式来重写来自其他单元格的文本)。 不幸的是,准备这样的表是耗时的,可能会导致错误(例如,如果我忘了列或添加行)。 有没有更方便的方法呢? 我想写一个macros,收集所选范围的所有值。 这是好主意还是我可以使用更好的东西?

VB 2010 Excel自动化

我试图从datagridview元素中的选定行自动填充主Excel文件。 我已经将数据库连接到数据网格,并且我试图根据数据网格的选定行填充Excel电子表格中的某些字段。 Dim objExcel As New Excel.Application objExcel.Workbooks.Add("path of master workbook") ' objExcel.Visible = True 'Select and modify cells 'Site(Name) objExcel.Range("B2").Select() objExcel.ActiveCell.FormulaR1C1() = 'Where I want to specify the value 从我所做的研究中,我将需要使用我的datagrid的selectionchanged事件来识别选定的行,然后根据列索引填充电子表格,然后使用循环为其余字段填充。 我还想添加创build多个工作表的function,方法是循环访问datagrid视图中的选定行。 我已经看过许多不同的代码示例,用于将整个数据网格导出到Excel中,但是我不能一辈子都知道如何获取所选行的值,然后再根据列。 有人能指引我正确的方向,还是让我知道我完全脱离基地?

Excel中的SQL VBA语法

我正在尝试编写一个CASE WHEN然后ELSE END等价于在查询另一个Excel电子表格的VBA ODBC连接。 我已经尝试了一切,我只能得到这个成功查询电子表格: .CommandText = "SELECT Data$.CALC_POST_PERIOD='201211' FROM Data$ Data$ 结果是当条件为真时返回-1 ,否则返回0 我如何定制这个? 我正在尝试做这样的事情 SELECT CASE WHEN Data$.CALC_POST_PERIOD='201211' THEN 'CURR_MONTH' ELSE NULL END 但这给了我一个错误 – 不匹配